<> <> <> <> <<>> <> <<>> DIRECTORY IO USING [STREAM], XTk USING [Widget, WidgetSpec]; XTkStreamWidgets: CEDAR DEFINITIONS ~ BEGIN <<>> CreateStreamWidget: PROC [widgetSpec: XTk.WidgetSpec ¬ [], widgetStream: IO.STREAM ¬ NIL] RETURNS [XTk.Widget]; <> <> CreateStream: PROC [w: XTk.Widget ¬ NIL] RETURNS [widgetStream: IO.STREAM]; <> <> <<>> BindStream: PROC [w: XTk.Widget, widgetStream: IO.STREAM]; <> <<>> END.