[commit: base] master: Tweak the typeable fingerprinting (d1fbd3b)

[Ian Lynagh]

Repository : ssh://darcs.haskell.org//srv/darcs/packages/base

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/d1fbd3b7c3d1ddfeabffe2b6afeb34ca6101443c

>---------------------------------------------------------------

commit d1fbd3b7c3d1ddfeabffe2b6afeb34ca6101443c
Author: Ian Lynagh <igloo at earth.li>
Date:   Fri Jul 22 23:01:10 2011 +0100

    Tweak the typeable fingerprinting
    
    Put spaces inbetween the values, so e.g.
        p:Foobar.baz
        p:Foo.barbaz
    will hash differently.

>---------------------------------------------------------------

 Data/Typeable/Internal.hs |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/Data/Typeable/Internal.hs b/Data/Typeable/Internal.hs
index cdd2778..70b468e 100644
--- a/Data/Typeable/Internal.hs
+++ b/Data/Typeable/Internal.hs
@@ -59,7 +59,7 @@ import GHC.Word
 import GHC.Show
 import GHC.Err          (undefined)
 import Data.Maybe
-import Data.List        (intersperse)
+import Data.List
 import GHC.Num
 import GHC.Real
 import GHC.IORef
@@ -171,7 +171,7 @@ mkTyCon3 :: String       -- ^ package name
          -> String       -- ^ the name of the type constructor
          -> TyCon        -- ^ A unique 'TyCon' object
 mkTyCon3 pkg modl name =
-  TyCon (fingerprintString (pkg++modl++name)) pkg modl name
+  TyCon (fingerprintString (unwords [pkg, modl, name])) pkg modl name
 
 ----------------- Observation ---------------------