|
@@ -18,25 +18,8 @@ MODULE Init;
|
|
|
PROCEDURE Init;
|
|
|
VAR res: INTEGER;
|
|
|
BEGIN
|
|
|
- (* StdLog.Open; *)
|
|
|
-
|
|
|
Converters.Register("Documents.ImportDocument", "Documents.ExportDocument", "", "odc", {});
|
|
|
-
|
|
|
- Converters.Register("HostTextConv.ImportText", "HostTextConv.ExportText", "TextViews.View", "txt", {Converters.importAll});
|
|
|
- Converters.Register("HostTextConv.ImportRichText", "HostTextConv.ExportRichText", "TextViews.View", "rtf", {});
|
|
|
- Converters.Register("HostTextConv.ImportUnicode", "HostTextConv.ExportUnicode", "TextViews.View", "utf", {});
|
|
|
- Converters.Register("HostTextConv.ImportDosText", "", "TextViews.View", "txt", {});
|
|
|
- Converters.Register("HostTextConv.ImportHex", "", "TextViews.View", "dat", {Converters.importAll});
|
|
|
- Converters.Register("HostTextConv.ImportText", "HostTextConv.ExportText", "TextViews.View", "xml", {});
|
|
|
- (* Converters.Register("HostTextConv.ImportText", "HostTextConv.ExportText", "TextViews.View", "html", {}); *)
|
|
|
-(*
|
|
|
- Converters.Register("DevBrowser.ImportSymFile", "", "TextViews.View", "osf", {});
|
|
|
- Converters.Register("DevBrowser.ImportCodeFile", "", "TextViews.View", "ocf", {});
|
|
|
- Converters.Register("HostBitmaps.ImportBitmap", "HostBitmaps.ExportBitmap", "HostBitmaps.StdView", "bmp", {});
|
|
|
-*)
|
|
|
- Converters.Register("StdETHConv.ImportETHDoc", "", "TextViews.View", "eth", {Converters.importAll});
|
|
|
- Converters.Register("", "XhtmlExporter.ExportText", "TextViews.View", "html", {});
|
|
|
-
|
|
|
+ Dialog.Call("Config.Setup", " ", res);
|
|
|
Dialog.Call("ConsInterp.Run", " ", res)
|
|
|
END Init;
|
|
|
|