DIRECTORY Menus USING [Menu], Rope USING [ROPE], ViewerClasses USING [Viewer]; WalnutExtras: CEDAR DEFINITIONS = BEGIN ROPE: TYPE = Rope.ROPE; InitialNotifyLabel: PUBLIC ROPE; DoWaitCall: PROC[proc: PROC[REF ANY], ra: REF ANY_ NIL]; NotifyIfAppropriate: PROC[ra: REF ANY]; ExpungeProc: PROC[ra: REF ANY]; DumpProc: PROC[ra: REF ANY]; RetrieveNewMailProc: PROC[ra: REF ANY]; ScavengeProc: PROC[ra: REF ANY]; ReadMailProc: PROC[ra: REF ANY]; ChangeDBProc: PROC[ra: REF ANY]; InternalNewMail: PROC; DoScavenge: PROC[startPos: INT]; DoExpunge: PROC[doUpdates, tailRewrite: BOOL]; ChangeWalnutMenu: PROC[newMenu: Menus.Menu]; InternalChangeMenu: PROC[newMenu: Menus.Menu]; TakeDownWalnutViewers: PROC; ClearMsgSetDisplayers: PROC; SetWalnutIcons: PROC[file: ROPE]; EnumWalnutViewers: PROC[keepSeparate: BOOL] RETURNS [msgSetList, msgList, queryList: LIST OF ViewerClasses.Viewer]; LoadBcdForWalnut: PROC[who: ROPE] RETURNS[ok: BOOL]; EstablishFileNames: PROC[sName, lName: ROPE] RETURNS[segName, logName: ROPE, logIsAlp: BOOL]; ChangeDatabase: PROC[ra: REF ANY]; OpenTS: PROC[msg: ROPE_ NIL, doRegister: BOOL_ TRUE]; CloseTS: PROC[]; CheckForAutoCommit: PROC[]; END. âWalnutExtras.Mesa Last Edited by: Willie-Sue, June 25, 1984 3:25:03 pm PDT * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * if ra is a WalnutQueueEntry THEN does a NOTIFY on its condition variable ĘטJ˜Jšœ™J˜Jšœ8™8J˜šĎk ˜ Jšœœ˜Jšœœœ˜Jšœœ ˜J˜—Jšœœ œ˜!J˜Jš˜J˜Jšœœ œ˜Jšœœœ˜ J˜JšœG™GJšĎn œœœœœœœœ˜8J˜Jšžœœœœ˜'JšœH™HJ˜Jšž œœœœ˜J˜Jšžœœœœ˜J˜Jšžœœœœ˜'J˜Jšž œœœœ˜ J˜Jšž œœœœ˜ J˜Jšž œœœœ˜ J˜Jšžœœ˜J˜Jšž œœ œ˜ J˜Jšž œœœ˜.J˜Jšžœœ˜,J˜Jšžœœ˜.J˜Jšžœœ˜J˜Jšžœœ˜J˜Jšžœœœ˜!J˜šžœœœ˜+Jšœ"œœ˜HJ˜—Jš žœœœœœ˜4J˜šžœœœ˜,Jšœœ œ˜0J˜—Jšžœœœœ˜"J˜Jš žœœœœœœ˜5J˜Jšžœœ˜J˜Jšžœœ˜J˜Jšœ˜J˜—…—Žg