DIRECTORY Druid, IO, BasicTime, BreakWorldArchitecture, Rope, SameBreakWorld, VTables; DruidTool: CEDAR DEFINITIONS ~ { Handle: TYPE ~ REF HandleRep ฌ nullHandle; HandleRep: TYPE ~ MONITORED RECORD [ vTable: VTables.VTable, sameBreakWorld: SameBreakWorld.Handle ฌ SameBreakWorld.nullHandle, feedbackStream: IO.STREAM ฌ NIL, rows: CARD, rowData: RowData ฌ nullRowData, changed: BOOLEAN ฌ FALSE, timeCondition: CONDITION, samplePulses: BasicTime.Pulses, summaryStream: IO.STREAM ฌ NIL, summaryTime: BasicTime.GMT ฌ BasicTime.nullGMT, title: Rope.ROPE ฌ NIL ]; nullHandle: Handle ~ NIL; RowData: TYPE ~ REF RowDataRep ฌ nullRowData; RowDataRep: TYPE ~ RECORD [ next: RowData ฌ nullRowData, count: CARD ฌ 0, text: Rope.ROPE ฌ NIL, feedbackStream: IO.STREAM ฌ NIL, details: SELECT kind: RowKind FROM counter => [ megalith: Druid.Megalith ฌ Druid.nullMegalith, file: Rope.ROPE ฌ NIL, label: Rope.ROPE ฌ NIL, position: CARD ฌ 0, correspondingPosition: CARD ฌ 0 ], subtotal => [ active: BOOLEAN ฌ TRUE ], ENDCASE ]; RowKind: TYPE ~ { counter, subtotal }; CounterRow: TYPE ~ REF CounterRowRep ฌ nullCounterRow; CounterRowRep: TYPE ~ RowDataRep.counter; nullCounterRow: CounterRow ~ NIL; SubtotalRow: TYPE ~ REF SubtotalRowRep ฌ nullSubtotalRow; SubtotalRowRep: TYPE ~ RowDataRep.subtotal; nullSubtotalRow: SubtotalRow ~ NIL; nullRowData: RowData ~ NIL; }. ฎ DruidTool.mesa Copyright ำ 1990, 1992 by Xerox Corporation. All rights reserved. Peter B. Kessler, August 6, 1990 5:09 pm PDT A displayer of Druid counting breaks. สn–(cedarcode) style•NewlineDelimiter ™code™Kšœ ฯeœ7™BK™,K™K™%K™šฯk ˜ K˜Kšžœ˜K˜ K˜K˜K˜K˜K˜——unitšะln œžœž œ˜ K˜šœžœžœ˜*šœ žœž œžœ˜$K˜K˜BKšœžœžœžœ˜ Kšœžœ˜ K˜Kšœ žœžœ˜Kšœž œ˜Kšœ˜Kšœžœžœžœ˜Kšœžœ˜/Kšœ žœž˜K˜—šœžœ˜K˜—šœ žœžœ˜-šœ žœžœ˜K˜Kšœžœ˜Kšœ žœž˜Kšœžœžœžœ˜ šœ žœž˜"˜ K˜.Kšœ žœžœ˜Kšœ žœžœ˜Kšœ žœ˜Kšœžœ˜K˜—˜ Kšœžœž˜K˜—Kšž˜—K˜Kšœ žœ˜&šœ žœžœ ˜6Kšœžœ˜)Kšœžœ˜!—šœ žœžœ"˜9Kšœžœ˜+Kšœžœ˜#——Kšœžœ˜K˜——L˜——…—Hd