Browse Source

* ansichar is the basic type

Michaël Van Canneyt 2 years ago
parent
commit
ab5b3a6e1c
1 changed files with 7 additions and 6 deletions
  1. 7 6
      rtl/java/jsystemh_types.inc

+ 7 - 6
rtl/java/jsystemh_types.inc

@@ -398,15 +398,16 @@ Type
 {$ENDIF}
 {$ENDIF}
 
 
 { Zero - terminated strings }
 { Zero - terminated strings }
-  PChar               = ^Char;
-  PPChar              = ^PChar;
-  PPPChar             = ^PPChar;
-
-  { AnsiChar is equivalent of AnsiChar, so we need
-    to use type renamings }
+  // Ansichar is the basic type
   TAnsiChar           = AnsiChar;
   TAnsiChar           = AnsiChar;
   PAnsiChar           = ^AnsiChar;
   PAnsiChar           = ^AnsiChar;
   PPAnsiChar          = ^PAnsiChar;
   PPAnsiChar          = ^PAnsiChar;
+  PPPAnsiChar         = ^PPAnsiChar;
+  
+  // Char is an alias
+  PChar               = ^Char;
+  PPChar              = ^PChar;
+  PPPChar             = ^PPChar;
 
 
   UCS4Char            = type 0..$10ffff;
   UCS4Char            = type 0..$10ffff;
   PUCS4Char           = ^UCS4Char;
   PUCS4Char           = ^UCS4Char;