paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-06 05:28:07 +02:00
Code Issues Packages Projects Releases Wiki Activity

* new bug

Browse Source
This commit is contained in:
peter 2003-07-08 14:34:31 +00:00
parent accadea6a1
commit aa51a11b02
1 changed files with 17 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
tests/webtbf/tw2562.pp Normal file
View File

@ -0,0 +1,17 @@
{ %fail }
{ Source provided for Free Pascal Bug Report 2562 }
{ Submitted by "Nikolay Nikolov" on 2003-07-06 }
{ e-mail: nickysn1983@netscape.net }
Procedure Tralala(Var q, w);
Begin
q := w;
End;
Var
q : Integer;
w : Array[1..10] Of Integer;
Begin
Tralala(q, w);
End.