diff options
Diffstat (limited to 'graphics.mu')
-rw-r--r-- | graphics.mu | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/graphics.mu b/graphics.mu index 5f19367b..ad408470 100644 --- a/graphics.mu +++ b/graphics.mu @@ -1,7 +1,7 @@ ; open a viewport, print coordinates of mouse clicks ; currently need to ctrl-c to exit after closing the viewport (function main [ - (graphics-on (("practice" literal)) 300:literal 300:literal) + (window-on (("practice" literal)) 300:literal 300:literal) { begin (pos:integer-integer-pair click?:boolean <- mouse-position) (loop-unless click?:boolean) @@ -13,5 +13,5 @@ (print-primitive (("\n" literal))) (loop) } - (graphics-off) + (window-off) ]) |