Update of /project/cello/cvsroot/cello/kt-opengl In directory clnet:/tmp/cvs-serv20208

Modified Files: kt-opengl.lisp Log Message: Code cleanup.

--- /project/cello/cvsroot/cello/kt-opengl/kt-opengl.lisp 2006/10/01 13:03:32 1.8 +++ /project/cello/cvsroot/cello/kt-opengl/kt-opengl.lisp 2006/10/01 13:41:30 1.9 @@ -21,83 +21,7 @@ ;;; FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS ;;; IN THE SOFTWARE.

-;;; $Id: kt-opengl.lisp,v 1.8 2006/10/01 13:03:32 fgoenninger Exp $ - -(pushnew :kt-opengl *features*) - -(defpackage #:kt-opengl - (:nicknames #:ogl) - (:use #:common-lisp #:cffi #:ffx) - (:export - - #:kt-opengl-init - #:kt-opengl-reset - #:glec - - #:*ogl-listing-p* - #:*selecting* - - #:with-matrix - #:with-attrib - #:with-client-attrib - #:with-gl-begun - #:with-gl-param - #:with-bitmap-shifted - #:with-gl-parami - #:with-gl-paramf - #:with-gl-paramd - #:with-gl-integers - #:with-gl-floats - #:with-gl-doubles - #:with-display-list - #:with-gl-translation - - #:gl-pushm - #:gl-popm - - #:closed-stream-p - - #:ncalc-normalf - #:ncalc-normalfv - - #:ogl-get-int - #:ogl-get-boolean - - #:v3f - #:make-v3f - #:v3f-x - #:v3f-y - #:v3f-z - - #:xlin - #:xlout - #:farther - #:nearer - - #:texture-name - #:ogl-texture - #:ogl-texture-gen - #:ogl-texture-delete - #:ogl-tex-gen-setup - #:ogl-tex-activate - - #:ogl-bounds - #:ogl-scissor-box - #:ogl-raster-pos-get - - #:ogl-pen-move - - #:ogl-list-cache - #:ogl-lists-delete - - #:eltgli - - #:gl-name - - #:gl-get-integers - #:gl-get-floats - #:gl-get-doubles - )) +;;; $Id: kt-opengl.lisp,v 1.9 2006/10/01 13:41:30 fgoenninger Exp $

(in-package :kt-opengl)