Fasm 1/2 writed
This commit is contained in:
@@ -2,17 +2,15 @@ unit RuntimeBuilder.Types;
|
||||
|
||||
interface
|
||||
|
||||
uses System.TypInfo,System.Rtti;
|
||||
|
||||
const
|
||||
CRTBCallTypeNil=$0;
|
||||
CRTBCallTypeRegister=$1;
|
||||
CRTBCallTypeStdCall=$2;
|
||||
CRTBCallTypeCdecl=$3;
|
||||
CRTBCallTypeClrcall=$4;
|
||||
CRTBCallTypeThiscall=$5;
|
||||
CRTBCallTypeVectorcall=$6;
|
||||
CRTBCallTypeCFastCall=$7;
|
||||
CRTBCallTypeFortran=$8;
|
||||
CRTBCallTypeSyscall=$9;
|
||||
CRTBCallTypePascal=$4;
|
||||
CRTBCallTypeSafeCall=$5;
|
||||
CRTBCallType64Call=$40;
|
||||
CRTBCallTypeDefault=$80;
|
||||
|
||||
@@ -23,7 +21,7 @@ type
|
||||
|
||||
TRTBFunc=class abstract
|
||||
public
|
||||
function Call(args:array of const;CallType:TRTBCallType=CRTBCallTypeDefault):Variant;virtual;abstract;
|
||||
function Call(OutType:PTypeInfo;args:TArray<TValue>;CallType:TRTBCallType=CRTBCallTypeDefault):TValue;virtual;abstract;
|
||||
end;
|
||||
|
||||
TRTBLib=class abstract
|
||||
|
||||
Reference in New Issue
Block a user