* string -> shortstring

This commit is contained in:
Michael VAN CANNEYT 2023-01-06 10:54:54 +01:00 committed by Michaël Van Canneyt
parent b8b091cef8
commit aa3a5f8324

View File

@ -76,10 +76,10 @@ Begin
end;
function paramstr(l: longint) : string;
function paramstr(l: longint) : shortstring;
var
s: string;
s1: string;
s: shortstring;
s1: shortstring;
begin
{ stricly conforming POSIX applications }
{ have the executing filename as argv[0] }