blob: 16a3c49972b9d86a2d83379c7a2472dbd25ee5fd (
plain)
1
2
3
4
5
6
7
8
9
|
{-# OPTIONS_GHC -Wall #-}
{-# LANGUAGE ParallelListComp #-}
-- On GHC 6.0 and earlier, this parallel list comprehension generated
-- an incorrect unused-binding warning.
module ShouldCompile where
t :: [(Char,Char)]
t = [ (a,b) | a <- "foo" | b <- "bar" ]
|
