(*
    Title: 	Secretary manifests
    LastEdit:	"Thu Feb 25 17:51:59 1988"
    Author: 	Derek McAuley
		Cambridge University Computer Laboratory
*)

DEFINITION MODULE Sec;

IMPORT Cfr;

EXPORT QUALIFIED 
  Name, StubName,
  Address, Maxnamelength, Maxattrlength, Maxloclength, Maxmessagelength,
  Maxuserlength,
  Secretary, SBlock, RC;

CONST
  Name = "CFRSecretary";
  StubName = "CFRSecretaryStub";
  Address = Cfr.SecretaryAddress;
  Maxnamelength = 255;
  Maxattrlength = 255;
  Maxloclength = 255;
  Maxmessagelength = 255;
  Maxuserlength = 500;
  
TYPE
  Secretary = (Allocate, AllocateAck, Reboot, RebootAck);
  SBlock = (Type, Arg1, Arg2, Arg3, Arg4, Arg5, Arg6);
  RC = (Success, Unknownstation, UnknownAddress, UnknownService, 
        ServiceExists, BadServicem, Rejected, StubError, 
        NoFreeSessions, InvalidSession);
  
END Sec.
