From a0b2bf54a5e20565d984686677df45ec3444cae9 Mon Sep 17 00:00:00 2001
From: sheaf <sam.derbyshire@gmail.com>
Date: Mon, 16 Dec 2024 15:27:29 +0000
Subject: [PATCH] Data.Array.Base: remove useless SPECIALISE pragmas
These SPECIALISE pragmas don't actually do anything,
and starting with GHC 9.14 cause a warning to be emitted.
This commit simply removes them.
---
Data/Array/Base.hs | 11 +----------
1 file changed, 1 insertion(+), 10 deletions(-)
diff --git a/Data/Array/Base.hs b/Data/Array/Base.hs
index d5cf6d6b..420fdfee 100644
--- a/Data/Array/Base.hs
+++ b/Data/Array/Base.hs
@@ -587,11 +587,6 @@ cmpIntUArray arr1@(UArray l1 u1 n1 _) arr2@(UArray l2 u2 n2 _) =
-----------------------------------------------------------------------------
-- Showing and Reading IArrays
-{-# SPECIALISE
- showsIArray :: (IArray UArray e, Ix i, Show i, Show e) =>
- Int -> UArray i e -> ShowS
- #-}
-
showsIArray :: (IArray a e, Ix i, Show i, Show e) => Int -> a i e -> ShowS
showsIArray p a =
showParen (p > appPrec) $
@@ -599,11 +594,7 @@ showsIArray p a =
shows (bounds a) .
showChar ' ' .
shows (assocs a)
-
-{-# SPECIALISE
- readIArray :: (IArray UArray e, Ix i, Read i, Read e) =>
- ReadPrec (UArray i e)
- #-}
+
readIArray :: (IArray a e, Ix i, Read i, Read e) => ReadPrec (a i e)
readIArray = parens $ prec appPrec $
--
GitLab