Update of /project/cello/cvsroot/cello/cl-openal In directory clnet:/tmp/cvs-serv8567/cl-openal Modified Files: cl-openal-init.lisp cl-openal.lpr Log Message: Cello Rizing. cl-opengl becomes kt-opengl, hello-cffi becomes cffi-extender, end lots more to come --- /project/cello/cvsroot/cello/cl-openal/cl-openal-init.lisp 2006/05/17 20:38:14 1.2 +++ /project/cello/cvsroot/cello/cl-openal/cl-openal-init.lisp 2006/05/26 22:08:56 1.3 @@ -38,10 +38,10 @@ (xoa) - (assert (ffx:load-foreign-library (namestring *al-dynamic-lib*)) + (assert (cffi-uffi-compat:load-foreign-library (namestring *al-dynamic-lib*)) () "Failed to load OpenAL dynamic lib ~a" *al-dynamic-lib*) - (assert (ffx:load-foreign-library (namestring *alut-dynamic-lib*)) + (assert (cffi-uffi-compat:load-foreign-library (namestring *alut-dynamic-lib*)) () "Failed to load alut dynamic lib ~a" *alut-dynamic-lib*) (format t "~&Open AL loaded") --- /project/cello/cvsroot/cello/cl-openal/cl-openal.lpr 2006/05/17 20:38:14 1.2 +++ /project/cello/cvsroot/cello/cl-openal/cl-openal.lpr 2006/05/26 22:08:56 1.3 @@ -1,4 +1,4 @@ -;; -*- lisp-version: "8.0 [Windows] (May 11, 2006 6:29)"; cg: "1.81"; -*- +;; -*- lisp-version: "8.0 [Windows] (May 22, 2006 0:51)"; cg: "1.81"; -*- (in-package :cg-user) @@ -16,8 +16,7 @@ (make-instance 'module :name "cl-openal-init.lisp") (make-instance 'module :name "wav-handling.lisp") (make-instance 'module :name "cl-openal-demo.lisp")) - :projects (list (make-instance 'project-module :name - "C:\\0dev\\cello\\hello-cffi\\hello-cffi")) + :projects nil :libraries nil :distributed-files nil :internally-loaded-files nil