[cello-cvs] CVS cello/kt-opengl

[fgoenninger]

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)