testprocblanklines.out

来自「格式化源码的最新板」· OUT 代码 · 共 24 行

unit testprocblanklines;

interface

implementation

procedure foo;

  function bar: boolean;
  begin
    Result := False;
  end;

begin
  begin
  end;
end;

procedure fish;
begin
end;

end.