Parsing error

[Ralf Hinze]

Dear Hugs maintainers,

the version of hugs in the repository stumbles over the following
program (which the february 2001 version compiles without problems):

> data Dir			=  C | N | NE | E | SE | S | SW | W | NW
>				   deriving (Eq, Read, Show, Enum, Ord)

> instance Num Dir where
>	a + b			=  toEnum (fromEnum a + fromEnum b)
>	a - b			=  toEnum (fromEnum a - fromEnum b)

Parsing
ERROR error.lhs:6 - Syntax error in declaration (unexpected `-')

Just to let you know ...

Cheers, Ralf