* string -> shortstring

This commit is contained in:
Michael VAN CANNEYT 2023-01-06 10:58:42 +01:00 committed by Michaël Van Canneyt
parent ef98dd877a
commit 3d88722d8f

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] }