|
@@ -56,10 +56,16 @@ const
|
|
DefaultTextLineBreakStyle : TTextLineBreakStyle = tlbsLF;
|
|
DefaultTextLineBreakStyle : TTextLineBreakStyle = tlbsLF;
|
|
|
|
|
|
{$if not defined(solaris) and not defined(darwin) and not defined(aix)}
|
|
{$if not defined(solaris) and not defined(darwin) and not defined(aix)}
|
|
|
|
+{$ifdef FPC_HAS_INDIRECT_MAIN_INFORMATION}
|
|
|
|
+var argc:longint;
|
|
|
|
+ argv:PPchar;
|
|
|
|
+ envp:PPchar;
|
|
|
|
+{$else}
|
|
var argc:longint;external name 'operatingsystem_parameter_argc';
|
|
var argc:longint;external name 'operatingsystem_parameter_argc';
|
|
argv:PPchar;external name 'operatingsystem_parameter_argv';
|
|
argv:PPchar;external name 'operatingsystem_parameter_argv';
|
|
envp:PPchar;external name 'operatingsystem_parameter_envp';
|
|
envp:PPchar;external name 'operatingsystem_parameter_envp';
|
|
{$endif}
|
|
{$endif}
|
|
|
|
+{$endif}
|
|
|
|
|
|
{$ifdef unix}
|
|
{$ifdef unix}
|
|
const
|
|
const
|