paweld/pas2js
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/pas2js.git synced 2025-08-28 21:40:15 +02:00
Code Issues Packages Projects Releases Wiki Activity

rtl: added tkExtClass

Browse Source
This commit is contained in:
mattias 2019-10-30 11:56:41 +00:00
parent d1f79594de
commit a16ec5bdc1
1 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
packages/rtl/typinfo.pas
View File

@ -51,8 +51,9 @@ type
//tkQWord, //tkQWord,
//tkInterfaceRaw, //tkInterfaceRaw,
//tkUString,tkUChar, //tkUString,tkUChar,
tkHelper // 19 tkHelper, // 19
//tkFile, //tkFile,
tkExtClass // 20
); );
TTypeKinds = set of TTypeKind; TTypeKinds = set of TTypeKind;
@ -332,6 +333,13 @@ type
Ancestor: TTypeInfoClass external name 'ancestor'; Ancestor: TTypeInfoClass external name 'ancestor';
end; end;
{ TTypeInfoExtClass - Kind = tkExtClass }
TTypeInfoExtClass = class external name 'rtl.tTypeInfoExtClass'(TTypeInfoClass)
public
JSClassName: String external name 'jsclass';
end;
{ TTypeInfoClassRef - class-of, Kind = tkClassRef } { TTypeInfoClassRef - class-of, Kind = tkClassRef }
TTypeInfoClassRef = class external name 'rtl.tTypeInfoClassRef'(TTypeInfo) TTypeInfoClassRef = class external name 'rtl.tTypeInfoClassRef'(TTypeInfo)