aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authors-ol <s-ol@users.noreply.github.com>2020-05-13 13:23:18 +0000
committers-ol <s+removethis@s-ol.nu>2025-03-02 14:23:21 +0000
commita93e35d0da806a2d377ffa550d029b064f5bcd22 (patch)
treec79c53a78d1db81013a4277ae808595dfc0d7fe4
parentallow ~ in symbols (diff)
downloadalive-a93e35d0da806a2d377ffa550d029b064f5bcd22.tar.gz
alive-a93e35d0da806a2d377ffa550d029b064f5bcd22.zip
cleanup alv/builtin
-rw-r--r--Makefile2
-rw-r--r--alv/builtin.moon13
2 files changed, 8 insertions, 7 deletions
diff --git a/Makefile b/Makefile
index 1a172af..c2e5d6a 100644
--- a/Makefile
+++ b/Makefile
@@ -23,7 +23,7 @@ docs/reference/%.html: alv-lib/%.moon $(DEPS)
@mkdir -p `dirname $@`
docs/gen/module $@ alv-lib.$(subst /,.,$*) $(subst /,.,$*)
-docs/reference/index.html: $(MODREFS) $(DEPS)
+docs/reference/index.html: alv/builtin.moon $(MODREFS) $(DEPS)
docs/gen/index $@ $(MODULES)
docs/ldoc.ltp: $(DEPS)
diff --git a/alv/builtin.moon b/alv/builtin.moon
index 3ecd921..c895590 100644
--- a/alv/builtin.moon
+++ b/alv/builtin.moon
@@ -305,7 +305,7 @@ trace = Constant.meta
value: Input.hot inputs[2]
tick: =>
- L\print "trace #{@inputs.prefix!}: #{@inputs.value\type!\pp @inputs.value!}"
+ L\print "trace #{@inputs.prefix!}: #{@inputs.value.result}"
eval: (scope, tail) =>
L\trace "evaling #{@}"
@@ -319,7 +319,7 @@ trace = Constant.meta
}
inner\eval scope
-print = Constant.meta
+print_ = Constant.meta
meta:
name: 'print'
summary: "Print string values."
@@ -376,9 +376,10 @@ to_evt = Constant.meta
summary: "Cast to !-stream."
examples: { '(! val)', '(! sig trig)' }
description: "Casts anything to a !-stream depending on arguments:
-- if `val` is a ~-stream, emits events on changes
-- if `val` is a !-stream, emits a bang for each incoming event
-- if `trig` is given, samples `sig` as a new event when `trig` arrives"
+
+- if `val` is a ~-stream, emits events on change.s
+- if `val` is a !-stream, emits a bang for each incoming even.t
+- if `trig` is given, samples `sig` as a new event when `trig` arrives."
value: class extends Op
pattern = (val! + evt.bang) / (val! / evt!)\rep(1,1)
setup: (inputs) =>
@@ -400,7 +401,7 @@ to_evt = Constant.meta
Scope.from_table {
:doc
- :trace, 'trace!': trace_, :print
+ :trace, 'trace!': trace_, print: print_
:def, :use
require: require_