fpc/tests/tbs/tb0456.pp
2003-10-01 19:04:11 +00:00

12 lines
157 B
ObjectPascal

{$ifdef fpc}{$mode delphi}{$endif}
type
c=class
function Byte: Byte; virtual; abstract;
function P(b: Byte); virtual; abstract;
end;
begin
end.