ADTPair

A Pair is a templated type which allows to store two types as a single unit.

Types

HashProc* = PROCEDURE(first- : First;

Vars

hash* : HashProc;

equal* : EqualProc;

compare* : CompareProc;

Procedures

Hash

Hash pair

PROCEDURE Hash*(pair- : Pair): LENGTH;

Equal

Equal pair

PROCEDURE Equal*(left-, right- : Pair): BOOLEAN;

Compare

Compare pair

PROCEDURE Compare*(left-, right- : Pair): INTEGER;