paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-25 22:29:20 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed widestring/unicodemanager initialisiation

Browse Source 
git-svn-id: trunk@11743 -
This commit is contained in:
florian 2008-09-10 21:02:50 +00:00
parent 84fb9f1025
commit f97c2968f9
12 changed files with 46 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
rtl/amiga/system.pp
View File

@ -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
rtl/beos/system.pp
View File

@ -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
rtl/go32v2/system.pp
View File

@ -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
rtl/haiku/system.pp
View File

@ -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
rtl/macos/system.pp
View File

@ -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
rtl/morphos/system.pp
View File

@ -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
rtl/netware/system.pp
View File

@ -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
rtl/netwlibc/system.pp
View File

@ -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
rtl/solaris/system.pp
View File

@ -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
rtl/watcom/system.pp
View File

@ -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
rtl/win64/system.pp
View File

@ -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
rtl/wince/system.pp
View File

@ -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;