Explorar el Código

* hopefully fixed bug tb0454 (merged from nppcadd)

Jonas Maebe hace 21 años
padre
commit
7de6463c43
Se han modificado 1 ficheros con 12 adiciones y 5 borrados
  1. 12 5
      compiler/ncgadd.pas

+ 12 - 5
compiler/ncgadd.pas

@@ -99,7 +99,7 @@ interface
         if (left.nodetype=ordconstn) then
           swapleftright;
 
-        isjump:=(left.location.loc=LOC_JUMP);
+        isjump:=(left.expectloc=LOC_JUMP);
         if isjump then
           begin
              otl:=truelabel;
@@ -114,14 +114,16 @@ interface
           begin
             truelabel:=otl;
             falselabel:=ofl;
-          end;
+          end
+        else
+          internalerror(2003122901);
 
         { are too few registers free? }
         if left.location.loc=LOC_FPUREGISTER then
           pushedfpu:=maybe_pushfpu(exprasmlist,right.registersfpu,left.location)
         else
           pushedfpu:=false;
-        isjump:=(right.location.loc=LOC_JUMP);
+        isjump:=(right.expectloc=LOC_JUMP);
         if isjump then
           begin
              otl:=truelabel;
@@ -136,7 +138,9 @@ interface
           begin
             truelabel:=otl;
             falselabel:=ofl;
-          end;
+          end
+        else
+          internalerror(2003122902);
         if pushedfpu then
           begin
             tmpreg := cg.getfpuregister(exprasmlist,left.location.size);
@@ -749,7 +753,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.24  2003-12-23 14:38:07  florian
+  Revision 1.25  2003-12-29 11:37:52  jonas
+    * hopefully fixed bug tb0454 (merged from nppcadd)
+
+  Revision 1.24  2003/12/23 14:38:07  florian
     + second_floataddsse implemented
 
   Revision 1.23  2003/12/21 11:28:41  daniel