render: texture: Fix split-texture.
authorDavid Thompson <dthompson2@worcester.edu>
Wed, 17 Jan 2018 18:32:00 +0000 (13:32 -0500)
committerDavid Thompson <dthompson2@worcester.edu>
Wed, 17 Jan 2018 18:32:00 +0000 (13:32 -0500)
* chickadee/render/texture.scm (split-texture): Width and height
variables need to contain exact numbers.

chickadee/render/texture.scm

index 5c8ea7b..63f5eaa 100644 (file)
@@ -289,8 +289,8 @@ around its border.
 This type of texture atlas layout is very common for tile map
 terrain."
   (let* ((r (texture-rect texture))
 This type of texture atlas layout is very common for tile map
 terrain."
   (let* ((r (texture-rect texture))
-         (w (rect-width r))
-         (h (rect-height r))
+         (w (inexact->exact (rect-width r)))
+         (h (inexact->exact (rect-height r)))
          (sw (/ tile-width w))
          (th (/ tile-height h))
          (rows (/ (- h margin) (+ tile-height spacing)))
          (sw (/ tile-width w))
          (th (/ tile-height h))
          (rows (/ (- h margin) (+ tile-height spacing)))