mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-15 16:09:27 +02:00
- removed "{$ifdef unsupported}" block for jvm (is handled in njvmmem
already) git-svn-id: branches/jvmbackend@18572 -
This commit is contained in:
parent
71cd31159c
commit
564b8a2cf7
@ -200,14 +200,6 @@ implementation
|
|||||||
|
|
||||||
procedure tcgaddrnode.pass_generate_code;
|
procedure tcgaddrnode.pass_generate_code;
|
||||||
begin
|
begin
|
||||||
{$ifdef jvm}
|
|
||||||
{$ifndef nounsupported}
|
|
||||||
location_reset(location,LOC_REGISTER,OS_ADDR);
|
|
||||||
location.register:=hlcg.getaddressregister(current_asmdata.CurrAsmList,java_jlobject);
|
|
||||||
hlcg.a_load_const_reg(current_asmdata.CurrAsmList,java_jlobject,0,location.register);
|
|
||||||
exit;
|
|
||||||
{$endif nounsupported}
|
|
||||||
{$endif jvm}
|
|
||||||
secondpass(left);
|
secondpass(left);
|
||||||
|
|
||||||
location_reset(location,LOC_REGISTER,OS_ADDR);
|
location_reset(location,LOC_REGISTER,OS_ADDR);
|
||||||
|
Loading…
Reference in New Issue
Block a user