From: simonmar <unknown>
Date: Tue, 1 May 2001 12:01:01 +0000 (+0000)
Subject: [project @ 2001-05-01 12:01:01 by simonmar]
X-Git-Tag: Approximately_9120_patches~2039
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=eb908c04993448f8e9d4abc05c33959d1182e24e;p=ghc-hetmet.git

[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.
---

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