HCoop / hcoop / debian / mlton.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
Import Upstream version 20180207
[hcoop/debian/mlton.git] / regression / poly-equal.sml
1 val _ =
2 print(if ([1, 2, 3], [4, 5]) = ([1, 2, 3], [4])
3 then "true\n"
4 else "false\n")
mlton packaging