From a0b2bf54a5e20565d984686677df45ec3444cae9 Mon Sep 17 00:00:00 2001 From: sheaf 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 d5cf6d6..420fdfe 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 $