HCoop / hcoop / debian / mlton.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
Backport from sid to buster
[hcoop/debian/mlton.git] / regression / 6.sml
1 fun f x = x
2
3 val r: (int -> int) ref = ref f
4
5 val _ = r := (fn y => y)
6
7 val _ = !r 13 + 1
mlton packaging