[fix for IdMap binary instance
John Meacham <john@repetae.net>**20061122062940] hunk ./Name/Binary.hs 28
-        return (idMapFromDistinctAscList idl `mappend` idMapFromList ndl)
+        return (idMapFromDistinctAscList idl `mappend` idMapFromList [ (toId n,v) | (n,v) <- ndl ])