exec.m 892 B

12345678910111213141516171819
  1. Exec : module {
  2. PATH : con "/dis/acme/exec.dis";
  3. snarfbuf : ref Bufferm->Buffer;
  4. init : fn(mods : ref Dat->Mods);
  5. fontx : fn(et : ref Textm->Text, t : ref Textm->Text, argt : ref Textm->Text, arg : string, narg : int);
  6. get : fn(et, t, argt : ref Textm->Text, flag1 : int, arg : string, narg : int);
  7. put : fn(et, argt : ref Textm->Text, arg : string, narg : int);
  8. cut : fn(et, t : ref Textm->Text, flag1, flag2 : int);
  9. paste : fn(et, t : ref Textm->Text, flag1 : int, flag2: int);
  10. getarg : fn(t : ref Textm->Text, m : int, n : int) : (string, string, int);
  11. execute : fn(t : ref Textm->Text, aq0, aq1, external : int, argt : ref Textm->Text);
  12. run : fn(w : ref Windowm->Window, s : string, rdir : string, ndir : int, newns : int, argaddr : string, arg : string, ise: int);
  13. undo: fn(t: ref Textm->Text, flag: int);
  14. putfile: fn(f: ref Filem->File, q0: int, q1: int, r: string);
  15. };