diff options
author | David Thompson <dthompson2@worcester.edu> | 2024-10-19 21:05:41 -0400 |
---|---|---|
committer | David Thompson <dthompson2@worcester.edu> | 2024-10-19 21:05:41 -0400 |
commit | b5aa7cb9a857160e547718d184e89cb3221200a5 (patch) | |
tree | 140ee0e84811067fd9e7dfccfa6402a0a64f7e00 /examples/path.scm | |
parent | 76dc3f0af36775d2fdaab61134dd0f875ee48292 (diff) |
WIP path stuffwip-graphics-backend
Diffstat (limited to 'examples/path.scm')
-rw-r--r-- | examples/path.scm | 2 |
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 |