X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=Data%2FIx.hs;h=3232faca3a130886b81bca76ca2d53ce499703aa;hb=ee695cc16336b7f2a6bca5bc74606c702837361d;hp=c9ebe9287efb854fd92fd9eaae42fb1a36c7ecc9;hpb=8ff1331816a5af5a51e57467614296e9053e9d22;p=ghc-base.git diff --git a/Data/Ix.hs b/Data/Ix.hs index c9ebe92..3232fac 100644 --- a/Data/Ix.hs +++ b/Data/Ix.hs @@ -10,9 +10,9 @@ -- -- Class of index types. -- --- The "Ix" class is used to map a continuous subrange of values in a type onto +-- The 'Ix' class is used to map a continuous subrange of values in a type onto -- integers. It is used primarily for array indexing (see Section 6 --- ). The "Ix" +-- ). The 'Ix' -- class contains the methods range, index, and inRange. The 'index' operation -- maps a bounding pair, which defines the lower and upper bounds of the range, -- and a subscript, to an integer. The 'range' operation enumerates all @@ -78,3 +78,12 @@ import Prelude #ifdef __GLASGOW_HASKELL__ import GHC.Arr #endif + +#ifdef __HUGS__ +import Hugs.Prelude( Ix(..) ) +#endif + +#ifdef __NHC__ +import Ix (Ix(..)) +#endif +