Skip to content

Commit

Permalink
Data.Array.Base: remove useless SPECIALISE pragmas
Browse files Browse the repository at this point in the history
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.
  • Loading branch information
sheaf committed Dec 18, 2024
1 parent 3f6ccd2 commit a0b2bf5
Showing 1 changed file with 1 addition and 10 deletions.
11 changes: 1 addition & 10 deletions Data/Array/Base.hs
Original file line number Diff line number Diff line change
Expand Up @@ -587,23 +587,14 @@ 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) $
showString "array " .
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 $
Expand Down

0 comments on commit a0b2bf5

Please sign in to comment.