This ports TestAstFunc2 from our home-grown content storage system to the txtar package. Since a single file can be used to represent the entire folder hierarchy, this makes it much easier to see and edit tests.
17 lines
329 B
Plaintext
17 lines
329 B
Plaintext
-- main.mcl --
|
|
$prefix = "hello"
|
|
|
|
# this should be a function as a value, iow a lambda
|
|
$prefixer = func($x) {
|
|
$prefix + ":" + $x # i'd only ever expect one ":" in the graph
|
|
}
|
|
|
|
$out1 = $prefixer("world")
|
|
$out2 = $prefixer($out1)
|
|
|
|
test $out1 {}
|
|
test $out2 {}
|
|
-- OUTPUT --
|
|
Vertex: test[hello:world]
|
|
Vertex: test[hello:hello:world]
|