summaryrefslogtreecommitdiff
path: root/examples/text.scm
diff options
context:
space:
mode:
authorDavid Thompson <dthompson2@worcester.edu>2018-08-20 20:22:44 -0400
committerDavid Thompson <dthompson2@worcester.edu>2018-08-23 08:01:11 -0400
commiteceae08c4f6985c3cc30191ab33b22302578b81e (patch)
treeead018aabef22bbd0097df991f6a900bc7b93883 /examples/text.scm
parent89ed33ac799b9b55b4694c46f8e19a24d343e99b (diff)
math: vector: Add read syntax.
* chickadee/math/vector.scm (read-vec): New procedure. Extend reader. * examples/lines.scm: Use new vector read syntax. * examples/nine-patch.scm: Ditto. * examples/sprite.scm: Ditto. * examples/text.scm: Ditto. * examples/tiled.scm: Ditto.
Diffstat (limited to 'examples/text.scm')
-rw-r--r--examples/text.scm6
1 files changed, 3 insertions, 3 deletions
diff --git a/examples/text.scm b/examples/text.scm
index fd299b7..74c2301 100644
--- a/examples/text.scm
+++ b/examples/text.scm
@@ -9,11 +9,11 @@
(define (draw alpha)
(draw-text font "(draw-text font \"Hello, world!\" (vec2 100.0 200.0))"
- (vec2 100.0 200.0))
+ #v(100.0 200.0))
(draw-text font "Chickadee is a game development toolkit for Guile Scheme."
- (vec2 100.0 150.0))
+ #v(100.0 150.0))
(draw-text font "The quick brown fox jumps over the lazy dog"
- (vec2 100.0 100.0)))
+ #v(100.0 100.0)))
(define (key-press key scan modifiers repeat?)
(when (eq? key 'q)