* fixed error message for attempts to initialise typed const

classes/interfaces (mantis 8006)

git-svn-id: trunk@5676 -
This commit is contained in:
Jonas Maebe 2006-12-22 14:12:26 +00:00
parent 8b73c85df2
commit 24ba57fe91

View File

@ -922,7 +922,7 @@ implementation
n:=comp_expr(true);
if n.nodetype<>niln then
begin
Message(type_e_no_const_packed_array);
Message(parser_e_type_const_not_possible);
consume_all_until(_SEMICOLON);
end
else