littletest12.out

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

unit LittleTest12;

{ This unit compiles but is not semantically meaningfull
 it is test cases for the code formatting utility
}

interface

function Foo(): string;


implementation

function Foo(): string;
begin
  Result := 'Foo';
end;

end.