Răsfoiți Sursa

* missing calls to InitWideStringManager added

git-svn-id: trunk@1071 -
Tomas Hajny 20 ani în urmă
părinte
comite
eb26e1aa39
3 a modificat fișierele cu 14 adăugiri și 3 ștergeri
  1. 4 1
      rtl/atari/system.pas
  2. 5 1
      rtl/emx/system.pas
  3. 5 1
      rtl/os2/system.pas

+ 4 - 1
rtl/atari/system.pas

@@ -766,5 +766,8 @@ begin
   errno := 0;
 { Setup command line arguments }
   argc:=GetParamCount(args);
-  initvariantmanager;
+  InitVariantManager;
+{$ifdef HASWIDESTRING}
+  InitWideStringManager;
+{$endif HASWIDESTRING}
 end.

+ 5 - 1
rtl/emx/system.pas

@@ -567,7 +567,11 @@ begin
 
     InitSystemThreads;
 
-    initvariantmanager;
+    InitVariantManager;
+
+{$ifdef HASWIDESTRING}
+    InitWideStringManager;
+{$endif HASWIDESTRING}
 
     if os_Mode in [osDOS,osDPMI] then
         DosEnvInit;

+ 5 - 1
rtl/os2/system.pas

@@ -753,7 +753,11 @@ begin
     DefaultFileType := '';
 
     InitSystemThreads;
-    initvariantmanager;
+    InitVariantManager;
+
+{$ifdef HASWIDESTRING}
+    InitWideStringManager;
+{$endif HASWIDESTRING}
 
 {$IFDEF EXTDUMPGROW}
 {    Int_HeapSize := high (cardinal);}