[gamelib-cvs] demo-stick.lisp
Ingvar Mattsson
imattsson at common-lisp.net
Thu Dec 28 06:15:50 UTC 2006
Update of /project/gamelib/cvsroot/source/doc
In directory clnet:/tmp/cvs-serv30770
Modified Files:
demo-stick.lisp
Log Message:
IM
Minor update for the joystick demo.
Index: demo-stick.lisp
===================================================================
RCS file: /project/gamelib/cvsroot/source/doc/demo-stick.lisp,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** demo-stick.lisp 27 Dec 2006 21:27:10 -0000 1.1
--- demo-stick.lisp 28 Dec 2006 06:15:47 -0000 1.2
***************
*** 33,34 ****
--- 33,41 ----
)
(xlib:display-force-output *display*))
+
+ (continous-poll *js*)
+ (loop for n below 1000 do (progn
+ (update)
+ (sleep 0.1)))
+
+
\ No newline at end of file
More information about the Gamelib-cvs
mailing list