mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-20 21:09:24 +02:00
* better error message in case of illegal nodes for string constants, resolves #34054
git-svn-id: trunk@46931 -
This commit is contained in:
parent
5cde0fc1e2
commit
dfc485c4f4
@ -909,7 +909,7 @@ function get_next_varsym(def: tabstractrecorddef; const SymList:TFPHashObjectLis
|
||||
end;
|
||||
end
|
||||
else
|
||||
IncompatibleTypes(node.resultdef, def);
|
||||
Message(parser_e_illegal_expression);
|
||||
end
|
||||
else
|
||||
if (node.nodetype=addrn) or
|
||||
|
Loading…
Reference in New Issue
Block a user