From 627f3ef4da15ac23f9959e72ed5cfb1855650b05 Mon Sep 17 00:00:00 2001 From: David Thompson Date: Thu, 12 Dec 2013 22:29:12 -0500 Subject: Make init a non-keyword argument in make-signal procedure. * 2d/signals.scm (make-signal): Change parameter list. * 2d/mouse.scm (mouse-position): Remove #:init keyword. * 2d/time.scm (time-interval, time-delay): Remove #:init keyword. * 2d/window.scm (window-size): Remove #:init keyword. --- 2d/mouse.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to '2d/mouse.scm') diff --git a/2d/mouse.scm b/2d/mouse.scm index 1c118b2..bd11678 100644 --- a/2d/mouse.scm +++ b/2d/mouse.scm @@ -33,7 +33,7 @@ (define mouse-last-down (make-signal)) (define mouse-last-up (make-signal)) -(define mouse-position (make-signal #:init (vector2 0 0))) +(define mouse-position (make-signal (vector2 0 0))) (define (mouse-down? button) "Create a signal for the state of BUTTON. Value is #t when mouse -- cgit v1.2.3