From 189e06775c143405b914bd401f3aa5c46e329133 Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Tue, 2 Feb 1999 13:18:57 +0000
Subject: [PATCH] [project @ 1999-02-02 13:18:57 by sof] Moved
boundsOfByteArray out into exts/
---
ghc/lib/std/PrelArr.lhs | 3 ---
1 file changed, 3 deletions(-)
diff --git a/ghc/lib/std/PrelArr.lhs b/ghc/lib/std/PrelArr.lhs
index 51508a352068..331bc263f99e 100644
--- a/ghc/lib/std/PrelArr.lhs
+++ b/ghc/lib/std/PrelArr.lhs
@@ -259,13 +259,10 @@ newDoubleArray ixs = ST $ \ s# ->
(# s2#, MutableByteArray ixs barr# #) }}
boundsOfArray :: Ix ix => MutableArray s ix elt -> (ix, ix)
-boundsOfByteArray :: Ix ix => MutableByteArray s ix -> (ix, ix)
{-# SPECIALIZE boundsOfArray :: MutableArray s Int elt -> IPr #-}
-{-# SPECIALIZE boundsOfByteArray :: MutableByteArray s Int -> IPr #-}
boundsOfArray (MutableArray ixs _) = ixs
-boundsOfByteArray (MutableByteArray ixs _) = ixs
readArray :: Ix ix => MutableArray s ix elt -> ix -> ST s elt
--
GitLab