Add image-width and image-height

This commit is contained in:
oakes
2014-01-03 02:31:28 -05:00
parent 51ad41440a
commit e4a3c12329

View File

@@ -38,6 +38,18 @@
(-> ^String val Texture. TextureRegion.)
(TextureRegion. ^TextureRegion val)))
(defn image-width
([^TextureRegion img]
(.getRegionWidth img))
([^TextureRegion img val]
(.setRegionWidth img val)))
(defn image-height
([^TextureRegion img]
(.getRegionHeight img))
([^TextureRegion img val]
(.setRegionHeight img val)))
(defn split-image
([val size]
(split-image val size size))