[cvs-nhc98] nhc doesn't cope with funlhs -> ( funlhs ) apat {apat}

[Malcolm Wallace]

> This module:
>     module Q where
>     f :: Int -> Int -> Int
>     (f a) b = a + b
> causes
>     Fail: Need infix operator at 5:9
> (5:9 being the b) but it is valid as
>     funlhs -> ( funlhs ) apat {apat}

This is a known (and documented) bug in nhc98's parser.  It is not
easy to fix.

Regards,
    Malcolm