-- Compile CrankTypes CrankIO CrankOps CrankAnalyze; Compile CrankIOImpl CrankOpsImpl CrankOneImpl CrankTwoImpl; Bind CrankPackage
-- PushV Commands; Install StructuredStreams; Pop; Run CrankPackage
-- Alias Crank (foo) _ CrankOneImpl.ConvertFile[fileName: "foo", structure: TRUE, analyze: FALSE, skipAttributes: NIL]
-- Alias Walk (foo) _ CrankOneImpl.WalkTree[CrankOneImpl.ParseFile["foo"]]
-- Alias Walk (foo) Copy [qv]<CLImager>Plass> _ foo.sexpr; killex [qv]<CLImager>Plass>foo.sexpr
-- Alias Walk (foo) CrankB [qv]<CLImager>PlainTextCedar>foo
-- Alias CrankB (foo) _ CrankOneImpl.ConvertFile[fileName: "foo", structure: FALSE, analyze: TRUE, skipAttributes: LIST[$DECLTYPECODE, $TYPE, $CONTEXT, $STE, $TYPECODE, $NEEDTYPECODE]]
-- Alias CrankA (foo) _ CrankOneImpl.ConvertFile[fileName: "foo", structure: TRUE, analyze: TRUE, skipAttributes: LIST[$DECLTYPECODE, $TYPE, $CONTEXT, $STE, $TYPECODE, $NEEDTYPECODE]]
-- _ CrankIOImpl.RopeFromTree[tree]!!
-- _ CrankOpsImpl.ComputeExternalTypeRep[context.types]
-- _ CrankIOImpl.RopeFromTree[ CrankOpsImpl.UnderType[typeGraph, typeCode] .ext]!!
-- _ CrankIOImpl.RopeFromTree[ CrankOpsImpl.UnderType[context.types, typeCode] .ext]!!
-- Michael Plass, September 21, 1987 5:28:51 pm PDT
-- Willie-sue, December 20, 1988 8:11:54 pm PST

-- Run NoteNewPlaintextSourcesImpl; _ NoteNewPlaintextSourcesImpl.Run[dstDirectory: "[qv]<CLImager>PlainTextCedar>", srcDirectory: "[Cedar7.0]<Imager>", query: FALSE]

-- Run UpdateSexprImpl; Alias  Walk (foo) _ UpdateSexprImpl.UpdateIfDifferent["[qv]<CLImager>Plass>foo.sexpr", "foo.sexpr"]

   R  
CrankCrib.cm
Copyright Ó 1991 by Xerox Corporation.  All rights reserved.

Ê ’  •NewlineDelimiter
–(cedarcode) style™ ™Jšœ
Ïeœ1™<—J™ ˜‚J˜CJ˜vJ˜JJ˜_J˜;J˜¸J˜·J˜%J˜7J˜TJ˜XJ˜3J˜/—J˜ J˜¦J˜ J˜{J˜ — …—    ,    