blob: a4d5ec93c8ad96e67fa2a40674d4394165476f0e (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
-- Checks that the correct type is used checking the using clause of
-- the group when a by clause is present
{-# OPTIONS_GHC -XTransformListComp #-}
module ShouldFail where
foo = [ length x
| x <- [1..10]
, then group by x using take 2
]
|