* string -> shortstring

This commit is contained in:
Michael VAN CANNEYT 2023-01-06 10:58:42 +01:00 committed by Pierre Muller
parent e72b6a6ed6
commit f1e3818c37

View File

@ -150,7 +150,7 @@ end;
//var //var
// execpathstr : shortstring; // execpathstr : shortstring;
function paramstr(l: longint) : string; function paramstr(l: longint) : shortstring;
begin begin
{ stricly conforming POSIX applications } { stricly conforming POSIX applications }
{ have the executing filename as argv[0] } { have the executing filename as argv[0] }