Răsfoiți Sursa

* fixed compilation with 2.4.4

git-svn-id: branches/jvmbackend@18778 -
Jonas Maebe 14 ani în urmă
părinte
comite
26ee54b1a2
1 a modificat fișierele cu 1 adăugiri și 1 ștergeri
  1. 1 1
      compiler/jvm/njvmld.pas

+ 1 - 1
compiler/jvm/njvmld.pas

@@ -162,7 +162,7 @@ function tjvmloadnode.is_copyout_addr_param_load: boolean;
 function tjvmloadnode.is_addr_param_load: boolean;
 function tjvmloadnode.is_addr_param_load: boolean;
   begin
   begin
     result:=
     result:=
-      (inherited and
+      (inherited is_addr_param_load and
        not jvmimplicitpointertype(tparavarsym(symtableentry).vardef) and
        not jvmimplicitpointertype(tparavarsym(symtableentry).vardef) and
        (tparavarsym(symtableentry).vardef.typ<>formaldef)) or
        (tparavarsym(symtableentry).vardef.typ<>formaldef)) or
       is_copyout_addr_param_load;
       is_copyout_addr_param_load;