mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-09-14 11:09:41 +02:00
* string -> shortstring
This commit is contained in:
parent
e9ce7ebd4b
commit
f6beba0b0b
@ -364,7 +364,7 @@ Begin
|
|||||||
paramcount := argc - 1;
|
paramcount := argc - 1;
|
||||||
End;
|
End;
|
||||||
|
|
||||||
function paramstr(l: longint) : string;
|
function paramstr(l: longint) : shortstring;
|
||||||
begin
|
begin
|
||||||
if argv=nil then
|
if argv=nil then
|
||||||
setup_arguments;
|
setup_arguments;
|
||||||
|
Loading…
Reference in New Issue
Block a user