-- AlpineUserMiscBinderPacifierImpl.mesa
-- Last edited by
-- Kolling on April 27, 1983 3:16 pm

DIRECTORY
AlpineEnvironment,
ClientMap;

AlpineUserMiscBinderPacifierImpl: PROGRAM
EXPORTS ClientMap =

BEGIN

Conversation: TYPE = AlpineEnvironment.Conversation;
Principal: TYPE = AlpineEnvironment.Principal;

Register: PUBLIC PROCEDURE [conversation: Conversation, principal: Principal] = BEGIN ERROR; END;

END.