+ new test

git-svn-id: trunk@3563 -
This commit is contained in:
florian 2006-05-18 17:26:23 +00:00
parent ecf4a7faff
commit 02da87ff94
2 changed files with 15 additions and 0 deletions

1
.gitattributes vendored
View File

@ -6818,6 +6818,7 @@ tests/webtbs/tw5023.pp svneol=native#text/plain
tests/webtbs/tw5036.pp svneol=native#text/plain
tests/webtbs/tw5082.pp -text svneol=unset#text/plain
tests/webtbs/tw6491.pp svneol=native#text/plain
tests/webtbs/tw6742.pp svneol=native#text/plain
tests/webtbs/ub1873.pp svneol=native#text/plain
tests/webtbs/ub1883.pp svneol=native#text/plain
tests/webtbs/uw0555.pp svneol=native#text/plain

14
tests/webtbs/tw6742.pp Normal file
View File

@ -0,0 +1,14 @@
type
openstring=integer;
procedure test(var x:openstring);
begin
writeln(x);
end;
var
x: openstring;
begin
x:=1;
test(x);
end.