浏览代码

* pchar +/- <array of char> is allowed as well

git-svn-id: trunk@1277 -
florian 20 年之前
父节点
当前提交
c1f1424640
共有 1 个文件被更改,包括 2 次插入2 次删除
  1. 2 2
      compiler/nadd.pas

+ 2 - 2
compiler/nadd.pas

@@ -1089,9 +1089,9 @@ implementation
          else if (
                   (rd.deftype=pointerdef) and (ld.deftype=pointerdef)
                  ) or
-                 { compare pchar to char arrays by addresses like BP/Delphi }
+                 { compare/add pchar to char arrays by addresses like BP/Delphi }
                  (
-                  (nodetype in [equaln,unequaln]) and
+                  (nodetype in [equaln,unequaln,subn,addn]) and
                   (
                    ((is_pchar(ld) or (lt=niln)) and is_chararray(rd)) or
                    ((is_pchar(rd) or (rt=niln)) and is_chararray(ld))