artem3213212/RuntimeBuilder
1
0
Fork 0
Code Issues 1 Pull Requests Releases Wiki Activity

API Remake

Browse Source
This commit is contained in:
Artem3213212
2018-04-01 01:23:44 +03:00
parent d4eb19affa
commit 08d7761837
10 changed files with 269 additions and 47 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
Tests/Project2.dpr
View File

@@ -14,8 +14,17 @@ uses
Unit1 in 'Unit1.pas',
RuntimeBuilder in '..\Source\RuntimeBuilder.pas',
RuntimeBuilder.Fasm in '..\Source\RuntimeBuilder.Fasm.pas',
FasmOnDelphi in '..\FasmOnDelphi\Source\FasmOnDelphi.pas',
Fasm4Delphi in '..\FasmOnDelphi\Fasm4Delphi\Source\Fasm4Delphi.pas';
FasmOnDelphi in '..\lib\FasmOnDelphi\Source\FasmOnDelphi.pas',
Fasm4Delphi in '..\lib\FasmOnDelphi\Fasm4Delphi\Source\Fasm4Delphi.pas'{,
RuntimeBuilder.Lua in '..\Source\RuntimeBuilder.Lua.pas',
pLuaObject in '..\lib\pLua-XE\src\pLuaObject.pas',
pLuaRecord in '..\lib\pLua-XE\src\pLuaRecord.pas',
pLuaTable in '..\lib\pLua-XE\src\pLuaTable.pas',
uWordList in '..\lib\pLua-XE\src\uWordList.pas',
Lua in '..\lib\pLua-XE\src\Lua.pas',
LuaObject in '..\lib\pLua-XE\src\LuaObject.pas',
LuaWrapper in '..\lib\pLua-XE\src\LuaWrapper.pas',
pLua in '..\lib\pLua-XE\src\pLua.pas'{};
var
runner : ITestRunner;

19
Tests/Project2.dproj
View File

@@ -98,8 +98,19 @@
<DCCReference Include="Unit1.pas"/>
<DCCReference Include="..\Source\RuntimeBuilder.pas"/>
<DCCReference Include="..\Source\RuntimeBuilder.Fasm.pas"/>
<DCCReference Include="..\FasmOnDelphi\Source\FasmOnDelphi.pas"/>
<DCCReference Include="..\FasmOnDelphi\Fasm4Delphi\Source\Fasm4Delphi.pas"/>
<DCCReference Include="..\lib\FasmOnDelphi\Source\FasmOnDelphi.pas"/>
<DCCReference Include="..\lib\FasmOnDelphi\Fasm4Delphi\Source\Fasm4Delphi.pas">
<Form>,
RuntimeBuilder.Lua in &apos;..\Source\RuntimeBuilder.Lua.pas&apos;,
pLuaObject in &apos;..\lib\pLua-XE\src\pLuaObject.pas&apos;,
pLuaRecord in &apos;..\lib\pLua-XE\src\pLuaRecord.pas&apos;,
pLuaTable in &apos;..\lib\pLua-XE\src\pLuaTable.pas&apos;,
uWordList in &apos;..\lib\pLua-XE\src\uWordList.pas&apos;,
Lua in &apos;..\lib\pLua-XE\src\Lua.pas&apos;,
LuaObject in &apos;..\lib\pLua-XE\src\LuaObject.pas&apos;,
LuaWrapper in &apos;..\lib\pLua-XE\src\LuaWrapper.pas&apos;,
pLua in &apos;..\lib\pLua-XE\src\pLua.pas&apos;{</Form>
</DCCReference>
<BuildConfiguration Include="Release">
<Key>Cfg_2</Key>
<CfgParent>Base</CfgParent>
@@ -456,13 +467,13 @@
<Operation>1</Operation>
</Platform>
</DeployClass>
<ProjectRoot Platform="OSX32" Name="$(PROJECTNAME)"/>
<ProjectRoot Platform="iOSDevice32" Name="$(PROJECTNAME).app"/>
<ProjectRoot Platform="Android" Name="$(PROJECTNAME)"/>
<ProjectRoot Platform="Win32" Name="$(PROJECTNAME)"/>
<ProjectRoot Platform="iOSDevice64" Name="$(PROJECTNAME).app"/>
<ProjectRoot Platform="Win64" Name="$(PROJECTNAME)"/>
<ProjectRoot Platform="OSX32" Name="$(PROJECTNAME)"/>
<ProjectRoot Platform="iOSSimulator" Name="$(PROJECTNAME).app"/>
<ProjectRoot Platform="iOSDevice32" Name="$(PROJECTNAME).app"/>
</Deployment>
<Platforms>
<Platform value="OSX32">False</Platform>

8
Tests/Unit1.pas
View File

@@ -23,7 +23,7 @@ var
Src:TRTBSource;
Func1:TRTBFunc;
begin
Fasm:=TRTBFasmCompiler.Create('..\..\..\FasmOnDelphi\fasmw172\fasm');
{Fasm:=TRTBFasmCompiler.Create('..\..\..\FasmOnDelphi\fasmw172\fasm');
Src:=Fasm.GenNewSrc;
Src.Text:='use32'+sLineBreak+'pop ecx'+sLineBreak+'pop eax'+sLineBreak+'jmp ecx';
Func1:=src.CompilateAsFunc;
@@ -33,7 +33,7 @@ begin
end;
FreeAndNil(Func1);
FreeAndNil(Src);
FreeAndNil(Fasm);
FreeAndNil(Fasm);}
end;
procedure TRuntimeBuilderTestObject.Test2();
@@ -43,7 +43,7 @@ var
lib:TRTBLib;
Func1:TRTBFunc;
begin
Fasm:=TRTBFasmCompiler.Create('..\..\..\FasmOnDelphi\fasmw172\fasm');
{Fasm:=TRTBFasmCompiler.Create('..\..\..\FasmOnDelphi\fasmw172\fasm');
Src:=Fasm.GenNewSrc;
Src.LoadFromFile('..\..\testlib.fasm');
Fasm.LoadLib('W:\RuntimeBuilder\FasmOnDelphi\fasmw172\INCLUDE\win32a.inc');
@@ -55,7 +55,7 @@ begin
end;
FreeAndNil(Func1);
FreeAndNil(Src);
FreeAndNil(Fasm);
FreeAndNil(Fasm);}
end;
initialization