(*
    Title: 	CFR interface
    LastEdit:	"Thu Feb 25 18:00:26 1988"
    Author: 	Derek McAuley
		Cambridge University Computer Laboratory
*)

DEFINITION MODULE Cfr;

IMPORT
  PktBufs, RPCBasics;
  
EXPORT QUALIFIED 
  SecretaryAddress, 
  secretaryPlace, isActive, 
  Send, RecV, Init;

CONST
  SecretaryAddress = 000ffh;


VAR
  secretaryPlace:RPCBasics.Place;
  isActive:BOOLEAN;
  
  
PROCEDURE Send(theirEnd:RPCBasics.CallEnd; pkt:PktBufs.T):RPCBasics.RC;

PROCEDURE RecV():PktBufs.T;

PROCEDURE Init();

END Cfr.
