From 137395876d7b24acfcbe0e48d357bb403973c84e Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Thu, 15 May 2003 22:14:42 +0000
Subject: [PATCH]   * fixed last commit, changing lastsaveintreg to r31 caused
 some strange problems

---
 compiler/powerpc/cgcpu.pas   | 11 +++++++----
 compiler/powerpc/cpubase.pas |  7 +++++--
 2 files changed, 12 insertions(+), 6 deletions(-)

diff --git a/compiler/powerpc/cgcpu.pas b/compiler/powerpc/cgcpu.pas
index 18f8e42ef5..7da8c99839 100644
--- a/compiler/powerpc/cgcpu.pas
+++ b/compiler/powerpc/cgcpu.pas
@@ -998,7 +998,7 @@ const
 
         usesgpr:=false;
         if not (po_assembler in current_procdef.procoptions) then
-          for regcounter2:=firstsaveintreg to lastsaveintreg do
+          for regcounter2:=firstsaveintreg to RS_R31 do
             begin
               if regcounter2 in rg.usedintbyproc then
                 begin
@@ -1181,7 +1181,7 @@ const
 
         usesgpr:=false;
         if not (po_assembler in current_procdef.procoptions) then
-          for regcounter2:=firstsaveintreg to lastsaveintreg do
+          for regcounter2:=firstsaveintreg to RS_R31 do
             begin
               if regcounter2 in rg.usedintbyproc then
                 begin
@@ -1281,7 +1281,7 @@ const
 
       usesgpr:=false;
       if not (po_assembler in current_procdef.procoptions) then
-        for regcounter2:=firstsaveintreg to lastsaveintreg do
+        for regcounter2:=firstsaveintreg to RS_R31 do
           begin
             if regcounter2 in rg.usedintbyproc then
               begin
@@ -2392,7 +2392,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.92  2003-05-15 21:37:00  florian
+  Revision 1.93  2003-05-15 22:14:42  florian
+    * fixed last commit, changing lastsaveintreg to r31 caused some strange problems
+
+  Revision 1.92  2003/05/15 21:37:00  florian
     * sysv entry code saves r13 now as well
 
   Revision 1.91  2003/05/15 19:39:09  florian
diff --git a/compiler/powerpc/cpubase.pas b/compiler/powerpc/cpubase.pas
index 44335b6dc9..939eeac195 100644
--- a/compiler/powerpc/cpubase.pas
+++ b/compiler/powerpc/cpubase.pas
@@ -525,7 +525,7 @@ uses
 
 
       firstsaveintreg = RS_R13;
-      lastsaveintreg  = RS_R31;
+      lastsaveintreg  = RS_R27;
       firstsavefpureg = R_F14;
       lastsavefpureg  = R_F31;
       { no altivec support yet. Need to override tcgobj.a_loadmm_* first in tcgppc }
@@ -852,7 +852,10 @@ implementation
 end.
 {
   $Log$
-  Revision 1.49  2003-05-15 21:37:00  florian
+  Revision 1.50  2003-05-15 22:14:43  florian
+    * fixed last commit, changing lastsaveintreg to r31 caused some strange problems
+
+  Revision 1.49  2003/05/15 21:37:00  florian
     * sysv entry code saves r13 now as well
 
   Revision 1.48  2003/04/23 12:35:35  florian