From c0c271a74a11ccba4e5c2c51e46045c9073c32a6 Mon Sep 17 00:00:00 2001 From: jsancho Date: Mon, 19 Oct 2009 22:15:40 +0000 Subject: [PATCH] --- gacela_draw.lisp | 1 - gacela_misc.lisp | 1 - 2 files changed, 2 deletions(-) diff --git a/gacela_draw.lisp b/gacela_draw.lisp index c984948..5d10fa4 100644 --- a/gacela_draw.lisp +++ b/gacela_draw.lisp @@ -114,7 +114,6 @@ (cond (texture (let ((width (getf (get-resource texture) :width)) (height (getf (get-resource texture) :height))) -(print texture) (draw-rectangle (* f width) (* f height) :texture texture))))))) (defun draw-quad (v1 v2 v3 v4 &key texture) diff --git a/gacela_misc.lisp b/gacela_misc.lisp index 8a7c2e4..a3991d5 100755 --- a/gacela_misc.lisp +++ b/gacela_misc.lisp @@ -14,7 +14,6 @@ ;;; You should have received a copy of the GNU General Public License ;;; along with this program. If not, see . - (in-package :gacela) (defconstant INFINITY MOST-POSITIVE-LONG-FLOAT) -- 2.39.5