diff options
| author | s-ol <s-ol@users.noreply.github.com> | 2020-05-09 18:05:45 +0000 |
|---|---|---|
| committer | s-ol <s+removethis@s-ol.nu> | 2025-03-02 14:23:21 +0000 |
| commit | 7433bc35c4747e846e8adaf05445f185d4aec3a7 (patch) | |
| tree | d1497e56ecdfb6c2b6ec8d06fef263cd2814b9a1 | |
| parent | add types.T, fix spec + docs (diff) | |
| download | alive-7433bc35c4747e846e8adaf05445f185d4aec3a7.tar.gz alive-7433bc35c4747e846e8adaf05445f185d4aec3a7.zip | |
more alv-lib fixes
| -rw-r--r-- | alv-lib/time.moon | 8 | ||||
| -rw-r--r-- | alv-lib/util.moon | 2 |
2 files changed, 5 insertions, 5 deletions
diff --git a/alv-lib/time.moon b/alv-lib/time.moon index 86d7e4c..5818c31 100644 --- a/alv-lib/time.moon +++ b/alv-lib/time.moon @@ -58,7 +58,7 @@ scale_time = Constant.meta value: class extends Op new: (...) => super ... - @out or= EvtStream T.clock + @out or= T.clock\mk_evt! pattern = -evt.clock + val.num + -val.str setup: (inputs, scope) => @@ -163,7 +163,7 @@ tick = Constant.meta new: (...) => super ... @state or= { phase: 0, count: 0 } - @out or= T.num\mk_sig! @state.count + @out or= T.num\mk_sig @state.count pattern = -evt.clock + val.num setup: (inputs, scope) => @@ -204,7 +204,7 @@ every = Constant.meta super clock: Input.hot clock or scope\get '*clock*' period: Input.cold period - evt: Input.cold evt or Constant.bang, true + evt: Input.cold evt or T.bang\mk_const true @out = @inputs.evt\type!\mk_evt! tick: => @@ -244,7 +244,7 @@ Emits `evt1`, `evt2`, … as events with delays `delay0`, `delay1`, … in betwe setup: (inputs, scope) => { clock, first, steps } = pattern\match inputs - @out = EvtStream steps[1].value\type! + @out = steps[1].value\type!\mk_evt! table.insert steps, 1, { delay: first } super clock: Input.hot clock or scope\get '*clock*' diff --git a/alv-lib/util.moon b/alv-lib/util.moon index 512d74d..f4fda89 100644 --- a/alv-lib/util.moon +++ b/alv-lib/util.moon @@ -24,7 +24,7 @@ switch_ = Constant.meta setup: (inputs) => { i, values } = pattern\match inputs - @state = values[1].value.metatype == '~' + @state = values[1].result.metatype ~= '!' @out = if @state values[1]\type!\mk_sig! |