<> <> <> <> <> DIRECTORY JaM USING [State], Graphics USING [Box]; TAGraphicsHacks: CEDAR DEFINITIONS = { BeginBox: PROCEDURE; EndBox: PROCEDURE RETURNS[Graphics.Box]; RegisterGraphicsHacks: PROCEDURE [initState: JaM.State]; }.