[commit: packages/array] master: Error message wibble following module suppression (0b23a9b)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/array

On branch  : master
Link       : http://git.haskell.org/packages/array.git/commitdiff/0b23a9b9a0a8e89336687aa318d9142e2f542db3

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

commit 0b23a9b9a0a8e89336687aa318d9142e2f542db3
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date:   Tue Apr 7 17:46:03 2015 +0100

    Error message wibble following module suppression


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

0b23a9b9a0a8e89336687aa318d9142e2f542db3
 tests/T9220.stdout | 17 +++++++----------
 1 file changed, 7 insertions(+), 10 deletions(-)

diff --git a/tests/T9220.stdout b/tests/T9220.stdout
index 71582f2..41287b1 100644
--- a/tests/T9220.stdout
+++ b/tests/T9220.stdout
@@ -1,26 +1,23 @@
 type role Data.Array.Base.UArray nominal nominal
 data Data.Array.Base.UArray i e
-  = Data.Array.Base.UArray !i
-                           !i
-                           {-# UNPACK #-}Int
-                           GHC.Prim.ByteArray#
+  = Data.Array.Base.UArray !i !i {-# UNPACK #-}Int ByteArray#
   	-- Defined in ‘Data.Array.Base’
-instance (GHC.Arr.Ix ix, Eq e,
+instance (Ix ix, Eq e,
           Data.Array.Base.IArray Data.Array.Base.UArray e) =>
          Eq (Data.Array.Base.UArray ix e)
   -- Defined in ‘Data.Array.Base’
-instance (GHC.Arr.Ix ix, Ord e,
+instance (Ix ix, Ord e,
           Data.Array.Base.IArray Data.Array.Base.UArray e) =>
          Ord (Data.Array.Base.UArray ix e)
   -- Defined in ‘Data.Array.Base’
-instance (GHC.Arr.Ix ix, Show ix, Show e,
+instance (Ix ix, Show ix, Show e,
           Data.Array.Base.IArray Data.Array.Base.UArray e) =>
          Show (Data.Array.Base.UArray ix e)
   -- Defined in ‘Data.Array.Base’
 type role Data.Array.IO.Internals.IOUArray nominal nominal
 newtype Data.Array.IO.Internals.IOUArray i e
   = Data.Array.IO.Internals.IOUArray (Data.Array.Base.STUArray
-                                        GHC.Prim.RealWorld i e)
+                                        RealWorld i e)
   	-- Defined in ‘Data.Array.IO.Internals’
 instance Eq (Data.Array.IO.Internals.IOUArray i e)
   -- Defined in ‘Data.Array.IO.Internals’
@@ -29,7 +26,7 @@ data Data.Array.Base.STUArray s i e
   = Data.Array.Base.STUArray !i
                              !i
                              {-# UNPACK #-}Int
-                             (GHC.Prim.MutableByteArray# s)
+                             (MutableByteArray# s)
   	-- Defined in ‘Data.Array.Base’
 instance Eq (Data.Array.Base.STUArray s i e)
   -- Defined in ‘Data.Array.Base’
@@ -38,5 +35,5 @@ data Data.Array.Storable.Internals.StorableArray i e
   = Data.Array.Storable.Internals.StorableArray !i
                                                 !i
                                                 Int
-                                                !(GHC.ForeignPtr.ForeignPtr e)
+                                                !(ForeignPtr e)
   	-- Defined in ‘Data.Array.Storable.Internals’