paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-04 11:24:16 +01:00
Code Issues Packages Projects Releases Wiki Activity

no message

Browse Source
This commit is contained in:
florian 2005-01-19 20:52:08 +00:00
parent 7753653b4c
commit 661b1f39b7
1 changed files with 9 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
tests/tbs/tb0481.pp Normal file
View File

@ -0,0 +1,9 @@
type
trec = record
data : longint;
end;
prec = ^trec;
begin
writeln(longint(@prec(0)^.data));
end.