Browse Source

* Fixed the jvm target after r45436.

git-svn-id: trunk@45437 -
yury 5 years ago
parent
commit
afc568cf93
1 changed files with 1 additions and 1 deletions
  1. 1 1
      compiler/ncgnstmm.pas

+ 1 - 1
compiler/ncgnstmm.pas

@@ -105,7 +105,7 @@ implementation
           of the current routine (and hence it has not been moved into the
           nestedfp struct), get the original nestedfp parameter }
         useparentfppara:=not assigned(current_procinfo.procdef.parentfpstruct);
-        hsym:=parentfpsym;
+        hsym:=tparavarsym(current_procinfo.procdef.parast.Find('parentfp'));
         if current_procinfo.procdef.parast.symtablelevel>parentpd.parast.symtablelevel then
           useparentfppara:=
             useparentfppara or