blob: e1a4f81e256d251ec85e06988fed68ad5a72348f (
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 as well:
--
-- 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]
|
