si_intf.inc 1010 B

12345678910111213141516171819
  1. {$SMARTLINK OFF}
  2. {$if declared(indirect_bootstrap)}
  3. {$define FPC_BOOTSTRAP_INDIRECT_ENTRY}
  4. {$endif declared(indirect_bootstrap)}
  5. {$if not defined(FPC_BOOTSTRAP_INDIRECT_ENTRY) and not defined(FPC_HAS_INDIRECT_ENTRY_INFORMATION)}
  6. var
  7. initialstkptr: pointer; public name '__stkptr';
  8. operatingsystem_parameter_envp: ppchar; public name 'operatingsystem_parameter_envp';
  9. operatingsystem_parameter_argc: longint; public name 'operatingsystem_parameter_argc';
  10. operatingsystem_parameter_argv: ppchar; public name 'operatingsystem_parameter_argv';
  11. {$elseif defined(FPC_BOOTSTRAP_INDIRECT_ENTRY)}
  12. var
  13. initialstkptr: pointer; external name '__stkptr';
  14. operatingsystem_parameter_envp: ppchar; external name 'operatingsystem_parameter_envp';
  15. operatingsystem_parameter_argc: longint; external name 'operatingsystem_parameter_argc';
  16. operatingsystem_parameter_argv: ppchar; external name 'operatingsystem_parameter_argv';
  17. {$endif not FPC_BOOTSTRAP_INDIRECT_ENTRY and not FPC_HAS_INDIRECT_ENTRY_INFORMATION}