code: purgatorio

ref: efd1615c5741a6898853fefc24b1cbcb734e5477
dir: /appl/acme/exec.m/

View raw version
Exec : module {
	PATH : con "/dis/acme/exec.dis";

	snarfbuf : ref Bufferm->Buffer;

	init : fn(mods : ref Dat->Mods);

	fontx : fn(et : ref Textm->Text, t : ref Textm->Text, argt : ref Textm->Text, arg : string, narg : int);
	get : fn(et, t, argt : ref Textm->Text, flag1 : int, arg : string, narg : int);
	put : fn(et, argt : ref Textm->Text, arg : string, narg : int);
	cut : fn(et, t : ref Textm->Text, flag1, flag2 : int);
	paste : fn(et, t : ref Textm->Text, flag1 : int, flag2: int);

	getarg : fn(t : ref Textm->Text, m : int, n : int) : (string, string, int);
	execute : fn(t : ref Textm->Text, aq0, aq1, external : int, argt : ref Textm->Text);
	run : fn(w : ref Windowm->Window, s : string, rdir : string, ndir : int, newns : int, argaddr : string, arg : string, ise: int);
	undo: fn(t: ref Textm->Text, flag: int);
	putfile: fn(f: ref Filem->File, q0: int, q1: int, r: string);
};