[hcoop/debian/mlton.git] / regression / int-inf.3.sml

val _ = print (Bool.toString ((1: IntInf.int) < 2))
val _ = print (IntInf.toString (IntInf.quot (1234567890, 100000)))
val _ = print "\n"
Commit	Line	Data
7f918cf1 CE	1	val _ = print (Bool.toString ((1: IntInf.int) < 2))
	2	val _ = print (IntInf.toString (IntInf.quot (1234567890, 100000)))
	3	val _ = print "\n"