Import Upstream version 20180207
[hcoop/debian/mlton.git] / regression / real-decimal.1.ok
1 minusIEEENan = ~nan
2 signBit (valOf (fromDecimal minusIEEENan)) = true