From b784b2f39e383c368c229abbeb7a1a59eaa5a3e7 Mon Sep 17 00:00:00 2001 From: Jonas Maebe Date: Mon, 29 May 2006 20:26:06 +0000 Subject: [PATCH] * fixed a_load_subsetreg_reg for loading signed fields (EXTRDI results in an unsigned number) git-svn-id: trunk@3739 - --- compiler/powerpc64/cgcpu.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/compiler/powerpc64/cgcpu.pas b/compiler/powerpc64/cgcpu.pas index b97ddd74ae..fbf7931261 100644 --- a/compiler/powerpc64/cgcpu.pas +++ b/compiler/powerpc64/cgcpu.pas @@ -898,7 +898,7 @@ begin a_load_reg_reg(list, subsetsize, tosize, subsetreg, destreg); // extend sign (actually only required for signed subsets...) and if that subset isn't >= real size - a_load_reg_reg(list, subsetsize, tosize, destreg, destreg); + a_load_reg_reg(list, tcgsize2unsigned[subsetsize], tosize, destreg, destreg); end; procedure tcgppc.a_load_reg_subsetreg(list : TAsmList; fromsize: tcgsize; subsetregsize,