aboutsummaryrefslogtreecommitdiff
path: root/animation.scm
diff options
context:
space:
mode:
Diffstat (limited to 'animation.scm')
-rw-r--r--animation.scm2
1 files changed, 2 insertions, 0 deletions
diff --git a/animation.scm b/animation.scm
index e3e6e89..0d961a1 100644
--- a/animation.scm
+++ b/animation.scm
@@ -2,6 +2,7 @@
(import scheme
(chicken base)
(chicken keyword)
+ (chicken pretty-print)
(only srfi-1 filter)
downstroke-entity
downstroke-world)
@@ -78,6 +79,7 @@
(define-pipeline (apply-animation animation) (scene entity dt)
guard: (entity-ref entity #:animations #f)
(let ((animations (entity-ref entity #:animations #f)))
+ (pp entity)
(animate-entity entity animations)))
) ;; End of animation module