Browse Source

* SysInitStdIO doesn't crash anymore on the i8086, so enable it in the msdos system unit initialization

git-svn-id: branches/i8086@23991 -
nickysn 12 years ago
parent
commit
f24f119822
1 changed files with 6 additions and 2 deletions
  1. 6 2
      rtl/msdos/system.pp

+ 6 - 2
rtl/msdos/system.pp

@@ -126,11 +126,11 @@ end;
 
 procedure SysInitStdIO;
 begin
-{  OpenStdIO(Input,fmInput,StdInputHandle);
+  OpenStdIO(Input,fmInput,StdInputHandle);
   OpenStdIO(Output,fmOutput,StdOutputHandle);
   OpenStdIO(ErrOutput,fmOutput,StdErrorHandle);
   OpenStdIO(StdOut,fmOutput,StdOutputHandle);
-  OpenStdIO(StdErr,fmOutput,StdErrorHandle);}
+  OpenStdIO(StdErr,fmOutput,StdErrorHandle);
 end;
 
 function GetProcessID: SizeUInt;
@@ -143,4 +143,8 @@ begin
   result := stklen;
 end;
 
+begin
+  initunicodestringmanager;
+{ Setup stdin, stdout and stderr }
+  SysInitStdIO;
 end.