Update of /project/cello/cvsroot/cello/cl-openal In directory clnet:/tmp/cvs-serv29491/cl-openal
Modified Files: cl-openal-init.lisp cl-openal.lpr Log Message: important fixes to cl-magick and cello demo nehe-06
--- /project/cello/cvsroot/cello/cl-openal/cl-openal-init.lisp 2006/08/24 07:54:23 1.6 +++ /project/cello/cvsroot/cello/cl-openal/cl-openal-init.lisp 2006/08/31 17:34:49 1.7 @@ -63,7 +63,7 @@ (format t "~&clear AL error code ~a" (al-get-error))
- (let ((l-zip (make-ff-array al-float 0 0 0)) + (let ((l-zip (make-ff-array al-float 10 0 0)) (l-ori (make-ff-array al-float 0 0 -1 0 1 0)))
(al-listenerfv al_position l-zip) --- /project/cello/cvsroot/cello/cl-openal/cl-openal.lpr 2006/08/24 17:35:08 1.8 +++ /project/cello/cvsroot/cello/cl-openal/cl-openal.lpr 2006/08/31 17:34:49 1.9 @@ -1,4 +1,4 @@ -;; -*- lisp-version: "8.0 [Windows] (Aug 17, 2006 12:24)"; cg: "1.81"; -*- +;; -*- lisp-version: "8.0 [Windows] (Aug 24, 2006 21:48)"; cg: "1.81"; -*-
(in-package :cg-user)