mirror of
https://github.com/vapaamies/KolibriOS.git
synced 2024-09-19 01:21:02 +02:00
Minimal Unicode compiler support
This commit is contained in:
parent
1d4bc29ce6
commit
a6a40b11de
@ -13,6 +13,8 @@ const
|
||||
RTLVersion = 15.2006; // <---'
|
||||
{$IFEND}
|
||||
|
||||
UnicodeCompiler = CompilerVersion >= 20.0;
|
||||
|
||||
type
|
||||
PPAnsiChar = ^PAnsiChar;
|
||||
|
||||
@ -92,6 +94,9 @@ const
|
||||
vtInterface = 14;
|
||||
vtWideString = 15;
|
||||
vtInt64 = 16;
|
||||
{$IFDEF UnicodeCompiler}
|
||||
vtUnicodeString = 17;
|
||||
{$ENDIF}
|
||||
|
||||
type
|
||||
PVarRec = ^TVarRec;
|
||||
@ -114,6 +119,9 @@ type
|
||||
vtInterface: (VInterface: Pointer);
|
||||
vtWideString: (VWideString: Pointer);
|
||||
vtInt64: (VInt64: PInt64);
|
||||
{$IFDEF UnicodeCompiler}
|
||||
vtUnicodeString: (VUnicodeString: Pointer);
|
||||
{$ENDIF}
|
||||
end;
|
||||
|
||||
procedure _Halt0;
|
||||
|
Loading…
Reference in New Issue
Block a user