[cvs-nhc98] patch applied (yhc): Yet more invariant stuff, fixes up enough to get Supero going through

Thu Jun 21 14:23:19 PDT 2007 Neil Mitchell * Yet more invariant stuff, fixes up enough to get Supero going through M ./src/libraries/core/Yhc/Core/Invariant.hs -9 +27