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

palmos: some ifdefs for better feature support

Browse Source 
git-svn-id: trunk@37247 -
This commit is contained in:
Károly Balogh 2017-09-18 11:13:29 +00:00
parent f175619c7c
commit e896c16b4f
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/palmos/system.pp
View File

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