blob: 15de576d91a0e22e0ad87c15e1799f1082cb6ed9 (
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 -XTransformListComp #-}
module ShouldFail where
foo = [ x + 1
| x <- ["Hello", "World"]
, then group using take 5
]
|