pascal & gdb

pas_gdb

 1 descent@deb:pascal$ gdb h
 2 GNU gdb (Debian 7.11.1-2) 7.11.1
 3 Copyright (C) 2016 Free Software Foundation, Inc.
 4 License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>
 5 This is free software: you are free to change and redistribute it.
 6 There is NO WARRANTY, to the extent permitted by law.  Type "show copying"
 7 and "show warranty" for details.
 8 This GDB was configured as "x86_64-linux-gnu".
 9 Type "show configuration" for configuration details.
10 For bug reporting instructions, please see:
11 <http://www.gnu.org/software/gdb/bugs/>.
12 Find the GDB manual and other documentation resources online at:
13 <http://www.gnu.org/software/gdb/documentation/>.
14 For help, type "help".
15 Type "apropos word" to search for commands related to "word"...
16 Reading symbols from h...done.
17 (gdb) l
18 1 Program h;
19 2 (*Uses f1, Crt in '/usr/local/lib/fpc/3.1.1/units/i386-linux/rtl-console/crt.ppu';*)
20 3 Uses f1, Crt;
21 4 
22 5   var x, v: integer;
23 6 begin
24 7 
25 8   x := max(5,6);
26 9   v := min(5,6);
27 10   Writeln('hello free pascal, max: ', x);
28 (gdb) l
29 11   Writeln('hello free pascal, min: ', v);
30 12 end.