12345678910111213141516171819202122232425262728 |
- MODULE Init;
- IMPORT
- HostConsole, (* Console.SetHook *)
- HostFonts (* Fonts.SetHook; required for Texts *),
- HostWindows (* Windows.SetHook *),
- HostDates (* Dates.SetHook *),
- HostDialog (* Dialog.SetShowHook *),
- StdInterpreter, (* Dialog.SetCallHook *)
- StdDialog (* Views.SetViewHook *),
- StdLog, ConsLog, (* Log.Hook *)
- Converters (* .odc *),
- Dialog;
- PROCEDURE Init;
- VAR res: INTEGER;
- BEGIN
- Converters.Register("Documents.ImportDocument", "Documents.ExportDocument", "", "odc", {});
- Dialog.Call("Config.Setup", " ", res);
- Dialog.Call("ConsInterp.Run", " ", res)
- END Init;
- BEGIN
- Init
- END Init.
|