path: root/tests/webtbf/tw1928.pp

{ %fail }

type
 tmethod = procedure (x: byte);

begin
 tmethod(get_static_method)(0);
end.