Browse Source

* cast raise node only to a tertiary node in foreach, makes adding more tertiary nodes easier

git-svn-id: trunk@22096 -
florian 13 years ago
parent
commit
41e8da998c
1 changed files with 2 additions and 2 deletions
  1. 2 2
      compiler/nutils.pas

+ 2 - 2
compiler/nutils.pas

@@ -153,7 +153,7 @@ implementation
             end;
             end;
           raisen:
           raisen:
             { frame tree }
             { frame tree }
-            result := foreachnode(traisenode(n).third,f,arg) or result;
+            result := foreachnode(ttertiarynode(n).third,f,arg) or result;
           tempcreaten:
           tempcreaten:
             { temp. initialization code }
             { temp. initialization code }
             if assigned(ttempcreatenode(n).tempinfo^.tempinitcode) then
             if assigned(ttempcreatenode(n).tempinfo^.tempinitcode) then
@@ -250,7 +250,7 @@ implementation
             end;
             end;
           raisen:
           raisen:
             { frame tree }
             { frame tree }
-            result := foreachnodestatic(traisenode(n).third,f,arg) or result;
+            result := foreachnodestatic(ttertiarynode(n).third,f,arg) or result;
           tempcreaten:
           tempcreaten:
             { temp. initialization code }
             { temp. initialization code }
             if assigned(ttempcreatenode(n).tempinfo^.tempinitcode) then
             if assigned(ttempcreatenode(n).tempinfo^.tempinitcode) then