blob: 83f6c5c27690f3c9f66ff7fb3a7a2595e838ecde (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
-- GHC 6.4.1 said
-- test.hs:1:5:
-- Warning: accepting non-standard pattern guards
-- (-fglasgow-exts to suppress this message)
-- [x <- ((1 * 2) + 3) * 4, undefined]
-- Note the wrongly-parenthesised expression
{-# LANGUAGE Haskell98 #-}
module ShouldCompile where
main | x <- 1*2+3*4 = x
|