From eb908c04993448f8e9d4abc05c33959d1182e24e Mon Sep 17 00:00:00 2001 From: simonmar Date: Tue, 1 May 2001 12:01:01 +0000 Subject: [PATCH] [project @ 2001-05-01 12:01:01 by simonmar] Not quite sure what this test does, but I've had it lying around for a while. --- ghc/tests/numeric/should_run/num011.hs | 2 ++ ghc/tests/numeric/should_run/num011.stdout | 1 + 2 files changed, 3 insertions(+) create mode 100644 ghc/tests/numeric/should_run/num011.hs create mode 100644 ghc/tests/numeric/should_run/num011.stdout diff --git a/ghc/tests/numeric/should_run/num011.hs b/ghc/tests/numeric/should_run/num011.hs new file mode 100644 index 0000000..a8b1c4c --- /dev/null +++ b/ghc/tests/numeric/should_run/num011.hs @@ -0,0 +1,2 @@ +import Ratio +main = print (fromRational (1 % 85070591730234615865843651857942052864) :: Float) diff --git a/ghc/tests/numeric/should_run/num011.stdout b/ghc/tests/numeric/should_run/num011.stdout new file mode 100644 index 0000000..202e6ca --- /dev/null +++ b/ghc/tests/numeric/should_run/num011.stdout @@ -0,0 +1 @@ +1.1754944e-38 -- 1.7.10.4