paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-08 02:07:53 +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;
InitSystemThreads;
initvariantmanager;
{$ifdef VER2_2}
initwidestringmanager;
{$else VER2_2}
initunicodestringmanager;
{$endif VER2_2}
end.

4
rtl/beos/system.pp
View File

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

4
rtl/go32v2/system.pp
View File

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

4
rtl/haiku/system.pp
View File

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

4
rtl/macos/system.pp
View File

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

4
rtl/morphos/system.pp
View File

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

4
rtl/netware/system.pp
View File

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

4
rtl/netwlibc/system.pp
View File

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

4
rtl/solaris/system.pp
View File

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

4
rtl/watcom/system.pp
View File

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

3
rtl/win64/system.pp
View File

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

3
rtl/wince/system.pp
View File

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