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

* ansichar is the basic type

Browse Source
This commit is contained in:
Michaël Van Canneyt 2023-07-14 09:17:46 +02:00 committed by Michael Van Canneyt
parent a3300b5ef5
commit ab5b3a6e1c
1 changed files with 7 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
rtl/java/jsystemh_types.inc
View File

@ -398,15 +398,16 @@ Type
{$ENDIF} {$ENDIF}
{ Zero - terminated strings } { Zero - terminated strings }
PChar = ^Char; // Ansichar is the basic type
PPChar = ^PChar;
PPPChar = ^PPChar;
{ AnsiChar is equivalent of AnsiChar, so we need
to use type renamings }
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;