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

* more complete TValueData record

Browse Source 
git-svn-id: trunk@36906 -
This commit is contained in:
svenbarth 2017-08-14 20:26:55 +00:00
parent a0aaa69c0f
commit 56459594c0
1 changed files with 7 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
packages/rtl-objpas/src/inc/rtti.pp
View File

@ -47,10 +47,17 @@ type
3: (FAsObject: Pointer); 3: (FAsObject: Pointer);
4: (FAsClass: TClass); 4: (FAsClass: TClass);
5: (FAsSByte: Shortint); 5: (FAsSByte: Shortint);
6: (FAsSWord: Smallint);
7: (FAsSLong: LongInt);
8: (FAsSingle: Single);
9: (FAsDouble: Double); 9: (FAsDouble: Double);
10: (FAsExtended: Extended); 10: (FAsExtended: Extended);
11: (FAsComp: Comp);
12: (FAsCurr: Currency); 12: (FAsCurr: Currency);
13: (FAsUInt64: QWord);
14: (FAsSInt64: Int64); 14: (FAsSInt64: Int64);
15: (FAsMethod: TMethod);
16: (FAsPointer: Pointer);
end; end;
{ TValue } { TValue }