Просмотр исходного кода

+ propagate also widechar/pointer constants

florian 1 год назад
Родитель
Сommit
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