blob: fa9774fdfbf6e439bd92d790fab5887007059d9a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
{-# OPTIONS_GHC -fwarn-unused-matches #-}
{-# LANGUAGE MonadComprehensions, ParallelListComp #-}
-- Test for parallel list comp should work for monad comp aswell:
--
-- GHC 6.4 erroneously reported that the
-- bindings for q and z were unused
--
-- Note the parallel list comprehension,
-- which was the cause of the trouble
module ShouldCompile where
t :: [Int]
t = [ q | y <- [1..10]
| z <- [30..40], let q = z*z]
|
