浏览代码

* nicer error message

florian 2 年之前
父节点
当前提交
9a760db573
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      compiler/htypechk.pas

+ 1 - 1
compiler/htypechk.pas

@@ -937,7 +937,7 @@ implementation
             { exit when no overloads are found }
             if (result=0) and generror then
               begin
-                CGMessage3(parser_e_operator_not_overloaded_3,ld.typename,arraytokeninfo[optoken].str,rd.typename);
+                CGMessage3(parser_e_operator_not_overloaded_3,ld.GetTypeName,arraytokeninfo[optoken].str,rd.GetTypeName);
                 candidates.free;
                 ppn.free;
                 ppn:=nil;