Преглед на файлове

+ pointerconstn is also a constant node

git-svn-id: trunk@26305 -
florian преди 11 години
родител
ревизия
880201e56c
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  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;