diff options
| author | Thomas White <taw@physics.org> | 2020-08-22 12:41:21 +0200 |
|---|---|---|
| committer | Thomas White <taw@physics.org> | 2020-08-22 15:06:00 +0200 |
| commit | 3ec4c49436046db9cef9f616370e2bca090b8adb (patch) | |
| tree | 252ec39432ad81fa495d54cea2a466fcc253cd42 /guile | |
| parent | 4f010d04fe38324769e6cf77e6720a84e08e99a8 (diff) | |
Minimise exports
Diffstat (limited to 'guile')
| -rw-r--r-- | guile/starlet/base.scm | 34 | ||||
| -rw-r--r-- | guile/starlet/playback.scm | 7 |
2 files changed, 28 insertions, 13 deletions
diff --git a/guile/starlet/base.scm b/guile/starlet/base.scm index 2d218cd..9caba9e 100644 --- a/guile/starlet/base.scm +++ b/guile/starlet/base.scm @@ -7,17 +7,29 @@ #:use-module (web uri) #:use-module (srfi srfi-1) #:use-module (srfi srfi-9) - #:export (<fixture> <fixture-attribute> <starlet-state> - start-ola-output patch-fixture! - home-attr! home-all! blackout - scanout-freq make-empty-state register-state! - percent->dmxval msb lsb - hirestime set-in-state! state-for-each - merge-states-htp value->number get-attr-name - get-state-hash-table scanout-fixture - get-fixture-universe get-fixture-addr - attr-continuous attr-boolean attr-list - current-state define-state at)) + #:export (<fixture> + <fixture-attribute> + <starlet-state> + start-ola-output + patch-fixture! + scanout-freq + make-empty-state + register-state! + percent->dmxval + hirestime + state-for-each + set-in-state! + get-attr-name + value->number + merge-states-htp + get-state-hash-table + scanout-fixture + attr-continuous + attr-boolean + attr-list + current-state + define-state + at)) (define-class <fixture-attribute> (<object>) (name diff --git a/guile/starlet/playback.scm b/guile/starlet/playback.scm index d8cb861..545f98c 100644 --- a/guile/starlet/playback.scm +++ b/guile/starlet/playback.scm @@ -3,8 +3,11 @@ #:use-module (srfi srfi-1) #:use-module (srfi srfi-9) #:use-module (starlet base) - #:export (make-playback cue load-cue! - cut-to-cue-number! run-cue-number! go!)) + #:export (make-playback + cue + cut-to-cue-number! + run-cue-number! + go!)) ;; A "playback" is a state which knows how to run cues |