Expose option module to the rest of the program
[tiger.ml.git] / compiler / testcases / test07.tig
CommitLineData
38ffcb1f
SK
1/* define valid mutually recursive functions */
2let
3
4function do_nothing1(a: int, b: string):int=
5 (do_nothing2(a+1);0)
6
7function do_nothing2(d: int):string =
8 (do_nothing1(d, "str");" ")
9
10in
11 do_nothing1(0, "str2")
12end
13
This page took 0.033148 seconds and 4 git commands to generate.