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

* test for enums in record

Browse Source 
git-svn-id: trunk@2405 -
This commit is contained in:
peter 2006-02-02 13:17:05 +00:00
parent e785aee0a1
commit 62d885369d
2 changed files with 16 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
.gitattributes vendored
View File

@ -5338,6 +5338,7 @@ tests/tbs/tb0496.pp svneol=native#text/plain
tests/tbs/tb0497a.pp -text tests/tbs/tb0497a.pp -text
tests/tbs/tb0497b.pp -text tests/tbs/tb0497b.pp -text
tests/tbs/tb0497c.pp -text tests/tbs/tb0497c.pp -text
tests/tbs/tb0498.pp svneol=native#text/plain
tests/tbs/ub0060.pp svneol=native#text/plain tests/tbs/ub0060.pp svneol=native#text/plain
tests/tbs/ub0069.pp svneol=native#text/plain tests/tbs/ub0069.pp svneol=native#text/plain
tests/tbs/ub0119.pp svneol=native#text/plain tests/tbs/ub0119.pp svneol=native#text/plain

15
tests/tbs/tb0498.pp Normal file
View File

@ -0,0 +1,15 @@
type
t1 = longint;
procedure p(t3:word);
var
t2 : record
t1 : t1;
end;
begin
writeln(t3);
end;
begin
p(10);
end.