Pārlūkot izejas kodu

+ propagate also widechar/pointer constants

florian 1 gadu atpakaļ
vecāks
revīzija
b3c1f294ba
1 mainītis faili ar 2 papildinājumiem un 0 dzēšanām
  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