From 8cb716ca563660656b6aa8f6bc2c25f914ac2140 Mon Sep 17 00:00:00 2001
From: Jonas Maebe <jonas@freepascal.org>
Date: Fri, 5 Dec 2003 22:53:28 +0000
Subject: [PATCH]   * fixed load_ref_reg for source > dest size

---
 compiler/powerpc/cgcpu.pas | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/compiler/powerpc/cgcpu.pas b/compiler/powerpc/cgcpu.pas
index 9291d3afd8..8f3f709755 100644
--- a/compiler/powerpc/cgcpu.pas
+++ b/compiler/powerpc/cgcpu.pas
@@ -523,7 +523,7 @@ const
           freereg := fixref(list,ref2);
           { the caller is expected to have adjusted the reference already }
           { in this case                                                  }
-          if (fromsize > tosize) then
+          if (TCGSize2Size[fromsize] > TCGSize2Size[tosize]) then
             fromsize := tosize;
           op := loadinstr[fromsize,ref2.index<>NR_NO,false];
           a_load_store(list,op,reg,ref2);
@@ -2451,7 +2451,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.140  2003-12-04 20:37:02  jonas
+  Revision 1.141  2003-12-05 22:53:28  jonas
+    * fixed load_ref_reg for source > dest size
+
+  Revision 1.140  2003/12/04 20:37:02  jonas
     * fixed some int<->boolean type conversion issues
 
   Revision 1.139  2003/11/30 11:32:12  jonas