aboutsummaryrefslogtreecommitdiff
path: root/examples
diff options
context:
space:
mode:
authorThomas White <taw@physics.org>2020-08-21 22:28:50 +0200
committerThomas White <taw@physics.org>2020-08-21 22:28:50 +0200
commitd7468e259e77cfd64568dc50ba5c378145e5db7e (patch)
tree4a13184cc128e80ecf341effed138b9f91eac673 /examples
parent1a9ebe6735b7dab8784ce1aa9dc8eb0f4e3c24a4 (diff)
Get rid of 'expand-state'
From now on, states will always be real states (not functions evaluating to states). Cues, however, contain functions evaluating to states.
Diffstat (limited to 'examples')
-rw-r--r--examples/demo.scm8
1 files changed, 4 insertions, 4 deletions
diff --git a/examples/demo.scm b/examples/demo.scm
index 1dbc783..1e78ea7 100644
--- a/examples/demo.scm
+++ b/examples/demo.scm
@@ -75,20 +75,20 @@
(define cue-list
- (list (cue 0 (make-empty-state)
+ (list (cue 0 make-empty-state
#:fade-up 1
#:fade-down 1)
- (cue 1 example-state-1
+ (cue 1 (lambda () example-state-1)
#:fade-up 3
#:fade-down 5)
- (cue 2 example-state-2
+ (cue 2 (lambda () example-state-2)
#:fade-up 3
#:fade-down 1
#:down-delay 3)
- (cue 3 (make-empty-state)
+ (cue 3 make-empty-state
#:fade-up 0
#:fade-down 2)))