[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