From dc00a747f49c25245087ec30b2a016b7f90dea3b Mon Sep 17 00:00:00 2001 From: Jonas Maebe Date: Tue, 26 May 2009 16:22:41 +0000 Subject: [PATCH] * make references PIC-safe before pushing them as parameter (mantis #13829) git-svn-id: trunk@13198 - --- compiler/i386/cgcpu.pas | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/compiler/i386/cgcpu.pas b/compiler/i386/cgcpu.pas index 5f86f8f082..dcb5eb6b7b 100644 --- a/compiler/i386/cgcpu.pas +++ b/compiler/i386/cgcpu.pas @@ -177,7 +177,10 @@ unit cgcpu; list.concat(taicpu.op_reg(A_PUSH,TCgsize2opsize[pushsize],tmpreg)); end else - list.concat(taicpu.op_ref(A_PUSH,TCgsize2opsize[pushsize],href)); + begin + make_simple_ref(list,href); + list.concat(taicpu.op_ref(A_PUSH,TCgsize2opsize[pushsize],href)); + end; end; var