2
0
Эх сурвалжийг харах

* write correct type name in error message

florian 1 жил өмнө
parent
commit
b7322ae4c3
1 өөрчлөгдсөн 1 нэмэгдсэн , 1 устгасан
  1. 1 1
      compiler/pstatmnt.pas

+ 1 - 1
compiler/pstatmnt.pas

@@ -968,7 +968,7 @@ implementation
                                unit_found:=try_consume_unitsym_no_specialize(srsym,srsymtable,t,[],objname);
                                if srsym=nil then
                                  begin
-                                   identifier_not_found(orgpattern);
+                                   identifier_not_found(objrealname);
                                    srsym:=generrorsym;
                                  end;
                                if unit_found then