mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2026-02-03 18:45:29 +01:00
16 lines
192 B
ObjectPascal
16 lines
192 B
ObjectPascal
{$MODE objfpc}
|
|
unit bug856u;
|
|
interface
|
|
type
|
|
TMyClass = class
|
|
protected
|
|
constructor Create(x: Integer);
|
|
end;
|
|
|
|
implementation
|
|
|
|
constructor TMyClass.Create(x: Integer);
|
|
begin
|
|
end;
|
|
|
|
end. |