appl/ebook/cssfont.m


1
2
3
4
5
6
7
8
9

CSSfont: module {
	PATH: con "/dis/ebook/cssfont.dis";
	Spec: adt {
		family, style, weight, size: string;
	};

	init:		fn(displ: ref Draw->Display);
	getfont:	fn(spec: Spec, parentem, parentex: int): (string, int, int);
};