removed small type-error
authorChristoph Senjak <christoph@christoph-senjaks-macbook-pro.local>
Wed, 5 Aug 2009 00:23:21 +0000 (02:23 +0200)
committerChristoph Senjak <christoph@christoph-senjaks-macbook-pro.local>
Wed, 5 Aug 2009 00:23:21 +0000 (02:23 +0200)
leveleditor.lisp

index bcc8c005f4597d66ed6797aa5003fd704bdac302..11ff966adb9b8547eeb917efe1997f78541813c7 100644 (file)
@@ -46,7 +46,6 @@ form (x y object)."
     ret))
 
 (defun level-editor (&optional (level nil) (width 16) (height 16))
-  (declare (type '(integer 0 100) width height))
   (prepare-base64-images)
   (let ((item-table (make-hash-table :test 'equal)))
     ;;initialize given level