Паскаль / do11 / tmtp390d / SOURCE / USE16

(****************************************************************)
(* *)
(* TMT Pascal 4 Runtime Library *)
(* 16-bit Types *)
(* Targets: MS-DOS, OS/2, Win32 *)
(* *)
(* Copyright (c) 1995, 2001 TMT Development Corporation *)
(* Author: Vadim Bodrov *)
(* *)
(****************************************************************)


unit Use16;

interface

type
Integer = System.SmallInt;
PInteger = ^System.SmallInt;

const
MAXINT = High(System.SmallInt);
MAXINTEGER = High(System.SmallInt);
MININT = Low(System.SmallInt);
MININTEGER = Low(System.SmallInt);

implementation

end.