Browse Source

* wrong testregisters32 placement corrected

pierre 26 years ago
parent
commit
87847fac70
1 changed files with 5 additions and 2 deletions
  1. 5 2
      compiler/pass_2.pas

+ 5 - 2
compiler/pass_2.pas

@@ -270,8 +270,8 @@ implementation
             oldcodegenerror:=codegenerror;
             oldlocalswitches:=aktlocalswitches;
             oldpos:=aktfilepos;
-            testregisters32;
 {$ifdef TEMPREGDEBUG}
+            testregisters32;
             prevp:=curptree;
             curptree:=@p;
             p^.usableregs:=usablereg32;
@@ -664,7 +664,10 @@ implementation
 end.
 {
   $Log$
-  Revision 1.32  1999-08-23 23:25:59  pierre
+  Revision 1.33  1999-08-24 09:07:04  pierre
+   * wrong testregisters32 placement corrected
+
+  Revision 1.32  1999/08/23 23:25:59  pierre
     + TEMPREGDEBUG code, test of register allocation
       if a tree uses more than registers32 regs then
       internalerror(10) is issued