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

* set nf_internal for nodes being generated by constant folding

git-svn-id: trunk@34800 -
florian преди 9 години
родител
ревизия
ef81009362
променени са 1 файла, в които са добавени 1 реда и са изтрити 0 реда
  1. 1 0
      compiler/nadd.pas

+ 1 - 0
compiler/nadd.pas

@@ -560,6 +560,7 @@ implementation
                else
                  internalerror(2008022101);
              end;
+             include(t.flags,nf_internal);
              result:=t;
              exit;
           end