DIRECTORY
Breakpoint,
TargetArchitecture, 
Shepherd,
BreakWorldArchitecture,
Rope USING [ROPE];

BreakpointPrivate: CEDAR DEFINITIONS ~ {

Registry: TYPE = REF RegistryBody _ NIL;
RegistryBody: TYPE = RECORD[
SEQUENCE length: CARD OF TargetBreaks];
TargetBreaks: TYPE = REF TargetBreaksBody _ NIL;
TargetBreaksBody: TYPE = RECORD[
targetName: Rope.ROPE,
SetBreakpoint: SetBreakProcType,
ClearBreakpoint: ClearBreakProcType];

SetBreakProcType: TYPE ~ PROC[
address: BreakWorldArchitecture.Address, 
clientData: Breakpoint.ClientData, 
breakProc: Breakpoint.BreakProc, 
breakProcDataSegment: BreakWorldArchitecture.Address, 
breakData: Breakpoint.BreakData,
damages: TargetArchitecture.RegisterClass 
_ TargetArchitecture.RegisterClass.all] 
RETURNS [Breakpoint.Break];

ClearBreakProcType: TYPE ~ PROC[
break: Breakpoint.Break] RETURNS [];

RegisterTargetBreaks: PROC[targetBreaks: TargetBreaks];

RetrieveTargetBreaks: PROC[targetName: Rope.ROPE] RETURNS[TargetBreaks];
}.
   º  
BreakpointPrivate.mesa
Copyright Ó 1991, 1992 by Xerox Corporation.  All rights reserved.
Laurie Horton, October 8, 1991 4:28 pm PDT
Katsuyuki Komatsu March 5, 1992 1:25 pm PST


Êº  –"cedar" style•NewlineDelimiter
™ code™Kšœ
Ïrœ7™BKšœ*™*K™+—™ šÏk	˜	Kšœ˜Kšœ˜K˜	K˜Kšœžœžœ˜—K˜ —unitšÐlnœžœžœ˜(L˜ Kšœ
žœžœžœ˜(šœžœžœ˜Kšžœ	žœžœ˜'—Kšœžœžœžœ˜0šœžœžœ˜ Kšœžœ˜KšÏnœ˜ Kš œ˜%K˜ —šœžœžœ˜Kšœ)˜)Kšœ#˜#Kšœ!˜!Kšœ6˜6Kšœ ˜ šœ*˜*Kšœ(˜(—Kšžœ˜—K˜ šœžœžœ˜ Kšœžœ˜$K˜ —Lš œžœ˜7K˜ Kš œžœžœžœ˜HL˜K™ —— …—    Î  B  