These test both graph shape consistency and single value outputs. Eventually we want to make the graph shape tests more precise, and also verify specific outputs how it used to be. For now, this is okay. Co-authored-by: Samuel Gélineau <gelisam@gmail.com>
33 lines
506 B
Plaintext
33 lines
506 B
Plaintext
-- main.mcl --
|
|
import "fmt"
|
|
|
|
# we should only see one copy of $s1, $s2 and $fn
|
|
$s1 = "hello"
|
|
$fn = func() {
|
|
$s1 + " " + $s2
|
|
}
|
|
$s2 = "world"
|
|
|
|
test "greeting1" {
|
|
anotherstr => $fn(),
|
|
}
|
|
test "greeting2" {
|
|
anotherstr => $fn(),
|
|
}
|
|
test "greeting3" {
|
|
anotherstr => $fn(),
|
|
}
|
|
-- OUTPUT --
|
|
Edge: FuncValue -> call # fn
|
|
Edge: FuncValue -> call # fn
|
|
Edge: FuncValue -> call # fn
|
|
Vertex: FuncValue
|
|
Vertex: FuncValue
|
|
Vertex: FuncValue
|
|
Vertex: call
|
|
Vertex: call
|
|
Vertex: call
|
|
Vertex: const
|
|
Vertex: const
|
|
Vertex: const
|