소스 검색

palmos: some ifdefs for better feature support

git-svn-id: trunk@37247 -
Károly Balogh 8 년 전
부모
커밋
e896c16b4f
1개의 변경된 파일2개의 추가작업 그리고 0개의 파일을 삭제
  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 }