CirioBreakAccess.mesa
Copyright Ó 1991 by Xerox Corporation. All rights reserved.
Sturgis, January 12, 1990 11:09:36 am PST
Peter B. Kessler, July 30, 1990 11:58 am PDT
Spreitze, June 6, 1991 2:20 pm PDT
Philip James, January 4, 1991 10:08 am PST
Udagawa, February 12, 1991 6:53 pm PST
Jas, September 2, 1992 1:23 pm PDT
DIRECTORY
CirioNubAccess USING[Handle],
BreakWorldArchitecture USING [BreakWorld],
Rope USING[ROPE],
MIPSArchitecture,
SourceFileOpsExtras USING [Position];
CirioBreakAccess:
CEDAR
DEFINITIONS =
BEGIN
CirioBreakSet: TYPE = REF CirioBreakSetBody;
CirioBreakSetBody: TYPE;
QuaBreakSet:
PROC [
REF
ANY]
RETURNS [is:
BOOL, it: CirioBreakSet];
(NOT is) => (it = NIL).
CreateCirioBreakSet:
PROC[nub: CirioNubAccess.Handle, fileNameStem: Rope.
ROPE, breakProcName: Rope.
ROPE]
RETURNS[CirioBreakSet];
the breakProcName should be as it appears in a Mesa file.
(Foo, not 𡤏oo←P60)
planted breaks will invoke a call on the named procedure
BreakWorldFromBreakSet:
PUBLIC
PROC[breaks: CirioBreakSet]
RETURNS [BreakWorldArchitecture.BreakWorld];
For extracting the break world procedures from a CirioBreakSet.
SetBreakAtAbsAddr: PROC[breaks: CirioBreakSet, cardAddress: CARD32, mesaPos: SourceFileOpsExtras.Position, stopAll: BOOLEAN];
ListBreaks:
PROC[breaks: CirioBreakSet];
calls SystemInterface.ShowReport for each break
ClearBreakAtAbsAddr: PROC[breaks: CirioBreakSet, cardAddress: CARD32];
ClearBreakAtIndex: PROC[breaks: CirioBreakSet, index: CARD];
ClearAllBreaks: PROC[breaks: CirioBreakSet];
BreakSetBroken: PROC [CirioBreakSet] RETURNS [BOOL];
END..