[commit: base] master: Move ix001 to base/tests (4eef4e7)
Ian Lynagh
igloo at earth.li
Sun Nov 20 01:12:46 CET 2011
Repository : ssh://darcs.haskell.org//srv/darcs/packages/base
On branch : master
http://hackage.haskell.org/trac/ghc/changeset/4eef4e7b987fb41b12a0502b8f1b3b80b2ec8ec0
>---------------------------------------------------------------
commit 4eef4e7b987fb41b12a0502b8f1b3b80b2ec8ec0
Author: Ian Lynagh <igloo at earth.li>
Date: Sat Nov 19 23:33:50 2011 +0000
Move ix001 to base/tests
>---------------------------------------------------------------
tests/all.T | 1 +
tests/ix001.hs | 4 ++++
tests/ix001.stdout | 1 +
3 files changed, 6 insertions(+), 0 deletions(-)
diff --git a/tests/all.T b/tests/all.T
index dc3483d..b96722a 100644
--- a/tests/all.T
+++ b/tests/all.T
@@ -22,4 +22,5 @@ test('hash001', normal, compile_and_run, [''])
test('lexNum', normal, compile_and_run, [''])
test('take001', extra_run_opts('1'), compile_and_run, [''])
test('genericNegative001', extra_run_opts('-1'), compile_and_run, [''])
+test('ix001', normal, compile_and_run, [''])
diff --git a/tests/ix001.hs b/tests/ix001.hs
new file mode 100644
index 0000000..c723472
--- /dev/null
+++ b/tests/ix001.hs
@@ -0,0 +1,4 @@
+import Data.Ix
+import Data.Int
+
+main = print (index (minBound::Int16,maxBound) maxBound)
diff --git a/tests/ix001.stdout b/tests/ix001.stdout
new file mode 100644
index 0000000..7a53b35
--- /dev/null
+++ b/tests/ix001.stdout
@@ -0,0 +1 @@
+65535
More information about the Cvs-libraries
mailing list