Import Upstream version 20180207
[hcoop/debian/mlton.git] / regression / fail / 4.sml
1 datatype foo = Foo of 'a