Securiti fix
This commit is contained in:
@@ -12,12 +12,12 @@ type
|
||||
TRTBLuaSource=class(TRTBSource)
|
||||
protected type
|
||||
TRTBLuaModule=class(TRTBModule)
|
||||
private type
|
||||
protected type
|
||||
TRTBLuaFunc=class(TRTBFunc)
|
||||
private
|
||||
protected
|
||||
//p:Pointer;
|
||||
public
|
||||
constructor Create(s:string);
|
||||
//constructor Create(s:string);
|
||||
//function Call(OutType:PTypeInfo;args:TArray<TValue>;CallType:TRTBCallType=CRTBCallTypeDefault):TValue;override;
|
||||
//destructor Destroy;override;
|
||||
end;
|
||||
@@ -66,6 +66,9 @@ type
|
||||
//procedure AddConst(NameSpace:string;Name:string;Val:TValue);override;
|
||||
//procedure DelConst(NameSpace:string;Name:string);override;
|
||||
|
||||
//procedure AddCallBack(NameSpace:string;Name:string;CallBack:TRTBCallBack);override;
|
||||
//procedure DelCallBack(NameSpace:string;Name:string);override;
|
||||
|
||||
//procedure AddVariable(NameSpace:string;Name:string;var Data);override;
|
||||
//procedure ExportVariable(NameSpace:string;Name:string;var Data);override;
|
||||
//procedure DelVariable(NameSpace:string;Name:string);override;
|
||||
@@ -615,7 +618,7 @@ with consts do
|
||||
with Items[i] do
|
||||
ConstParse(Key,Value,PreDecl,base);}
|
||||
|
||||
Result:=TRTBLuaModule.Create(FText,funcs);
|
||||
//Result:=TRTBLuaModule.Create(FText,funcs);
|
||||
end;
|
||||
|
||||
destructor TRTBLuaCompiler.TRTBLuaSource.Destroy;
|
||||
|
||||
Reference in New Issue
Block a user