

<<Edited by Teitelman on April 5, 1983 8:08 pm>>
DIRECTORY
BBAction USING [Action],
BBBreak USING [BreakIndex, BreakId],
BBContext USING [Context],
BBVForUserExec USING [ReportProc],
IO USING [STREAM],
RTBasic USING [TV],
ViewerClasses USING [Viewer],
WorldVM USING [World]
;


BBVExtras: CEDAR DEFINITIONS  =

BEGIN

ReportProc: TYPE = BBVForUserExec.ReportProc;

ShowBreakPoint: PROCEDURE [break: BBBreak.BreakIndex, report: BBVForUserExec.ReportProc];
ClearSelectedBreakPoint: PROC [world: WorldVM.World, report: BBVForUserExec.ReportProc];
ClearActionBreakPoint: PROC [action: BBAction.Action, report: BBVForUserExec.ReportProc];   
ClearAllBreaks:  PROC [report: BBVForUserExec.ReportProc];
ShowSource: PROC [tv: RTBasic.TV, report: BBVForUserExec.ReportProc, onlyIfAlreadyOpen: BOOL _ FALSE];
WalkContext:  PROC [action: BBAction.Action, context: BBContext.Context, delta: INT, report: ReportProc] RETURNS [lf: RTBasic.TV];
ListBreaks: PROC [out: IO.STREAM];
PrintBreak:  PROC [out: IO.STREAM, break: BBBreak.BreakId];
DisplayLocalFrame:  PROC [out: IO.STREAM, lf: RTBasic.TV, report: BBVForUserExec.ReportProc, args, vars, allVars, globals, lfAndPc: 
BOOL _ FALSE];
SetBreakFromPosition: PROC[report: BBVForUserExec.ReportProc, viewer: ViewerClasses.Viewer, position: INT, world: WorldVM.World _ 
NIL, entry, exit: BOOL _ FALSE] RETURNS [break: BBBreak.BreakIndex];
END. -- BBVExtras