summaryrefslogtreecommitdiff
path: root/rtl/bsd
diff options
context:
space:
mode:
authorjonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2>2009-03-15 12:21:59 +0000
committerjonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2>2009-03-15 12:21:59 +0000
commitd3fc5236b1d3f2c0dfc774997e68d0a03633a263 (patch)
tree21562355989bae1499e6f4fdd1a801e453bc0b8d /rtl/bsd
parentbb15c332937248da72ea5a864261c08d0a4e47f7 (diff)
downloadfpc-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.pp15
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}