blob: e5c4ec05cbaecdcb844b6b1d2b12434c3f04da50 (
plain) (
blame)
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
|
