DIRECTORYBBObjectLocation USING [Location],IO USING [STREAM],PSB USING [PsbNull, PsbIndex],Rope USING [ROPE];SpyClient: DEFINITIONS = BEGINOPEN Rope;DataType: TYPE = {CPU, process, breakProcess, pagefaults, allocations, wordsAllocated, spaces, userDefined};-- common procedures --InitializeSpy: PROC[dataType: DataType _ CPU,process: PSB.PsbIndex _ PSB.PsbNull] -- only used if dataType = processRETURNS[errorMsg: ROPE]; -- errorMsg = NIL indicates successStandardSpy: PROC = INLINE {IF InitializeSpy[].errorMsg # NIL THEN ERROR};StartSpy: PROC; -- the spy records data whenever # starts exceeds # stops  StopSpy: PROC; -- you must StartSpy to enable breaks DisplayData: PROC[ -- automatically stops Spycutoff: CARDINAL _ 3, -- cutoff of printing (in percentage points)herald: ROPE _ NIL, -- client supplied herald (follows Cedar Spy of xxx)stream: IO.STREAM _ NIL]; -- a typescript is opened by default -- break procedures --SetStartBreak: PROC[-- spy will be started whenever this break is encounteredprocedure: ROPE _ NIL, -- of form "ModuleIMPL.Proc"; only used if loc = NILloc: BBObjectLocation.Location _ NIL] RETURNS[ok: BOOLEAN, msg: ROPE]; SetStopBreak: PROC[ -- spy will be stopped whenever this break is encounteredprocedure: ROPE _ NIL, -- sets a break at the EXIT of the procedure loc: BBObjectLocation.Location _ NIL]RETURNS[ok: BOOLEAN, msg: ROPE];ClearBreaks: PROC;SetUserBreak: PROC[ -- log a count whenever this break is encounteredprocedure: ROPE _ NIL, -- of form "ModuleImpl.Proc"; only used if loc = NILloc: BBObjectLocation.Location _ NIL]RETURNS[ok: BOOLEAN, msg: ROPE];ClearUserBreaks: PROC;END. .    |  SpyClient.mesaedited by:  Maxwell  March 21, 1983 10:25 amsee spy.doc for instructions on how to use this interfaceЭ╩e  Ш JШ JЪЬЩJЪЬ,Щ,JЪЬ9Щ9JШ Ъ╧k	Ш	JЪЬЭЬШ"JЪЭЬЭЬЭЬШJЪЭЬЭЬШJЪЬЭЬЭЬШJШ ЧЪЬЭЬЭШJШ ЧJЪЭЬШ
JШ JЪЬ
ЭЬЭЬWШlJШ JЪ╧cШJШ Ъ╧nЬЭЬШJЪЬЭЬШJЪЬ	ЭЬЭЬ
Ю"ШGJЪЭЬЭЬЮ#Ш<ЧJЪЯЬЭЬЭЬЭЬЭЬЭЬЭЬШJJШ JЪЯЬЭЬЮ;ШKJЪЯЬЭЬЮ&Ш5JШ ЪЯЬЭЬЮШ-JЪЬЭЬЮ,ШBJЪЬЭЬЭЬЮ4ШHJЪЬЭЬЭЬЭЬЮ%Ш?ЧJШ JЪЮШJШ ЪЯЬЭЬЮ9ШMJЪЬЭЬЭЬЮ4ШKJЪЬ!ЭЬШ&JЪЭЬЭЬЭЬШ!ЧЪЯЬЭЬЮ9ШMJЪЬЭЬЭЬЮ-ШDJЪЬ!ЭЬШ%JЪЭЬЭЬЭЬШ ЧJЪЯЬЭЬШJШ ЪЯЬЭЬЮ1ШEJЪЬЭЬЭЬЮ4ШKJЪЬ!ЭЬШ%JЪЭЬЭЬЭЬШ ЧJЪЯЬЭЬШJШ ЪЭЬШJШ ЧЧ ЕЧ    К  	k  