Browse Source

* fixed widestring/unicodemanager initialisiation

git-svn-id: trunk@11743 -
florian 17 years ago
parent
commit
f97c2968f9

+ 4 - 0
rtl/amiga/system.pp

@@ -390,5 +390,9 @@ begin
   GenerateArgs;
   GenerateArgs;
   InitSystemThreads;
   InitSystemThreads;
   initvariantmanager;
   initvariantmanager;
+{$ifdef VER2_2}
   initwidestringmanager;
   initwidestringmanager;
+{$else VER2_2}
+  initunicodestringmanager;
+{$endif VER2_2}
 end.
 end.

+ 4 - 0
rtl/beos/system.pp

@@ -416,6 +416,10 @@ begin
 {$ifdef HASVARIANT}
 {$ifdef HASVARIANT}
   initvariantmanager;
   initvariantmanager;
 {$endif HASVARIANT}
 {$endif HASVARIANT}
+{$ifdef VER2_2}
   initwidestringmanager;
   initwidestringmanager;
+{$else VER2_2}
+  initunicodestringmanager;
+{$endif VER2_2}
   setupexecname;
   setupexecname;
 end.
 end.

+ 4 - 0
rtl/go32v2/system.pp

@@ -667,5 +667,9 @@ Begin
   InstallDefaultHandlers;
   InstallDefaultHandlers;
 {$endif  EXCEPTIONS_IN_SYSTEM}
 {$endif  EXCEPTIONS_IN_SYSTEM}
   initvariantmanager;
   initvariantmanager;
+{$ifdef VER2_2}
   initwidestringmanager;
   initwidestringmanager;
+{$else VER2_2}
+  initunicodestringmanager;
+{$endif VER2_2}
 End.
 End.

+ 4 - 0
rtl/haiku/system.pp

@@ -416,6 +416,10 @@ begin
 {$ifdef HASVARIANT}
 {$ifdef HASVARIANT}
   initvariantmanager;
   initvariantmanager;
 {$endif HASVARIANT}
 {$endif HASVARIANT}
+{$ifdef VER2_2}
   initwidestringmanager;
   initwidestringmanager;
+{$else VER2_2}
+  initunicodestringmanager;
+{$endif VER2_2}
   setupexecname;
   setupexecname;
 end.
 end.

+ 4 - 0
rtl/macos/system.pp

@@ -558,7 +558,11 @@ begin
   errno:=0;
   errno:=0;
   InitSystemThreads;
   InitSystemThreads;
   initvariantmanager;
   initvariantmanager;
+{$ifdef VER2_2}
   initwidestringmanager;
   initwidestringmanager;
+{$else VER2_2}
+  initunicodestringmanager;
+{$endif VER2_2}
 
 
   if StandAlone = 0 then
   if StandAlone = 0 then
     begin
     begin

+ 4 - 0
rtl/morphos/system.pp

@@ -422,5 +422,9 @@ begin
   GenerateArgs;
   GenerateArgs;
   InitSystemThreads;
   InitSystemThreads;
   initvariantmanager;
   initvariantmanager;
+{$ifdef VER2_2}
   initwidestringmanager;
   initwidestringmanager;
+{$else VER2_2}
+  initunicodestringmanager;
+{$endif VER2_2}
 end.
 end.

+ 4 - 0
rtl/netware/system.pp

@@ -481,5 +481,9 @@ Begin
   ExitCode  := 0;
   ExitCode  := 0;
   InitSystemThreads;
   InitSystemThreads;
   initvariantmanager;
   initvariantmanager;
+{$ifdef VER2_2}
   initwidestringmanager;
   initwidestringmanager;
+{$else VER2_2}
+  initunicodestringmanager;
+{$endif VER2_2}
 End.
 End.

+ 4 - 0
rtl/netwlibc/system.pp

@@ -551,5 +551,9 @@ Begin
   ExitCode  := 0;
   ExitCode  := 0;
   InitSystemThreads;
   InitSystemThreads;
   initvariantmanager;
   initvariantmanager;
+{$ifdef VER2_2}
   initwidestringmanager;
   initwidestringmanager;
+{$else VER2_2}
+  initunicodestringmanager;
+{$endif VER2_2}
 End.
 End.

+ 4 - 0
rtl/solaris/system.pp

@@ -234,5 +234,9 @@ Begin
   SetupCmdLine;
   SetupCmdLine;
   InitSystemThreads;
   InitSystemThreads;
   initvariantmanager;
   initvariantmanager;
+{$ifdef VER2_2}
   initwidestringmanager;
   initwidestringmanager;
+{$else VER2_2}
+  initunicodestringmanager;
+{$endif VER2_2}
 End.
 End.

+ 4 - 0
rtl/watcom/system.pp

@@ -786,5 +786,9 @@ Begin
   InstallDefaultHandlers;
   InstallDefaultHandlers;
 {$endif  EXCEPTIONS_IN_SYSTEM}
 {$endif  EXCEPTIONS_IN_SYSTEM}
   initvariantmanager;
   initvariantmanager;
+{$ifdef VER2_2}
   initwidestringmanager;
   initwidestringmanager;
+{$else VER2_2}
+  initunicodestringmanager;
+{$endif VER2_2}
 End.
 End.

+ 3 - 0
rtl/win64/system.pp

@@ -1157,6 +1157,9 @@ begin
   errno:=0;
   errno:=0;
   initvariantmanager;
   initvariantmanager;
   initwidestringmanager;
   initwidestringmanager;
+{$ifndef VER2_2}
+  initunicodestringmanager;
+{$endif VER2_2}
   InitWin32Widestrings;
   InitWin32Widestrings;
   DispCallByIDProc:=@DoDispCallByIDError;
   DispCallByIDProc:=@DoDispCallByIDError;
 end.
 end.

+ 3 - 0
rtl/wince/system.pp

@@ -1814,6 +1814,9 @@ initialization
   errno:=0;
   errno:=0;
   initvariantmanager;
   initvariantmanager;
   initwidestringmanager;
   initwidestringmanager;
+{$ifndef VER2_2}
+  initunicodestringmanager;
+{$endif VER2_2}
   InitWinCEWidestrings;
   InitWinCEWidestrings;
   DispCallByIDProc:=@DoDispCallByIDError;
   DispCallByIDProc:=@DoDispCallByIDError;