blob: 7f4b6c784240e02f46a9167f5af30083b1a1ff3d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
-- Test trying to use a function bound in the list comprehension as the group function
{-# OPTIONS_GHC -XRank2Types -XTransformListComp #-}
module RnFail049 where
import Data.List(inits, tails)
functions :: [forall a. [a] -> [[a]]]
functions = [inits, tails]
output = [() | f <- functions, then group using f]
|
