mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-30 15:20:35 +02:00
* another error message changed into a better one
git-svn-id: trunk@46947 -
This commit is contained in:
parent
a71f87357d
commit
df6baa888b
@ -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);
|
||||
|
Loading…
Reference in New Issue
Block a user