diff options
author | David Thompson <dthompson2@worcester.edu> | 2015-04-05 19:46:26 -0400 |
---|---|---|
committer | David Thompson <dthompson2@worcester.edu> | 2015-04-05 19:49:36 -0400 |
commit | 076a01c36d01c71ffcce1737855b2928bc6165bc (patch) | |
tree | b41de0b8edf27ee050a393ca47e5aa1a1130b263 /examples/font.scm | |
parent | 9ddc407ced2d57b716002711492133e048d4fa53 (diff) |
render: model: Prefix procedures with 'model-'.
* sly/render/model.scm (paint, blend, group, group*, move, place): Renamed.
(model-paint, model-blend, model-group, list->model, model-move,
model-place): New procedures.
* README.org (Example): s/move/model-move/
* examples/2048/2048.scm: Update example.
* examples/mines/mines.scm: Likewise.
* examples/animation.scm: Likewise.
* examples/font.scm: Likewise.
* examples/joystick.scm: Likewise.
* examples/simple.scm: Likewise.
* examples/tilemap.scm: Likewise.
Diffstat (limited to 'examples/font.scm')
-rw-r--r-- | examples/font.scm | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/examples/font.scm b/examples/font.scm index b3fcfc3..33c4940 100644 --- a/examples/font.scm +++ b/examples/font.scm @@ -34,24 +34,24 @@ (define font (load-default-font 18)) (define-signal message-label - (move (vector2 320 240) - (label font "The quick brown fox jumped over the lazy dog." - #:anchor 'center))) + (model-move (vector2 320 240) + (label font "The quick brown fox jumped over the lazy dog." + #:anchor 'center))) (define-signal fps-label (signal-map (lambda (fps) (let ((text (format #f "FPS: ~d" fps))) - (move (vector2 0 480) (label font text)))) + (model-move (vector2 0 480) (label font text)))) fps)) (define-signal mouse-label (signal-map (lambda (p) (let ((text (format #f "Mouse: (~d, ~d)" (vx p) (vy p)))) - (move (vector2 0 460) (label font text)))) + (model-move (vector2 0 460) (label font text)))) (signal-throttle 5 mouse-position))) (define-signal scene - (signal-map group message-label fps-label mouse-label)) + (signal-map model-group message-label fps-label mouse-label)) (define camera (orthographic-camera 640 480)) |