[PATCH 11/83] replacing unit-begin with unit initialization. plus cleaning up java (jvm) reference

From 8f9a8d080e2e5fa2950a502a5e366a2cbddc091c Mon Sep 17 00:00:00 2001
From: Dmitry Boyarintsev <skalogryz.lists@gmail.com>
Date: Tue, 3 Sep 2019 15:37:05 -0400

git-svn-id: branches/wasm@45888 -
This commit is contained in:
nickysn 2020-07-29 16:39:10 +00:00
parent 75b7396c09
commit b2a4f2105e
6 changed files with 8 additions and 8 deletions

View File

@ -258,7 +258,7 @@ implementation
begin begin
end; end;
begin initialization
cai_cpu:=taicpu; cai_cpu:=taicpu;
cai_align:=tai_align; cai_align:=tai_align;
casmdata:=TAsmData; casmdata:=TAsmData;

View File

@ -607,6 +607,6 @@ implementation
); );
begin initialization
RegisterAssembler(as_wasm_binaryen_info,TBinaryenAssembler); RegisterAssembler(as_wasm_binaryen_info,TBinaryenAssembler);
end. end.

View File

@ -214,7 +214,7 @@ uses
NR_FRAME_POINTER_REG = NR_STACK_POINTER_REG; NR_FRAME_POINTER_REG = NR_STACK_POINTER_REG;
RS_FRAME_POINTER_REG = RS_STACK_POINTER_REG; RS_FRAME_POINTER_REG = RS_STACK_POINTER_REG;
{ Java results are returned on the evaluation stack, not via a register } { WebAssembly results are returned on the evaluation stack, not via a register }
{ Results are returned in this register (32-bit values) } { Results are returned in this register (32-bit values) }
NR_FUNCTION_RETURN_REG = NR_NO; NR_FUNCTION_RETURN_REG = NR_NO;

View File

@ -1,5 +1,5 @@
{ {
Copyright (c) 1998-2010 by Florian Klaempfl, Jonas Maebe Copyright (c) 2019 by Dmtiry Boyarintsev
Calling conventions for the WebAssembly Calling conventions for the WebAssembly
@ -324,6 +324,6 @@ implementation
end; end;
begin initialization
ParaManager:=tcpuparamanager.create; ParaManager:=tcpuparamanager.create;
end. end.

View File

@ -60,6 +60,6 @@ implementation
end; end;
begin initialization
cprocinfo:=tcpuprocinfo; cprocinfo:=tcpuprocinfo;
end. end.

View File

@ -912,7 +912,7 @@ implementation
result:=inherited; result:=inherited;
end; end;
begin initialization
{ used tdef classes } { used tdef classes }
cfiledef:=tcpufiledef; cfiledef:=tcpufiledef;
cvariantdef:=tcpuvariantdef; cvariantdef:=tcpuvariantdef;