* some aliases for newer delphi versions, patch by Silvio.

   utf8char, putf8char and marshal*

git-svn-id: trunk@37689 -

rtl/inc/systemh.inc

@@ -475,6 +475,9 @@ Type
   PPAnsiChar          = PPChar;
   PPPAnsiChar         = PPPChar;
 
+  UTF8Char = AnsiChar;
+  PUTF8Char = PAnsiChar;
+
   UCS4Char            = type 0..$10ffff;
   PUCS4Char           = ^UCS4Char;
 {$ifdef CPU16}
@@ -585,6 +588,9 @@ Type
   PUnicodeChar        = ^UnicodeChar;
   PUnicodeString      = ^UnicodeString;
 
+  MarshaledString     = PWideChar;
+  MarshaledAString    = PAnsiChar;
+
   TSystemCodePage     = Word;
 
 {$ifdef VER2_6}