[cvs-nhc98] Fix bug whereby the following module failed to compile.

Malcolm Wallace malcolm@sparud.net
Fri, 14 Dec 2001 18:14:46 +0100 (CET)


malcolm: Fri Dec 14 18:14:46 CET 2001

Update of /usr/src/master/nhc/src/compiler98
In directory hinken:/tmp/cvs-serv3229

Modified Files:
	MkSyntax.hs 
Log Message:
Fix bug whereby the following module failed to compile.

    data Foo = Foo Int Bar deriving Show
    data Bar = Bar Int Int deriving Show

    a `Foo` (b `Bar` c) = 3 `Foo` (4 `Bar` 5)

The explicit associativity of the LHS pattern was being lost.