code: purgatorio

ref: 27598a9c874c115795a3d59de093f8f158a73d87
dir: /opt/misc/appl/hello.b/

View raw version 
implement Hello;

include "sys.m";
	sys: Sys;
include "draw.m";

Hello: module {
	init:
	fn(ctxt: ref Draw->Context, argv: list of string);
};

init(ctxt : ref Draw->Context, argv: list of string) {
	sys = load Sys Sys->PATH;
	sys->print("Hello World!\n");
}