-- ButtonCells.mesa
-- last edit     November 5, 1982 12:57 pm

DIRECTORY
   NewCalcGlobal USING[Displayer, Document],
   Rope USING[ROPE],
   StructureNodes USING[StructureNode],
   ViewerClasses USING[Viewer];
   
ButtonCells: DEFINITIONS  =

BEGIN
 
CreateBCell: PROCEDURE[document: NewCalcGlobal.Document, displayer: NewCalcGlobal.Displayer, vParent: ViewerClasses.Viewer, label, forSize: Rope.ROPE, proc: PROCEDURE[REF ANY], procArg: REF ANY, setSelection: BOOLEAN _ FALSE] RETURNS[StructureNodes.StructureNode];
 
ReLabelBCell: PROCEDURE[bCell: StructureNodes.StructureNode, newLabel: Rope.ROPE];

ForceNoteBCellSelection: PROCEDURE[bcRef: REF ANY];

END..

-- November 5, 1982 1:01 pm: Sturgis, ButtonCells.
-- February 25, 1983 2:56 pm: replace LogicalNode and DisplayNode by StructureNode