view examples/gui/mouse.scm @ 5:b67a33c44de7

Remove some crap, etc
author samer
date Fri, 05 Apr 2019 21:34:25 +0100
parents 79922c7f2475
children
line wrap: on
line source
(import "samer.core.util.swing.*")
(import "samer.units.*")

(define canvas (VCanvas.))
(define mouse (MousePosition. canvas))
(expose canvas "canvas")
(expose)