]> git.jsancho.org Git - gacela.git/commitdiff
(no commit message)
authorjsancho <devnull@localhost>
Mon, 19 Oct 2009 22:15:40 +0000 (22:15 +0000)
committerjsancho <devnull@localhost>
Mon, 19 Oct 2009 22:15:40 +0000 (22:15 +0000)
gacela_draw.lisp
gacela_misc.lisp

index c984948fbbfa351a9aab7bd0cfc4dba3390d85d7..5d10fa4eebb8a2d9ed5009020e8f52ca73ae655e 100644 (file)
       (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)
index 8a7c2e433242b551ee3fbc6c2c229d142aaf436a..a3991d5924d9fdd666b5c4a6d2514f60f7be371a 100755 (executable)
@@ -14,7 +14,6 @@
 ;;; You should have received a copy of the GNU General Public License
 ;;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
-
 (in-package :gacela)
 
 (defconstant INFINITY MOST-POSITIVE-LONG-FLOAT)