Browse Source

* fixed indentation

git-svn-id: trunk@22255 -
Jonas Maebe 13 years ago
parent
commit
33f5de990d
2 changed files with 14 additions and 14 deletions
  1. 8 8
      compiler/nadd.pas
  2. 6 6
      compiler/nutils.pas

+ 8 - 8
compiler/nadd.pas

@@ -535,14 +535,14 @@ implementation
               t:=Cordconstnode.create(1,pasbool8type,true)
               t:=Cordconstnode.create(1,pasbool8type,true)
             else
             else
               t:=Cordconstnode.create(0,pasbool8type,true);
               t:=Cordconstnode.create(0,pasbool8type,true);
-              { don't do this optimization, if the variable expression might
-                have a side effect }
-              if (is_constintnode(left) and might_have_sideeffects(right)) or
-                (is_constintnode(right) and might_have_sideeffects(left)) then
-                t.free
-              else
-                result:=t;
-              exit;
+            { don't do this optimization, if the variable expression might
+              have a side effect }
+            if (is_constintnode(left) and might_have_sideeffects(right)) or
+              (is_constintnode(right) and might_have_sideeffects(left)) then
+              t.free
+            else
+              result:=t;
+            exit;
           end;
           end;
 
 
         { Add,Sub,Mul with constant 0, 1 or -1?  }
         { Add,Sub,Mul with constant 0, 1 or -1?  }

+ 6 - 6
compiler/nutils.pas

@@ -137,12 +137,12 @@ implementation
       begin
       begin
         result:=res;
         result:=res;
         case n.nodetype of
         case n.nodetype of
-        asn:
-          if assigned(tasnode(n).call) then
-            begin
-              result := foreachnode(procmethod,tasnode(n).call,f,arg);
-              exit
-            end;
+          asn:
+            if assigned(tasnode(n).call) then
+              begin
+                result := foreachnode(procmethod,tasnode(n).call,f,arg);
+                exit
+              end;
           calln:
           calln:
             begin
             begin
               result := foreachnode(procmethod,tnode(tcallnode(n).callinitblock),f,arg) or result;
               result := foreachnode(procmethod,tnode(tcallnode(n).callinitblock),f,arg) or result;