Browse Source

* fixed wrong check in r10432 causing an internalerror for ppc/ppc64

git-svn-id: trunk@10433 -
Jonas Maebe 17 years ago
parent
commit
7524d9f8ca
1 changed files with 2 additions and 1 deletions
  1. 2 1
      compiler/ppcgen/ngppcadd.pas

+ 2 - 1
compiler/ppcgen/ngppcadd.pas

@@ -384,7 +384,8 @@ implementation
 
         { when a setdef is passed, it has to be a smallset }
         if not is_smallset(left.resultdef) or
-           not is_smallset(right.resultdef) then
+           (not is_smallset(right.resultdef) and
+            (right.nodetype<>setelementn)) then
          internalerror(200203301);
 
         opdone := false;