From 92b4c84dae5f9d13776e6e4528e46768bc2c9d08 Mon Sep 17 00:00:00 2001 From: Jonas Maebe Date: Tue, 10 Jul 2012 09:24:26 +0000 Subject: [PATCH] * fixed 'int64 shl/shr 0' on ppc32 git-svn-id: trunk@21841 - --- compiler/powerpc/nppcmat.pas | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/compiler/powerpc/nppcmat.pas b/compiler/powerpc/nppcmat.pas index 4c49448727..faa2050082 100644 --- a/compiler/powerpc/nppcmat.pas +++ b/compiler/powerpc/nppcmat.pas @@ -403,7 +403,13 @@ end; cg.a_load_const_reg(current_asmdata.CurrAsmList,OS_32,0,location.register64.reglo); cg.a_load_const_reg(current_asmdata.CurrAsmList,OS_32,0,location.register64.reglo); end - else } if shiftval > 31 then + else } + if shiftval = 0 then + begin + cg.a_load_reg_reg(current_asmdata.CurrAsmList,OS_32,OS_32,left.location.register64.reghi,location.register64.reghi); + cg.a_load_reg_reg(current_asmdata.CurrAsmList,OS_32,OS_32,left.location.register64.reglo,location.register64.reglo); + end + else if shiftval > 31 then begin if nodetype = shln then begin