A Longint.T is a LONGINT. This interface is intended to be
used to instantiate generic interfaces and modules such as Table
and List.
INTERFACELongint ; IMPORT Long; TYPE T = LONGINT; CONST Brand = "Longint"; PROCEDURE Equal(a, b: T): BOOLEAN;
Return a = b. PROCEDURE Hash(a: T): Long.T;
Return a. PROCEDURE Compare(a, b: T): [-1..1];
Return-1ifa < b,0ifa = b, or+1ifa > b.
END Longint.