blob: dd8d44e6b79391f23e52478c2cd4063f9f4450b4 (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
-- Checks that the types of the old binder and the binder
-- implicitly introduced by grouping are linked
{-# OPTIONS_GHC -XMonadComprehensions -XTransformListComp #-}
module ShouldFail where
foo = [ x + 1
| x <- ["Hello", "World"]
, then group using take 5
]
|