texture: tileset: Fix rows/columns calculation.
authorDavid Thompson <davet@gnu.org>
Wed, 8 May 2019 21:26:20 +0000 (17:26 -0400)
committerDavid Thompson <davet@gnu.org>
Wed, 8 May 2019 21:26:20 +0000 (17:26 -0400)
* chickadee/render/texture.scm (split-texture): Use ceiling instead of
  floor when computing number of rows and columns.

chickadee/render/texture.scm

index f225770..40d8fa8 100644 (file)
@@ -313,8 +313,8 @@ This type of texture atlas layout is very common for tile map
 terrain."
   (let* ((w (texture-width texture))
          (h (texture-height texture))
-         (rows (inexact->exact (floor (/ (- h margin) (+ tile-height spacing)))))
-         (columns (inexact->exact (floor (/ (- w margin) (+ tile-width spacing)))))
+         (rows (inexact->exact (ceiling (/ (- h margin) (+ tile-height spacing)))))
+         (columns (inexact->exact (ceiling (/ (- w margin) (+ tile-width spacing)))))
          (v (make-vector (* rows columns))))
     (define (make-tile tx ty)
       (let* ((x (+ (* tx (+ tile-width spacing)) margin))