summaryrefslogtreecommitdiff
path: root/compiler/jvm/hlcgcpu.pas
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/jvm/hlcgcpu.pas')
-rw-r--r--compiler/jvm/hlcgcpu.pas5
1 files changed, 2 insertions, 3 deletions
diff --git a/compiler/jvm/hlcgcpu.pas b/compiler/jvm/hlcgcpu.pas
index ec4dbd93d6..afdda5b1f1 100644
--- a/compiler/jvm/hlcgcpu.pas
+++ b/compiler/jvm/hlcgcpu.pas
@@ -234,8 +234,6 @@ uses
end;
- procedure create_hlcodegen;
-
const
opcmp2if: array[topcmp] of tasmop = (A_None,
@@ -2569,7 +2567,7 @@ implementation
result:=get_call_result_cgpara(pd,forceresdef);
end;
- procedure create_hlcodegen;
+ procedure create_hlcodegen_cpu;
begin
hlcg:=thlcgjvm.create;
create_codegen;
@@ -2577,4 +2575,5 @@ implementation
begin
chlcgobj:=thlcgjvm;
+ create_hlcodegen:=@create_hlcodegen_cpu;
end.