diff -r 0af93f018701 -r 83c40c1eb0e7 hedgewars/ArgParsers.pas --- a/hedgewars/ArgParsers.pas Tue Mar 29 22:36:59 2016 +0300 +++ b/hedgewars/ArgParsers.pas Mon Apr 25 22:10:06 2016 +0300 @@ -22,7 +22,6 @@ interface procedure GetParams; -{$IFDEF HWLIBRARY} {$IFNDEF BSD} var operatingsystem_parameter_argc: NativeInt; external; operatingsystem_parameter_argv: pointer; external; @@ -32,16 +31,14 @@ operatingsystem_parameter_argv: pointer; export; operatingsystem_parameter_envp: pointer; export; {$ENDIF} + function ParamCount: LongInt; function ParamStr(i: LongInt): shortstring; -{$ENDIF} implementation uses uVariables, uTypes, uUtils, uSound, uConsts; var isInternal: Boolean; -{$IFDEF HWLIBRARY} - type PCharArray = array[0..255] of PChar; PPCharArray = ^PCharArray; @@ -55,8 +52,6 @@ ParamStr:= StrPas(PPCharArray(operatingsystem_parameter_argv)^[i]) end; -{$ENDIF} - procedure GciEasterEgg; begin WriteLn(stdout, ' ');