summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Thompson <dthompson2@worcester.edu>2014-11-30 20:05:34 -0500
committerDavid Thompson <dthompson2@worcester.edu>2014-11-30 20:05:34 -0500
commit13f0ad4e9449237c89a2011c6d18c60ef7819196 (patch)
tree4b68b91ea31049da64331010d00d8d423246e3f0
parent5d28bc889c524d5574b12996a08d75236f75a176 (diff)
render: sprite: Alias make-sprite to sprite.
* sly/render/sprite.scm (sprite): New procedure.
-rw-r--r--sly/render/sprite.scm5
1 files changed, 3 insertions, 2 deletions
diff --git a/sly/render/sprite.scm b/sly/render/sprite.scm
index c1d8439..ace9373 100644
--- a/sly/render/sprite.scm
+++ b/sly/render/sprite.scm
@@ -39,8 +39,7 @@
#:use-module (sly signal)
#:use-module (sly render texture)
#:use-module (sly math vector)
- #:export (make-sprite
- load-sprite
+ #:export (make-sprite sprite load-sprite
make-animated-sprite))
;;;
@@ -78,6 +77,8 @@ custom SHADER can be specified."
#:mesh mesh
#:depth-test? #f)))
+(define sprite make-sprite)
+
(define* (load-sprite file-name #:optional #:key (shader (load-default-shader))
(anchor 'center))
"Return a sprite mesh for the texture loaded from FILE-NAME.