diff options
| author | Thomas White <taw@physics.org> | 2022-01-25 18:06:55 +0100 |
|---|---|---|
| committer | Thomas White <taw@physics.org> | 2022-01-25 23:23:01 +0100 |
| commit | 03baaa73727f3a6ba720da5f2f9791e2b0e29c57 (patch) | |
| tree | 475cf59422f945ff5ffbe52812af7af945926316 /guile/starlet/cue-list.scm | |
| parent | bd8cf7df1c51230cf19f42408eb2dd79048774ce (diff) | |
Track time taken for cue transition
Diffstat (limited to 'guile/starlet/cue-list.scm')
| -rw-r--r-- | guile/starlet/cue-list.scm | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/guile/starlet/cue-list.scm b/guile/starlet/cue-list.scm index 016db5f..5a22251 100644 --- a/guile/starlet/cue-list.scm +++ b/guile/starlet/cue-list.scm @@ -117,10 +117,6 @@ params ...)))) -;; FIXME! -(define (cue-total-time the-cue) - 100) - (define (cue-proc number . args) (receive (states transition-effects cue-parts rest) @@ -145,8 +141,6 @@ cue-parts (current-cue-clock)))) - (set-clock-expiration-time! (current-cue-clock) - (cue-total-time the-cue)) the-cue)))) |