paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-15 20:09:20 +02:00
Code Issues Packages Projects Releases Wiki Activity

no message

Browse Source
This commit is contained in:
florian 2005-02-01 23:17:46 +00:00
parent 65e3bccd25
commit cc7220d3db
1 changed files with 15 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
tests/tbs/tb0484.pp
View File

@ -1,8 +1,21 @@
type type
r = record r1 = record
p : procedure stdcall; p : procedure stdcall;
i : longint; i : longint;
end; end;
r2 = record
p : procedure;
i : longint;
end;
r3 = record
p : procedure
end;
r4 = record
p : procedure stdcall
end;
begin begin
end. end.