testsuite/tests/ghc-regress/typecheck/should_fail/tcfail189.hs


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
      ]