blob: e5d8099c528765c3a177bc9037fe7cf86454a452 (
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 -XMonadComprehensions -XTransformListComp #-}
module ShouldFail where
import GHC.List
foo = [ GHC.List.length x
| x <- [1..10]
, then group by x using take 2
]
|
