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

+ test of FOR statment

Browse Source
This commit is contained in:
mazen 2003-04-29 08:04:30 +00:00
parent cf68b27bb9
commit ab4f1c908b
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/sparc/test0005.pas Normal file
View File

@ -0,0 +1,9 @@
{$UNITPATH ../../rtl/linux}
{$INCLUDEPATH ../../rtl/unix;../../rtl/inc;../../rtl/unix;../../rtl/sparc}
PROGRAM SparcTest;
VAR
i:Integer;
BEGIN
FOR i:=0 TO MaxInt DO
WriteLn(i);
END.