|
@@ -1431,7 +1431,7 @@ Const
|
|
|
|
|
|
Procedure Error(RunTimeError : TRunTimeError);
|
|
Procedure Error(RunTimeError : TRunTimeError);
|
|
{$ifdef FPC_HAS_FEATURE_COMMANDARGS}
|
|
{$ifdef FPC_HAS_FEATURE_COMMANDARGS}
|
|
-Function Paramcount:Longint;
|
|
|
|
|
|
+Function ParamCount:Longint;
|
|
Function ParamStr(l:Longint):string;
|
|
Function ParamStr(l:Longint):string;
|
|
{$endif FPC_HAS_FEATURE_COMMANDARGS}
|
|
{$endif FPC_HAS_FEATURE_COMMANDARGS}
|
|
|
|
|