Commit 5207c0ff authored by ian@well-typed.com's avatar ian@well-typed.com

Add a test for #7881

parent f70e79ac
module T7881 where
import Data.Int
x1 :: [Int8]
x1 = [5 .. 3]
x2 :: [Int8]
x2 = [3 .. 5]
x3 :: [Int8]
x3 = [5, 3 .. 1]
x4 :: [Int8]
x4 = [5, (3+0) .. 1]
x5 :: [Int8]
x5 = [1, 3 .. 5]
x6 :: [Int8]
x6 = [1, (3+0) .. 5]
x7 :: [Int8]
x7 = [5, 7 .. 1]
x8 :: [Int8]
x8 = [5, (7+0) .. 1]
x9 :: [Int8]
x9 = [3, 1 .. 5]
x10 :: [Int8]
x10 = [3, (1+0) .. 5]
T7881.hs:7:6: Warning: Enumeration is empty
T7881.hs:25:6: Warning: Enumeration is empty
T7881.hs:31:6: Warning: Enumeration is empty
test('T7116', normal, run_command, ['$MAKE -s --no-print-directory T7116'])
test('T7895', normal, compile, [''])
test('T7881', normal, compile, [''])
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