summaryrefslogtreecommitdiff
path: root/examples
diff options
context:
space:
mode:
Diffstat (limited to 'examples')
-rw-r--r--examples/path.scm2
1 files changed, 2 insertions, 0 deletions
diff --git a/examples/path.scm b/examples/path.scm
index 8f155e1..e22c6f3 100644
--- a/examples/path.scm
+++ b/examples/path.scm
@@ -60,7 +60,9 @@
(set-canvas-painter! canvas (make-example-painter s)))))))
(define (draw alpha)
+ (pk 'draw-canvas)
(draw-canvas canvas)
+ (pk 'draw-text)
(draw-text stats-text stats-text-pos)
(let ((current-time (elapsed-time)))
(set! avg-frame-time