littletest8.out

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

unit LittleTest8;

{ AFS 9 June 2003
 This unit compiles but is not semantically meaningfull
 it is test cases for the code formatting utility

 a minimal unit - test basic class }

interface

type
  TMyObject = class(TObject)
    Name: string;
  end;

implementation


end.