Bug in CorePrep.lhs

[Kirsten Chevalier]

Using more or less the latest version of GHC from CVS, I was getting error
messages from the assembler that complained about duplicate definitions of
closures for various data constructors. I changed lines 109-113 of 
coreSyn/CorePrep.lhs as follows:

   binds_out = initUs_ us (
			  corePrepTopBinds (md_binds mod_details)	`thenUs` \ floats1 -> {-
			  corePrepTopBinds implicit_binds 	`thenUs` \ floats2 -> -}
			  returnUs (deFloatTop (floats1 {- `appOL` floats2 -}))
			)

and that seems to fix it. I don't know whether this breaks anything else,
but there's definitely a bug.

-- 
Kirsten Chevalier * krc at uclink.berkeley.edu * Often in error, never in doubt