Răsfoiți Sursa

palmos: some ifdefs for better feature support

git-svn-id: trunk@37247 -
Károly Balogh 8 ani în urmă
părinte
comite
e896c16b4f
1 a modificat fișierele cu 2 adăugiri și 0 ștergeri
  1. 2 0
      rtl/palmos/system.pp

+ 2 - 0
rtl/palmos/system.pp

@@ -154,7 +154,9 @@ begin
   ExitProc:=Nil;
 
   SysInitExceptions;
+{$ifdef FPC_HAS_FEATURE_UNICODESTRINGS}
   InitUnicodeStringManager;
+{$endif FPC_HAS_FEATURE_UNICODESTRINGS}
 { Setup stdin, stdout and stderr }
   SysInitStdIO;
 { Reset IO Error }