From f4690f90ad9e6c6cd040d2b8f7ed06649d6a69dd Mon Sep 17 00:00:00 2001 From: Jonas Maebe Date: Sat, 20 Aug 2011 08:31:53 +0000 Subject: [PATCH] * keep maximum used evaluation stack size up-to-date when putting a default return value on the stack for fpu routines git-svn-id: branches/jvmbackend@18744 - --- compiler/jvm/hlcgcpu.pas | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/compiler/jvm/hlcgcpu.pas b/compiler/jvm/hlcgcpu.pas index d3f8907cfc..c4e91c84ef 100644 --- a/compiler/jvm/hlcgcpu.pas +++ b/compiler/jvm/hlcgcpu.pas @@ -824,9 +824,15 @@ implementation R_FPUREGISTER: case tfloatdef(resdef).floattype of s32real: - list.concat(taicpu.op_none(a_fconst_0)); + begin + list.concat(taicpu.op_none(a_fconst_0)); + incstack(list,1); + end; s64real: - list.concat(taicpu.op_none(a_dconst_0)); + begin + list.concat(taicpu.op_none(a_dconst_0)); + incstack(list,2); + end; else internalerror(2011010302); end