Procházet zdrojové kódy

* use svalue to compare with -1

git-svn-id: trunk@9519 -
peter před 18 roky
rodič
revize
13ca601510
1 změnil soubory, kde provedl 2 přidání a 2 odebrání
  1. 2 2
      compiler/nadd.pas

+ 2 - 2
compiler/nadd.pas

@@ -458,7 +458,7 @@ implementation
                    result := left.getcopy;
                 end;
               end
-            else if tordconstnode(right).value = -1 then
+            else if tordconstnode(right).value.svalue = -1 then
               begin
                 case nodetype of
                   muln:
@@ -488,7 +488,7 @@ implementation
                    result := right.getcopy;
                 end;
               end
-            else if tordconstnode(left).value = -1 then
+            else if tordconstnode(left).value.svalue = -1 then
               begin
                 case nodetype of
                   muln: