home
/
code
/
tiger.ml.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
534c2a2c24a619905a66fe8fd3a4a6941a6a0bf9
[tiger.ml.git]
/
compiler
/
testcases
/
test07.tig
1
/* define valid mutually recursive functions */
2
let
3
4
function do_nothing1(a: int, b: string):int=
5
(do_nothing2(a+1);0)
6
7
function do_nothing2(d: int):string =
8
(do_nothing1(d, "str");" ")
9
10
in
11
do_nothing1(0, "str2")
12
end
13
This page took
0.071287 seconds
and
5
git commands to generate.