Browse Source

Call InitSystemThreads

peter 20 years ago
parent
commit
e6fcb4996f
1 changed files with 5 additions and 2 deletions
  1. 5 2
      rtl/go32v2/system.pp

+ 5 - 2
rtl/go32v2/system.pp

@@ -644,7 +644,7 @@ Begin
    FileNameCaseSensitive:=true;
    FileNameCaseSensitive:=true;
 { Reset IO Error }
 { Reset IO Error }
   InOutRes:=0;
   InOutRes:=0;
-  ThreadID := 1;
+  InitSystemThreads;
 {$ifdef  EXCEPTIONS_IN_SYSTEM}
 {$ifdef  EXCEPTIONS_IN_SYSTEM}
   InitDPMIExcp;
   InitDPMIExcp;
   InstallDefaultHandlers;
   InstallDefaultHandlers;
@@ -658,7 +658,10 @@ Begin
 End.
 End.
 {
 {
   $Log$
   $Log$
-  Revision 1.51  2005-05-01 13:00:53  peter
+  Revision 1.52  2005-05-05 11:40:23  peter
+  Call InitSystemThreads
+
+  Revision 1.51  2005/05/01 13:00:53  peter
   use fillchar after reallocmem, fix taken from win32
   use fillchar after reallocmem, fix taken from win32
 
 
   Revision 1.50  2005/04/03 21:10:59  hajny
   Revision 1.50  2005/04/03 21:10:59  hajny