Securiti fix

This commit is contained in:
2018-06-03 14:54:27 +03:00
parent b4da0b0b7a
commit 8b7cc86d23
6 changed files with 65 additions and 18 deletions

View File

@@ -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;