summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--chickadee/graphics/texture.scm5
1 files changed, 5 insertions, 0 deletions
diff --git a/chickadee/graphics/texture.scm b/chickadee/graphics/texture.scm
index fbf5bdc..6debd11 100644
--- a/chickadee/graphics/texture.scm
+++ b/chickadee/graphics/texture.scm
@@ -62,6 +62,7 @@
split-texture
texture-tileset-dimensions
texture-atlas?
+ texture-atlas-size
texture-atlas-texture
texture-atlas-ref
load-tileset))
@@ -323,6 +324,10 @@ coordinate rects denoting the various regions within."
within."
(list->texture-atlas texture rects))
+(define (texture-atlas-size atlas)
+ "Return the size of ATLAS."
+ (vector-length (texture-atlas-vector atlas)))
+
(define (texture-atlas-ref atlas index)
"Return the texture region associated with INDEX in
ATLAS."