From a86ebd5bed737d5d705666d020953c0879ae1bdf Mon Sep 17 00:00:00 2001 From: David Thompson Date: Wed, 12 Jun 2013 22:27:02 -0400 Subject: Add basic docstrings to sprite module. --- 2d/sprite.scm | 3 +++ 1 file changed, 3 insertions(+) diff --git a/2d/sprite.scm b/2d/sprite.scm index 78bad6a..0f18dd7 100644 --- a/2d/sprite.scm +++ b/2d/sprite.scm @@ -55,13 +55,16 @@ (rotation sprite-rotation set-sprite-rotation!)) (define (set-sprite-scale! sprite scale) + "Sets sprite scale-x and scale-y to the same value." (set-sprite-scale-x! sprite scale) (set-sprite-scale-y! sprite scale)) (define (load-sprite filename) + "Loads a sprite from file with default position, scaling, and rotation values." (make-sprite (load-texture filename) 0 0 1 1 0)) (define (draw-sprite sprite) + "Renders a sprite." (let* ((texture (sprite-texture sprite)) (w (texture-width texture)) (h (texture-height texture))) -- cgit v1.2.3