/usr/web/sources/contrib/fernan/nhc98/src/prelude/IOExtras/BoundsIOArray.hs

Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/src/prelude/IOExtras/BoundsIOArray.hs


module NHC.IOExtras
  ( boundsIOArray
  ) where

import Ix
import DIOArray

boundsIOArray :: Ix ix => IOArray ix elt -> (ix,ix)
boundsIOArray (MkIOArray b _) = b

(Return to Plan 9 Home Page)