diff --git a/compiler/ncnv.pas b/compiler/ncnv.pas index c4e3d782dc..6a29c86e58 100644 --- a/compiler/ncnv.pas +++ b/compiler/ncnv.pas @@ -893,7 +893,8 @@ implementation begin result:=nil; if (left.nodetype=stringconstn) and - ((tstringdef(left.resultdef).stringtype<>st_widestring) or + ((not is_widechararray(left.resultdef) and + not is_widestring(left.resultdef)) or (tstringdef(resultdef).stringtype=st_widestring) or { non-ascii chars would be replaced with '?' -> loses info } not hasnonasciichars(pcompilerwidestring(tstringconstnode(left).value_str))) then