Parsing failure with type-level lists

The following valid Haskell code

```
{-# LANGUAGE DataKinds, TypeOperators, PolyKinds #-}
module Bug where

data A (a :: [*]) 
data B 
data a :> b
data a :<|> b

type Fail = A '[] :> ( A '[] :<|> B)
```

fails to parse with haskell-mode. When using haskell-indentation-mode, pressing TAB fails with `No catch for tag: parse-error, "Illegal token: )"`
