Parse error with multiple where clauses

[brianhv]

The following code compiles in ghc 7.2.1.

foo :: Int -> Int
foo x = x + y where
    y = z where
    z = 2

main :: IO ()
main = do
    print $ foo 2
    return ()

ghc-mod check reports no errors, but ghc-mod lint produces the cryptic:

%ghc-mod lint minerror.hs
minerror.hs:6:1: Parse errorError message:  Parse error: ;Code:        z = 2      > main :: IO ()    main = do        print $ foo 2

Removing the second where from foo eliminates the parse error. I would expect the above code to either produce no error from lint, or to complain about the second where rather than showing a parse error in an unrelated location.

[kazu-yamamoto]

If this is a really problem, please ask the author of hlint. ghc-mod just executes hlint and uses its result.

[brianhv]

For anyone coming across this in a search, it appears this has already been reported upstream, as well as even more upstream.