Import Upstream version 20180207
[hcoop/debian/mlton.git] / regression / int-inf.3.sml
1 val _ = print (Bool.toString ((1: IntInf.int) < 2))
2 val _ = print (IntInf.toString (IntInf.quot (1234567890, 100000)))
3 val _ = print "\n"