Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/include/NHC/BinArray.hi

Copyright © 2021 Plan 9 Foundation.
Distributed under the MIT License.
Download the Plan 9 distribution.


interface NHC.BinArray where {

{-# NEED #-}
instance NHC.Binary.Binary (BinArrayFileHeader a);

{-# NEED #-}
instance (NHC.Binary.Binary a,NHC.Binary.Binary b) => NHC.Binary.Binary (a,b);

{-# NEED #-}
instance NHC.Binary.Binary Prelude.Bool;

{-# NEED #-}
instance NHC.Binary.Binary ();

{-# NEED #-}
instance (NHC.Binary.Binary a) => NHC.Binary.Binary [a];

{-# NEED #-}
instance (NHC.Binary.Binary a) => NHC.Binary.Binary (Prelude.Maybe a);

{-# NEED #-}
instance (NHC.Binary.Binary a,NHC.Binary.Binary b) => NHC.Binary.Binary (Prelude.Either a b);

{-# NEED #-}
instance NHC.Binary.Binary Prelude.Char;

{-# NEED #-}
instance (NHC.Binary.Binary a,NHC.Binary.Binary b,NHC.Binary.Binary c) => NHC.Binary.Binary (a,b,c);

{-# NEED #-}
instance NHC.Binary.Binary NHC.Binary.BinPtr;

{-# NEED #-}
instance NHC.Binary.Binary Prelude.Int;

{-# NEED #-}
instance NHC.Binary.Binary UnboxedArray;

{-# NEED #-}
instance Prelude.Eq NHC.Binary.BinIOMode;

{-# NEED #-}
instance Prelude.Eq NHC.Binary.BinPtr;

{-# NEED #-}
instance Prelude.Num NHC.Binary.BinPtr;

{-# NEED #-}
instance Prelude.Ord NHC.Binary.BinIOMode;

{-# NEED #-}
instance Prelude.Ord NHC.Binary.BinPtr;

{-# NEED #-}
instance Prelude.Enum NHC.Binary.BinIOMode;

{-# NEED #-}
instance Prelude.Enum NHC.Binary.BinPtr;

{-# NEED #-}
instance Prelude.Show NHC.Binary.BinPtr;
interface NHC.BinArray
{-# NEED BinArrayFileHeader #-}
data BinArrayFileHeader a;
interface NHC.Binary
{-# NEED BinIOMode #-}
data BinIOMode;
interface ! NHC.BinArray
{-# NEED getBinArray #-}
getBinArray{-# 1 #-}::(NHC.Binary.Binary a) => (Prelude.FilePath -> (NHC.Internal.IO (BinArray a)));

{-# NEED putBinArray #-}
putBinArray{-# 2 #-}::(NHC.Binary.Binary a) => (Prelude.FilePath -> ((BinArray a) -> (NHC.Internal.IO ())));

{-# NEED fromBinArray #-}
fromBinArray{-# 2 #-}::(NHC.Binary.Binary a) => ((BinArray a) -> (Prelude.Int -> (NHC.Internal.IO a)));

{-# NEED intoBinArray #-}
intoBinArray{-# 2 #-}::(NHC.Binary.Binary a) => ((BinArray a) -> (a -> (NHC.Internal.IO Prelude.Int)));

{-# NEED newBinArray #-}
newBinArray{-# 2 #-}::(NHC.Binary.Binary a) => (Prelude.Int -> (a -> (NHC.Internal.IO (BinArray a))));
interface NHC.Binary
{-# NEED Binary #-}
class Binary a;
interface ! NHC.BinArray
{-# NEED {BinArray BA baSize baHandle baDefault baArray} #-}
data BinArray a
  = BA {baSize :: Prelude.Int} {baHandle :: NHC.Binary.BinHandle} {baDefault :: (NHC.Binary.Bin a)} {baArray :: UnboxedArray};
interface NHC.BinArray
{-# NEED UnboxedArray #-}
newtype {-#  #-} UnboxedArray;
interface NHC.Binary
{-# NEED Bin #-}
type {-# 1 #-} Bin a = NHC.Binary.BinPtr;

{-# NEED BinPtr #-}
newtype {-#  #-} BinPtr;

{-# NEED BinHandle #-}
newtype {-#  #-} BinHandle;
interface NHC.Internal
{-# NEED IO #-}
newtype {-#  #-} IO;
}

Bell Labs OSI certified Powered by Plan 9

(Return to Plan 9 Home Page)

Copyright © 2021 Plan 9 Foundation. All Rights Reserved.
Comments to [email protected].