lang: Port TestAstFunc2 to txtar format
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.
This commit is contained in:
@@ -0,0 +1,35 @@
|
||||
-- main.mcl --
|
||||
$funcgen = func() {
|
||||
func($b) {
|
||||
"hello" + " " + "world"
|
||||
}
|
||||
}
|
||||
|
||||
$some_bool = false
|
||||
$fn = if $some_bool {
|
||||
$funcgen()
|
||||
} else {
|
||||
func($bb) {
|
||||
if $bb == "james" {
|
||||
"hello purpleidea"
|
||||
} else {
|
||||
if $bb == "" {
|
||||
"who is there?"
|
||||
} else {
|
||||
"hello " + $bb
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
$out1 = $fn("user")
|
||||
$out2 = $fn("james")
|
||||
$out3 = $fn("")
|
||||
|
||||
test $out1 {}
|
||||
test $out2 {}
|
||||
test $out3 {}
|
||||
-- OUTPUT --
|
||||
Vertex: test[hello purpleidea]
|
||||
Vertex: test[hello user]
|
||||
Vertex: test[who is there?]
|
||||
Reference in New Issue
Block a user