MODULE Init; IMPORT LinConsole, HostFonts (* Fonts.SetHook; required for Texts *), HostWindows (* Windows.SetHook *), HostDates (* Dates.SetHook *), HostDialog (* Dialog.SetShowHook *), StdLog, StdInterpreter, (* Dialog.SetCallHook *) StdDialog (* Views.SetViewHook *), Converters (* .odc *), Dialog, TextViews, TextControllers; PROCEDURE Init; VAR res: INTEGER; BEGIN (* StdLog.Open; *) Converters.Register("Documents.ImportDocument", "Documents.ExportDocument", "", "odc", {}); (* Converters.Register("StdETHConv.ImportETHDoc", "", "TextViews.View", "eth", {Converters.importAll}); *) Dialog.Call("ConsInterp.Run", " ", res) END Init; BEGIN Init END Init.