diff options
Diffstat (limited to 'test/corecursive_func.tm')
| -rw-r--r-- | test/corecursive_func.tm | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/test/corecursive_func.tm b/test/corecursive_func.tm new file mode 100644 index 00000000..0ff92e53 --- /dev/null +++ b/test/corecursive_func.tm @@ -0,0 +1,14 @@ +func ping(x:Int)->[Text] + if x > 0 + return ["ping: {x}"] ++ pong(x-1) + else + return ["ping: {x}"] + +func pong(x:Int)->[Text] + if x > 0 + return ["pong: {x}"] ++ ping(x-1) + else + return ["pong: {x}"] + +>> ping(3) += ["ping: 3", "pong: 2", "ping: 1", "pong: 0"] |