annotate examples/misc/mouse.scm @ 2:74cc9e431818

Revert change to MidiSynth
author samer
date Fri, 05 Apr 2019 16:43:56 +0100
parents 5df24c91468d
children
rev   line source
samer@1 1 (import "samer.core.util.swing.*")
samer@1 2 (import "samer.units.*")
samer@1 3
samer@1 4 (define canvas (VCanvas.))
samer@1 5 (define mouse (MousePosition. canvas))
samer@1 6 (expose canvas "canvas")
samer@1 7 (expose)
samer@1 8