* Fix compilation for platforms that do not have unicodestring

rtl/objpas/sysutils/sysutilh.inc

@@ -336,8 +336,10 @@ Type
   { interface handling }
   {$i intfh.inc}
 
+{$IFDEF FPC_HAS_FEATURE_UNICODESTRINGS}
   { strange Delphi thing }
   {$i sysmarshalh.inc}
+{$ENDIF}  
 
   function SafeLoadLibrary(const FileName: AnsiString;
     ErrorMode: DWord = {$ifdef windows}SEM_NOOPENFILEERRORBOX{$else windows}0{$endif windows}): HMODULE;

rtl/objpas/sysutils/sysutils.inc

@@ -44,8 +44,10 @@
   { Type helpers}
   {$i syshelp.inc}
 
+{$IFDEF FPC_HAS_FEATURE_UNICODESTRINGS}
   { strange Delphi thing }
   {$i sysmarshal.inc}
+{$ENDIF}  
 
   {$ifndef OS_FILEISREADONLY}
   Function FileIsReadOnly(const FileName: RawByteString): Boolean;