[commit: packages/array] master: Update testsuite for D1617 (f643793)

git at git.haskell.org git at git.haskell.org
Tue Dec 15 20:06:01 UTC 2015


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

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

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

commit f643793b3fbffd7419f403bedc65b7ac06dff0cd
Author: Ben Gamari <ben at smart-cactus.org>
Date:   Tue Dec 15 14:01:30 2015 -0500

    Update testsuite for D1617


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

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

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



More information about the ghc-commits mailing list