paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-09 07:28:26 +02:00
Code Issues Packages Projects Releases Wiki Activity

merge r14140 from cpstrnew branch by paul:

Browse Source 
prefer exact string const matches

git-svn-id: trunk@19096 -
This commit is contained in:
paul 2011-09-17 11:48:18 +00:00
parent ad8195e9ae
commit 8f3f583199
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/defcmp.pas
View File

@ -346,7 +346,7 @@ implementation
else if tstringdef(def_to).stringtype in [st_widestring,st_unicodestring] then
eq:=te_convert_l2
else
eq:=te_equal;
eq:=te_convert_l1;
end;
end
else