testuseschanges.out

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

unit TestUsesChanges;

{ AFS 28 March 2000
 This unit compiles but is not semantically meaningfull
 it is test cases for the code formatting utility

 This unit tests comments the uses clause
}

interface

uses SysUtils, ComCtrls, Classes, Windows,
  Fred, Jim, Bob;

implementation

uses Peter, Paul, Ralph;

end.