[Haskell-cafe] Classes in type declarations in Hugs

Hello, I have this line: type CPResult a = MonadError CPError m => m a GHC (with various command-line options I'm already using) compiles this fine. hugs, with -98 +o, complains: Syntax error in input (unexpected `=>') How do I make this work both places?