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
399 B
Plaintext
17 lines
399 B
Plaintext
-- main.mcl --
|
|
import "fmt"
|
|
|
|
# test a function with part of the expression scoped from outside
|
|
$c1 = 42 # put this after to confirm any-order rules
|
|
$constmult = func($x) {
|
|
$c1 * $x * $c2
|
|
}
|
|
$c2 = 37 # put this after to confirm any-order rules
|
|
|
|
$num = 13
|
|
$out = $constmult($num) # 20202
|
|
|
|
test fmt.printf("%d * %d * %d is %d", $c1, $num, $c2, $out) {}
|
|
-- OUTPUT --
|
|
Vertex: test[42 * 13 * 37 is 20202]
|