-- Transport mechanism: module to prevent return to Alto executive! -- [Indigo]<Grapevine>MS>Sponge.mesa -- Andrew Birrell 29-Dec-81 13:41:10 -- Starting this module causes the process that does the starting to WAIT -- forever. Otherwise, Mesa.image would cause us to return to the Alto -- executive. Sponge: MONITOR = { c: CONDITION ← [timeout:0]; P: ENTRY PROC = { DO WAIT c ENDLOOP }; P[] }.