From b7a8dd9479f550b99b902cf61a719bd3da44f0c1 Mon Sep 17 00:00:00 2001
From: svenbarth <pascaldragon@googlemail.com>
Date: Fri, 12 Jul 2019 22:08:17 +0000
Subject: [PATCH] * adjust error message when attributes are unbound

git-svn-id: trunk@42410 -
---
 compiler/msg/errore.msg | 8 ++++----
 compiler/pdecl.pas      | 2 +-
 2 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/compiler/msg/errore.msg b/compiler/msg/errore.msg
index 5b7dffff0f..e42badb145 100644
--- a/compiler/msg/errore.msg
+++ b/compiler/msg/errore.msg
@@ -146,7 +146,7 @@ general_t_unitscope=01027_T_Using unit scope: $1
 #
 # Scanner
 #
-# 02106 is the last used one
+# 02105 is the last used one
 #
 % \section{Scanner messages.}
 % This section lists the messages that the scanner emits. The scanner takes
@@ -432,13 +432,11 @@ scan_w_setpeosversion_not_support=02103_W_SETPEOSVERSION is not supported by the
 scan_w_setpesubsysversion_not_support=02104_W_SETPESUBSYSVERSION is not supported by the target OS
 % The \var{\{\$SETPESUBSYSVERSION\}} directive is not supported by the target OS.
 scan_n_changecputype=02105_N_Changed CPU type to be consistent with specified controller
-scan_e_unresolved_attribute=02106_E_Unresolved custom attribute: "$1".
-% A custom attribute is defined, but there is no identifier to bind it to.
 % \end{description}
 #
 # Parser
 #
-# 03348 is the last used one
+# 03350 is the last used one
 #
 % \section{Parser messages}
 % This section lists all parser messages. The parser takes care of the
@@ -1585,6 +1583,8 @@ parser_w_operator_overloaded_hidden_3=03347_W_Operator overload hidden by intern
 parser_e_threadvar_must_be_class=03348_E_Thread variables inside classes or records must be class variables
 % A \var{threadvar} section inside a class or record was started without it being prefixed by \var{class}.
 parser_e_only_static_members_via_object_type=03349_E_Only static methods and static variables can be referenced through an object type
+parser_e_unbound_attribute=03350_E_Unbound custom attribute: "$1".
+% A custom attribute is defined, but there is no identifier to bind it to.
 % This error occurs in a situation like the following:
 % \begin{verbatim}
 % Type
diff --git a/compiler/pdecl.pas b/compiler/pdecl.pas
index 1be53ed955..dad6f257ef 100644
--- a/compiler/pdecl.pas
+++ b/compiler/pdecl.pas
@@ -1088,7 +1088,7 @@ implementation
              had_generic:=false;
            first:=false;
            if assigned(rtti_attrs_def) and (rtti_attrs_def.get_attribute_count>0) then
-             Message1(scan_e_unresolved_attribute,trtti_attribute(rtti_attrs_def.rtti_attributes[0]).typesym.prettyname);
+             Message1(parser_e_unbound_attribute,trtti_attribute(rtti_attrs_def.rtti_attributes[0]).typesym.prettyname);
 
          until ((token<>_ID) and (token<>_LECKKLAMMER)) or
                (in_structure and