mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-20 21:29:26 +02:00
* typenode doesn't generate code, give error in pass_1 instead of
getting an abstract methode runtime error
This commit is contained in:
parent
8bf13fd185
commit
b45dde5c74
@ -730,6 +730,9 @@ implementation
|
||||
function ttypenode.pass_1 : tnode;
|
||||
begin
|
||||
result:=nil;
|
||||
{ a typenode can't generate code, so we give here
|
||||
an error. Else it'll be an abstract error in pass_2 }
|
||||
Message(parser_e_no_type_not_allowed_here);
|
||||
end;
|
||||
|
||||
|
||||
@ -749,7 +752,11 @@ begin
|
||||
end.
|
||||
{
|
||||
$Log$
|
||||
Revision 1.15 2001-04-14 14:06:31 peter
|
||||
Revision 1.16 2001-05-09 19:57:51 peter
|
||||
* typenode doesn't generate code, give error in pass_1 instead of
|
||||
getting an abstract methode runtime error
|
||||
|
||||
Revision 1.15 2001/04/14 14:06:31 peter
|
||||
* move more code from loadnode.pass_1 to det_resulttype
|
||||
|
||||
Revision 1.14 2001/04/13 01:22:10 peter
|
||||
|
Loading…
Reference in New Issue
Block a user