浏览代码

* another error message changed into a better one

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

+ 1 - 1
compiler/ngtcon.pas

@@ -860,7 +860,7 @@ function get_next_varsym(def: tabstractrecorddef; const SymList:TFPHashObjectLis
                 end
               else
                 begin
-                  IncompatibleTypes(node.resultdef, def);
+                  Message(parser_e_illegal_expression);
                   datadef:=carraydef.getreusable(cansichartype,1);
                 end;
               ftcb.finish_internal_data_builder(datatcb,ll,datadef,varalign);