* popstack missing in implementatio

This commit is contained in:
peter 2003-01-05 18:14:50 +00:00
parent bff0d3dd3e
commit 35dc8b860e

16
tests/tbf/tb0153.pp Normal file
View File

@ -0,0 +1,16 @@
{ %fail }
{$mode objfpc}
type
tcl=class
procedure m1;popstack;
end;
procedure tcl.m1;
begin
end;
begin
end.