fpc/utils/instantfpc/examples/writeparameters.pas
michael 1f6695b28b * Added instantfpc
git-svn-id: trunk@17364 -
2011-04-24 09:20:35 +00:00

8 lines
106 B
ObjectPascal
Executable File

#!/usr/bin/env instantfpc
var
i: Integer;
begin
for i:=0 to ParamCount do writeln(ParamStr(i));
end.