DIRECTORY FeedbackTypes, GGCoreTypes, IO, RefTab, Rope; GGScriptStats: CEDAR DEFINITIONS = BEGIN MsgRouter: TYPE = FeedbackTypes.MsgRouter; RopeListt: TYPE = GGCoreTypes.RopeListt; AtomListt: TYPE = REF AtomListtObj; AtomListtObj: TYPE = RECORD [ list: LIST OF ATOM, tail: LIST OF ATOM ]; Database: TYPE = REF DatabaseObj; DatabaseObj: TYPE = RECORD [ table: RefTab.Ref, atomOrder: AtomListt, lastAtom: ATOM, atomCount: CARD, sectionTable: RefTab.Ref, sectionOrder: AtomListt ]; ProcessOneScript: PROC [scriptName: Rope.ROPE, resultName: Rope.ROPE, workingDirectory: Rope.ROPE]; ProcessScript: PROC [scriptName: Rope.ROPE, resultStream: IO.STREAM, database: Database, workingDirectory: Rope.ROPE ฌ NIL, router: MsgRouter ฌ NIL] RETURNS [printTime: INT]; ProcessOneSummary: PROC [summaryName: Rope.ROPE, totalsName: Rope.ROPE, workingDirectory: Rope.ROPE]; ProcessSummary: PROC [summaryName: Rope.ROPE, totalsStream: IO.STREAM, database: Database, workingDirectory: Rope.ROPE ฌ NIL, router: MsgRouter ฌ NIL] RETURNS [printTime: INT]; CreateDatabase: PROC [] RETURNS [database: Database]; END. š GGScriptStats.mesa Copyright ำ 1986, 1992 by Xerox Corporation. All rights reserved. Last edited by Bier on September 21, 1987 3:10:05 pm PDT Contents: Routines for processing one or more SessionLog scripts to determine the frequency of user events. Some of these routines are tailored for Gargoyle scripts in particular. Others are more general. printTime results from a call to BasicTime.Period. ส •NewlineDelimiter –(cedarcode) style™codešœ™Kšœ ฯeœ6™BKšœ8™8Kšœฯ™ฯK™—šฯk ˜ Kšœ-˜-—K˜Kšœžœž œ˜"Kšž˜K˜Kšœ žœ˜*K˜Kšœ žœ˜(Kšœ žœžœ˜#šœžœžœ˜Kšœžœžœžœ˜Kšœžœžœž˜K˜—Kšœ žœžœ ˜!šœ žœžœ˜Kšœ˜Kšœ˜Kšœ žœ˜Kšœ ž˜Kšœ˜Kšœ˜K˜K˜—Kš ฯnœžœžœžœžœ˜cšŸ œžœžœžœžœ-žœžœžœžœ žœ˜ฎKšœ2™2—K˜Kš Ÿœžœžœžœžœ˜eKšŸœžœžœžœžœ-žœžœžœžœ žœ˜ฐK˜KšŸœžœžœ˜5K˜Kšžœ˜K˜—…—L๐