From afc568cf93fdfaa09f75eb0ab65d3cbaa2f628f0 Mon Sep 17 00:00:00 2001 From: yury Date: Tue, 19 May 2020 14:01:19 +0000 Subject: [PATCH] * Fixed the jvm target after r45436. git-svn-id: trunk@45437 - --- compiler/ncgnstmm.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/compiler/ncgnstmm.pas b/compiler/ncgnstmm.pas index 6afc96020e..b9688281b1 100644 --- a/compiler/ncgnstmm.pas +++ b/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