Pārlūkot izejas kodu

+ pointerconstn is also a constant node

git-svn-id: trunk@26305 -
florian 11 gadi atpakaļ
vecāks
revīzija
880201e56c
1 mainītis faili ar 1 papildinājumiem un 1 dzēšanām
  1. 1 1
      compiler/node.pas

+ 1 - 1
compiler/node.pas

@@ -659,7 +659,7 @@ implementation
 
     function is_constnode(p : tnode) : boolean;
       begin
-        is_constnode:=(p.nodetype in [niln,ordconstn,realconstn,stringconstn,setconstn,guidconstn]);
+        is_constnode:=(p.nodetype in [niln,ordconstn,realconstn,stringconstn,setconstn,pointerconstn,guidconstn]);
       end;