##       Software from the book "Inferno Programming with Limbo"#       published by John Wiley & Sons, January 2003.##       p. Stanley-Marbell <pip@gemusehaken.org>#TABCHAR			: con 16r88;TABLEN			: con 8; KEY_A			: con ('a'	| 'P' << 8);KEY_BACKSPACE		: con ('\b'	| 'E' << 8);KEY_CTRLD		: con (4	| 'P' << 8);KEY_DOT			: con ('.'	| 'P' << 8);KEY_EESC		: con (27	| 'E' << 8);KEY_ENEWLINE		: con ('\n'	| 'E' << 8);KEY_L			: con ('l'	| 'P' << 8);KEY_N			: con ('n'	| 'P' << 8);KEY_PESC		: con (27	| 'P' << 8);KEY_PNEWLINE		: con ('\n'	| 'P' << 8);KEY_S			: con ('s'	| 'P' << 8);KEY_TAB			: con ('\t'	| 'E' << 8); Line : adt{	str	: string;	ntabs	: int;}; Pled : module{	init : fn (nil : ref Draw->Context, argv : list of string);};