Commit 4a669405 authored by Ian Lynagh's avatar Ian Lynagh
Browse files

Add tests from testsuite/tests/h98

parent 036830b3
# This Makefile runs the tests using GHC's testsuite framework. It
# assumes the package is part of a GHC build tree with the testsuite
# installed in ../../../testsuite.
include $(TOP)/mk/
include $(TOP)/mk/
test('readFloat', exit_code(1), compile_and_run, [''])
test('enumDouble', normal, compile_and_run, [''])
test('enumRatio', normal, compile_and_run, [''])
main :: IO ()
main = print (succ (1.0e20 :: Double))
import Data.Ratio
main = print [ 1, 4%(3::Int) .. 1 ]
import Numeric
main :: IO ()
main = putStrLn $ showFloat (read "" :: Float) ""
readFloat: no parse
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment