Переглянути джерело

+ propagate also widechar/pointer constants

florian 1 рік тому
батько
коміт
b3c1f294ba
1 змінених файлів з 2 додано та 0 видалено
  1. 2 0
      compiler/optconstprop.pas

+ 2 - 0
compiler/optconstprop.pas

@@ -346,6 +346,8 @@ unit optconstprop;
                        (is_constintnode(a.right) or
                         is_constboolnode(a.right) or
                         is_constcharnode(a.right) or
+                        is_constwidecharnode(a.right) or
+                        is_constwidestringnode(a.right) or
                         is_constenumnode(a.right) or
                         is_conststringnode(a.right) or
                         is_constpointernode(a.right)) then