summaryrefslogtreecommitdiff
path: root/testsuite/tests/numeric/should_compile/T10929.hs
blob: 47e00719c47bb5b78eb1cc1e1f5b24d542317359 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
module T10929 where

x1 :: [Integer]
x1 = [5 .. 3]

x2 :: [Integer]
x2 = [3 .. 5]

x3 :: [Integer]
x3 = [5, 3 .. 1]

x4 :: [Integer]
x4 = [5, (3+0) .. 1]

x5 :: [Integer]
x5 = [1, 3 .. 5]

x6 :: [Integer]
x6 = [1, (3+0) .. 5]

x7 :: [Integer]
x7 = [5, 7 .. 1]

x8 :: [Integer]
x8 = [5, (7+0) .. 1]

x9 :: [Integer]
x9 = [3, 1 .. 5]

x10 :: [Integer]
x10 = [3, (1+0) .. 5]