summaryrefslogblamecommitdiff
path: root/example0.luma
blob: e5c4ec05cbaecdcb844b6b1d2b12434c3f04da50 (plain) (tree)
1
2
3
4
5
6
7
8
9
10
11
12
13
14













                                                                                        
> mod std
>     mod gfx
>         fn crtwin [str:nm int16:pos_x int16:pos_y int16:res_x int16:res_y bool:flscrn]

frm std/gfx imp clswin crtwin

int32:__main__ -fn []
	print “Creating window...\n”
	try std/gfx/crtwin “luma test” #0 #0 #714 #540 no
	catch err
		print “Error % when creating window" $.err
		ret failure
	std/gfx/clswin
	ret success