
DIRECTORY EditSpan, Rope, TextEdit, TextLooks, TextNode, TiogaOps;

TiogaOpers: CEDAR DEFINITIONS = {

ROPE: TYPE = Rope.ROPE;
RefTextNode: TYPE = TextNode.Ref;
Location: TYPE = TextNode.Location;
Span: TYPE = TextNode.Span;
Looks: TYPE = TextLooks.Looks;
noLooks: Looks = TextLooks.noLooks;
allLooks: Looks = TextLooks.allLooks;
CharSet: TYPE = TextEdit.CharSet;
Place: TYPE = EditSpan.Place;


Delete: PROC [root: RefTextNode, del: Span];

InsertRope: PROC [root, dest: RefTextNode, rope: ROPE, destLoc: INT, inherit: BOOL ¬ TRUE, looks: Looks ¬ noLooks, charSet: CharSet ¬ 0];

Move: PROC [destRoot, srcRoot: RefTextNode, dest: Location, source: Span, where: Place ¬ after];

CallWithLock: PROC [Proc: PROC [RefTextNode], root: TiogaOps.Ref];

}.
    Ê  
TiogaOpers.mesa
Copyright Ó 1992 by Xerox Corporation.  All rights reserved.
Mike Spreitzer January 22, 1987 10:44:21 pm PST
You must lock the subject document(s) while calling these procedures.
Ê=  •NewlineDelimiter
–(cedarcode) style™ code™Kšœ
Ïeœ1™<K™/—K˜ KšÏk	œ9˜BK˜ šÏn
œžœžœ˜!K˜ Kšžœžœžœ˜Kšœžœ˜!Kšœ
žœ˜#Kšœžœ˜Kšœžœ˜K˜#K˜%Kšœ	žœ˜!Kšœžœ˜K˜ K™EK˜ KšŸœžœ ˜,K˜ KšŸ
œžœ!žœžœžœžœ0˜‰K˜ KšŸœžœV˜`K˜ KšŸœžœŸœžœ$˜BK˜ K˜—— …—    ð  ÷  