|
- unit uutlTypes;
-
- {$mode objfpc}{$H+}
-
- interface
-
- uses
- Classes, SysUtils;
-
- type
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- generic TutlArray<T> = array of T;
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- generic TutlPair<T1, T2> = packed record
- first: T1;
- second: T2;
- end;
-
- implementation
-
- end.
|