diff options
| author | Ian Lynagh <igloo@earth.li> | 2011-11-19 23:23:29 +0000 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2011-11-19 23:23:29 +0000 |
| commit | d7d45de5508b4a7ef245469ecddcae4d9cf8bb84 (patch) | |
| tree | 40d96c48f9a874cd1595e53852f4a6acbfb28ca3 /libraries/base/tests/take001.hs | |
| parent | 1303b938f95fec2a0e90e1d9d445c0b0322fd5fa (diff) | |
| download | haskell-d7d45de5508b4a7ef245469ecddcae4d9cf8bb84.tar.gz | |
Move Data.List tests to base/tests
Diffstat (limited to 'libraries/base/tests/take001.hs')
| -rw-r--r-- | libraries/base/tests/take001.hs | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/libraries/base/tests/take001.hs b/libraries/base/tests/take001.hs new file mode 100644 index 0000000000..a7a531480a --- /dev/null +++ b/libraries/base/tests/take001.hs @@ -0,0 +1,5 @@ +-- Test for bug #1219, F/B rule for take was too strict +import System.Environment +main = do + (n:_) <- getArgs + print (map (const 'x') (take (read n) (undefined:undefined))) |