blob: 66e5faf200f7edcf2e33c9a51bda8ef8e5921441 (
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 transform
{-# OPTIONS_GHC -XTransformListComp #-}
module ShouldFail where
import Data.List(inits)
z :: [Int]
z = [x | x <- [3, 2, 1], then inits]
|