Код: Выделить всё
[doj@larion ~/proj/trunk/hello]$ cat hello.pas4
var
P, Q: PInteger;
I: Integer;
begin
P := nil;
I := 500;
Q := @I;
Writeln('Hello world!', P^, Q^);
end.
[doj@larion ~/proj/trunk/hello]$ make build && gdb hello
mkdir -p /home/doj/proj/trunk/.debug/hello || true # upyachka
m4 -I/home/doj/proj/trunk -I/home/doj/proj/trunk/tools/metapascal /home/doj/proj/trunk/tools/build/metapascal/meta.m4 /home/doj/proj/trunk/hello/hello.pas4 > /home/doj/proj/trunk/.debug/hello/hello.pastemp
m4 -I/home/doj/proj/trunk -I/home/doj/proj/trunk/tools/metapascal /home/doj/proj/trunk/tools/build/metapascal/id2.m4 /home/doj/proj/trunk/.debug/hello/hello.pastemp > /home/doj/proj/trunk/.debug/hello/hello.pp
cd /home/doj/proj/trunk/.debug/hello && fpc -Sd -al -an -ar -at -Fu/home/doj/proj/trunk/.debug/hello/ -Fo/home/doj/proj/trunk/.debug/hello/ -Fi/home/doj/proj/trunk/.debug/hello/ -g -gl hello.pp -ohello
/usr/bin/ld: warning: link.res contains output sections; did you forget -T?
ln -sf /home/doj/proj/trunk/.debug/hello/hello hello
GNU gdb (GDB) 7.4.1-debian
Copyright (C) 2012 Free Software Foundation, Inc.
License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>
This is free software: you are free to change and redistribute it.
There is NO WARRANTY, to the extent permitted by law. Type "show copying"
and "show warranty" for details.
This GDB was configured as "x86_64-linux-gnu".
For bug reporting instructions, please see:
<http://www.gnu.org/software/gdb/bugs/>...
Reading symbols from /home/doj/proj/trunk/hello/hello...done.
(gdb) run
Starting program: /home/doj/proj/trunk/hello/hello
Program received signal SIGSEGV, Segmentation fault.
0x0000000000400221 in main () at hello.pp:12
12 Writeln('Hello world!', P^, Q^);
(gdb) p p
$5 = 0x0
(gdb) p q
$6 = 0x62d090
(gdb) p i
$7 = 500
(gdb) p @i
$8 = (^LONGINT) 0x62d090
Кто-нибудь может объяснить что произошло? @ и ^ — это операторы языка выражений в gdb? gdb поддерживает FreePascal? FreePascal делает вид, что он GNU Pascal? В секциях бинарника прописано описание сущностей языка?
