You've already forked lazarus-ccr
instantfpc: added example to list all parmeters passed to a script
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1596 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
7
applications/instantfpc/examples/writeparameters.pas
Executable file
7
applications/instantfpc/examples/writeparameters.pas
Executable file
@ -0,0 +1,7 @@
|
|||||||
|
#!/usr/bin/env instantfpc
|
||||||
|
var
|
||||||
|
i: Integer;
|
||||||
|
begin
|
||||||
|
for i:=0 to ParamCount do writeln(ParamStr(i));
|
||||||
|
end.
|
||||||
|
|
@ -73,7 +73,7 @@ begin
|
|||||||
writeln('instantfpc --get-cache');
|
writeln('instantfpc --get-cache');
|
||||||
writeln(' Prints cache directory to stdout.');
|
writeln(' Prints cache directory to stdout.');
|
||||||
writeln;
|
writeln;
|
||||||
writeln('Normal usage is to add as first line "#!instantfpc" to a source');
|
writeln('Normal usage is to add as first line "#!/usr/bin/instantfpc" to a source');
|
||||||
Halt(0);
|
Halt(0);
|
||||||
end else if p='--get-cache' then begin
|
end else if p='--get-cache' then begin
|
||||||
CacheDir:=GetCacheDir;
|
CacheDir:=GetCacheDir;
|
||||||
|
Reference in New Issue
Block a user