diff options
author | jonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2009-03-15 12:21:59 +0000 |
---|---|---|
committer | jonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2009-03-15 12:21:59 +0000 |
commit | d3fc5236b1d3f2c0dfc774997e68d0a03633a263 (patch) | |
tree | 21562355989bae1499e6f4fdd1a801e453bc0b8d /rtl/bsd | |
parent | bb15c332937248da72ea5a864261c08d0a4e47f7 (diff) | |
download | fpc-d3fc5236b1d3f2c0dfc774997e68d0a03633a263.tar.gz |
- removed FPC_DARWIN_JMP_MAIN and FPC_DARWIN_PASCALMAIN defines and ifdefs
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@12897 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'rtl/bsd')
-rw-r--r-- | rtl/bsd/system.pp | 15 |
1 files changed, 2 insertions, 13 deletions
diff --git a/rtl/bsd/system.pp b/rtl/bsd/system.pp index da2423c680..432800e12e 100644 --- a/rtl/bsd/system.pp +++ b/rtl/bsd/system.pp @@ -1,5 +1,5 @@ { - This file is part of the Free Pascal run time librar~y. + This file is part of the Free Pascal run time library. Copyright (c) 2000 by Marco van de Voort member of the Free Pascal development team. @@ -266,18 +266,9 @@ end; {$ifdef Darwin} -{$ifndef FPC_DARWIN_PASCALMAIN} -procedure pascalmain;external name 'PASCALMAIN'; -{ Main entry point in C style, needed to capture program parameters. } - -procedure main(argcparam: Longint; argvparam: ppchar; envpparam: ppchar); cdecl; [public]; -{$else FPC_DARWIN_PASCALMAIN} - -{$ifdef FPC_DARWIN_JMP_MAIN} procedure pascalmain;cdecl;external name 'PASCALMAIN'; -{$endif} + procedure FPC_SYSTEMMAIN(argcparam: Longint; argvparam: ppchar; envpparam: ppchar); cdecl; [public]; -{$endif FPC_DARWIN_PASCALMAIN} begin argc:= argcparam; @@ -286,9 +277,7 @@ begin {$ifdef cpui386} Set8087CW(Default8087CW); {$endif cpui386} -{$if not defined(FPC_DARWIN_PASCALMAIN) or defined(FPC_DARWIN_JMP_MAIN)} pascalmain; {run the pascal main program} -{$endif} end; {$endif Darwin} {$endif FPC_USE_LIBC} |