From 37da2899f40661e3e9631e497da8dc59b971cbd0 Mon Sep 17 00:00:00 2001 From: "Charles.Forsyth" Date: Fri, 22 Dec 2006 17:07:39 +0000 Subject: 20060303a --- appl/acme/ecmd.m | 18 ++++++++++++++++++ 1 file changed, 18 insertions(+) create mode 100644 appl/acme/ecmd.m (limited to 'appl/acme/ecmd.m') diff --git a/appl/acme/ecmd.m b/appl/acme/ecmd.m new file mode 100644 index 00000000..e9367c2a --- /dev/null +++ b/appl/acme/ecmd.m @@ -0,0 +1,18 @@ +Editcmd: module { + + PATH: con "/dis/acme/ecmd.dis"; + + init : fn(mods : ref Dat->Mods); + + cmdexec: fn(a0: ref Textm->Text, a1: ref Edit->Cmd): int; + resetxec: fn(); + cmdaddress: fn(a0: ref Edit->Addr, a1: Edit->Address, a2: int): Edit->Address; + edittext: fn(f: ref Filem->File, q: int, r: string, nr: int): string; + + alllooper: fn(w: ref Windowm->Window, lp: ref Dat->Looper); + alltofile: fn(w: ref Windowm->Window, tp: ref Dat->Tofile); + allmatchfile: fn(w: ref Windowm->Window, tp: ref Dat->Tofile); + allfilecheck: fn(w: ref Windowm->Window, fp: ref Dat->Filecheck); + + readloader: fn(f: ref Filem->File, q0: int, r: string, nr: int): int; +}; \ No newline at end of file -- cgit v1.2.3