Copyright (C) 1994, Digital Equipment Corp.
Digital Internal Use Only
Created on Wed Jan 18 20:59:43 PST 1995 by najork
An Address.T is an ADDRESS. This interface is intended to be used to
instantiate generic interfaces and modules such as Table and List.
INTERFACEAddress ; IMPORT Word; CONST Brand = "Address-1.0"; TYPE T = ADDRESS; PROCEDURE Equal(a, b: T): BOOLEAN;
Return a = b. PROCEDURE Hash(a: T): Word.T;
ReturnLOOPHOLE(a, Word.T). This assumes thatADDRESSandINTEGERhave the same size.
PROCEDURE Compare(a, b: T): [-1..1];
Return-1ifa < b,0ifa = b, or+1ifa > b.
END Address.