DIRECTORY Rope USING [ROPE], CD USING [Instance, Design, Object]; CDCellsInteractions: CEDAR DEFINITIONS = BEGIN CreateCellSelected: PROC [design: CD.Design, name: Rope.ROPE_NIL] RETURNS [done: BOOL, cellOb: CD.Object]; PushInCellInstance: PROC [design: CD.Design, inst: CD.Instance, convertIfNecessary: BOOL _ TRUE] RETURNS [done: BOOL]; PopFromCell: PROC [design: CD.Design, m: Method_interactive, name: Rope.ROPE_NIL] RETURNS [done: BOOL]; Method: TYPE = {flush, newcell, replace, interactive}; PushedCellName: PROC [design: CD.Design] RETURNS [Rope.ROPE]; END. δCDCellsInteractions.mesa (a ChipNDale module) Copyright c 1983, 1986 by Xerox Corporation. All rights reserved. by Christian Jacobi, 23-Aug-83 Last Edited by: Jacobi July 5, 1986 12:27:27 pm PDT --name=NIL: interactive read for name. --name#NIL: hint for name; may be modified. --If done: cell is included in directory of design. --inst must be an instance of the currently toplevel pushed in cell of design --message of problem if not done --message of problem if not done ΚZ˜codešœ/™/Kšœ Οmœ7™BKšœ™K™3K˜—šΟk ˜ Kšœžœžœ˜Kšžœžœ˜$—K˜KšΠblœžœž œ˜)Kšž˜K˜šΟnœžœ žœžœžœžœžœ žœ ˜jKšœ&™&Kšœ+™+Kšœ3™3K˜—š œžœ žœžœžœžœžœžœ˜vKšœM™MKšœ ™ K˜—š  œžœ žœ+žœžœžœžœ˜gKšœ ™ Kšœžœ*˜6—K˜š  œžœ žœ žœžœ˜=K˜—Kšžœ˜K˜—…—@~