diff options
author | David Thompson <dthompson2@worcester.edu> | 2014-11-30 20:05:34 -0500 |
---|---|---|
committer | David Thompson <dthompson2@worcester.edu> | 2014-11-30 20:05:34 -0500 |
commit | 13f0ad4e9449237c89a2011c6d18c60ef7819196 (patch) | |
tree | 4b68b91ea31049da64331010d00d8d423246e3f0 | |
parent | 5d28bc889c524d5574b12996a08d75236f75a176 (diff) |
render: sprite: Alias make-sprite to sprite.
* sly/render/sprite.scm (sprite): New procedure.
-rw-r--r-- | sly/render/sprite.scm | 5 |
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. |