Created by Susan Owicki Last modified on Wed Feb 10 09:12:31 PST 1993 by owicki
INTERFACE* EXCEPTION Error(TEXT); *StubUtils ; IMPORT Atom, Wr;
EXCEPTION Failure; VAR perfMon: BOOLEAN; VAR stubchatter: Wr.T; PROCEDURE Message(text: TEXT);
Writetext
on writerstubchatter
, preceeded bystubgen: and followed by a newline
PROCEDURE Die(text: TEXT);
Writetext
on writerstubchatter
, preceeded bystubgen: and followed by a newline, then die
PROCEDURE SetPerfMon(flag: BOOLEAN);
Set flag to indicate whether stubs should include performance monitoring code
PROCEDURE FileName(typeName: Atom.T): TEXT; END StubUtils.