summaryrefslogtreecommitdiff
path: root/examples/font.scm
diff options
context:
space:
mode:
authorDavid Thompson <dthompson2@worcester.edu>2014-06-07 19:57:06 -0400
committerDavid Thompson <dthompson2@worcester.edu>2014-06-07 19:57:06 -0400
commitc2a4f0636569978a40cb5c98875d798624909eb2 (patch)
treeca0d993826c0adde719e3a88aec255626281340d /examples/font.scm
parentdef69615603e49bb17b09c7352295578f9dd67af (diff)
Replace vector2 module with a more generic vector module.
* 2d/vector2.scm: Delete it. * 2d/vector.scm: New file. * Makefile.am (SOURCES): s/vector2/vector. * 2d/font.scm: * 2d/keyboard.scm: * 2d/mouse.scm: * 2d/rect.scm: * 2d/shader.scm: * 2d/sprite.scm: * 2d/texture.scm: * 2d/transform.scm: * 2d/window.scm: * examples/2048/2048: * examples/animation.scm: * examples/coroutine.scm: * examples/font.scm: * examples/particles.scm: * examples/simple.scm: * examples/tilemap.scm: Use vectors instead of defunct vector2.
Diffstat (limited to 'examples/font.scm')
-rw-r--r--examples/font.scm8
1 files changed, 4 insertions, 4 deletions
diff --git a/examples/font.scm b/examples/font.scm
index 8bcd90d..4a8412b 100644
--- a/examples/font.scm
+++ b/examples/font.scm
@@ -22,7 +22,7 @@
(2d game)
(2d mouse)
(2d signal)
- (2d vector2)
+ (2d vector)
(2d window))
(load "common.scm")
@@ -32,18 +32,18 @@
(define font (load-default-font 18))
(define label
(make-label font "The quick brown fox jumped over the lazy dog."
- (vector2 320 240) #:anchor 'center))
+ #(320 240) #:anchor 'center))
(define-signal fps-label
(signal-map (lambda (fps)
(let ((text (format #f "FPS: ~d" fps)))
- (make-label font text (vector2 0 0))))
+ (make-label font text #(0 0))))
fps))
(define-signal mouse-label
(signal-map (lambda (p)
(let ((text (format #f "Mouse: (~d, ~d)" (vx p) (vy p))))
- (make-label font text (vector2 0 20))))
+ (make-label font text #(0 20))))
(signal-throttle 5 mouse-position)))
(add-hook! draw-hook (lambda (dt alpha)