shithub: purgatorio

ref: f8935b5778397074d41a48205e5c7f87d7b531fe
dir: purgatorio/module/cfg.m

View raw version
Cfg : module {
	PATH : con "/dis/lib/cfg.dis";

	Attr : adt {
		name : string;
		value : string;
	};

	Tuple : adt {
		lnum : int;
		attrs : list of Attr;
		lookup: fn (t : self ref Tuple, name : string) : string;
	};

	Record : adt {
		tuples : list of ref Tuple;
		lookup : fn (r : self ref Record, name : string) : (string, ref Tuple);
	};

	init : fn (path : string) : string;
	reset:	fn();
	lookup : fn (name : string) : list of (string, ref Record);
	getkeys : fn () : list of string;
	parseline:	fn(s: string, lno: int): (ref Tuple, string);
};