Type family with functional dependency fails to parse

Having a functional dependency with a type family causes parsing to fail ``` type family MyTypeFamily (a :: Abc) :: (r :: Type) | a -> r where MyTypeFamily 'Cba = SomeType ```