Import Upstream version 20180207
[hcoop/debian/mlton.git] / regression / 9.sml
1 fun 'a f (x: 'a): 'a = x
2
3 val y: int -> int = f