paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-14 07:09:23 +02:00
Code Issues Packages Projects Releases Wiki Activity

* typenode doesn't generate code, give error in pass_1 instead of

Browse Source 
getting an abstract methode runtime error
This commit is contained in:
peter 2001-05-09 19:57:51 +00:00
parent 8bf13fd185
commit b45dde5c74
1 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
compiler/nld.pas
View File

@ -730,6 +730,9 @@ implementation
function ttypenode.pass_1 : tnode; function ttypenode.pass_1 : tnode;
begin begin
result:=nil; 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; end;
@ -749,7 +752,11 @@ begin
end. end.
{ {
$Log$ $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 * move more code from loadnode.pass_1 to det_resulttype
Revision 1.14 2001/04/13 01:22:10 peter Revision 1.14 2001/04/13 01:22:10 peter