mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-14 10:29:24 +02:00
+ Reversed setup of stdio and arguments to fix bug #3962
git-svn-id: trunk@114 -
This commit is contained in:
parent
d438530088
commit
aea4d56d46
@ -246,12 +246,12 @@ Begin
|
||||
{ Setup heap }
|
||||
InitHeap;
|
||||
SysInitExceptions;
|
||||
{ Arguments }
|
||||
SetupCmdLine;
|
||||
{ Setup stdin, stdout and stderr }
|
||||
SysInitStdIO;
|
||||
{ Reset IO Error }
|
||||
InOutRes:=0;
|
||||
{ Arguments }
|
||||
SetupCmdLine;
|
||||
{ threading }
|
||||
InitSystemThreads;
|
||||
{$ifdef HASVARIANT}
|
||||
|
@ -234,11 +234,11 @@ Begin
|
||||
{ Setup heap }
|
||||
InitHeap;
|
||||
SysInitExceptions;
|
||||
{ Setup stdin, stdout and stderr }
|
||||
SysInitStdIO;
|
||||
{ Arguments }
|
||||
SetupCmdLine;
|
||||
SysInitExecPath;
|
||||
{ Setup stdin, stdout and stderr }
|
||||
SysInitStdIO;
|
||||
{ Reset IO Error }
|
||||
InOutRes:=0;
|
||||
{ threading }
|
||||
|
@ -217,12 +217,12 @@ Begin
|
||||
{ Setup heap }
|
||||
InitHeap;
|
||||
SysInitExceptions;
|
||||
{ Arguments }
|
||||
SetupCmdLine;
|
||||
{ Setup stdin, stdout and stderr }
|
||||
SysInitStdIO;
|
||||
{ Reset IO Error }
|
||||
InOutRes:=0;
|
||||
{ Arguments }
|
||||
SetupCmdLine;
|
||||
InitSystemThreads;
|
||||
{$ifdef HASVARIANT}
|
||||
initvariantmanager;
|
||||
|
Loading…
Reference in New Issue
Block a user