ghc/lib/haskell-1.3/LibPosixUtil_p.hi

   1 {-# GHC_PRAGMA INTERFACE VERSION 5 #-}
   2 interface LibPosixUtil where
   3 import PreludeArray(_ByteArray)
   4 import PreludeGlaST(_MutableByteArray)
   5 import PreludeIOError(IOError13)
   6 import PreludeMonadicIO(Either)
   7 type ByteCount = Int
   8 type Channel = Int
   9 type ClockTick = Int
  10 type EpochTime = Int
  11 type FileOffset = Int
  12 type GroupID = Int
  13 type Limit = Int
  14 type LinkCount = Int
  15 type ProcessGroupID = Int
  16 type ProcessID = Int
  17 type UserID = Int
  18 data _ByteArray a       {-# GHC_PRAGMA _ByteArray (a, a) ByteArray# #-}
  19 data _MutableByteArray a b      {-# GHC_PRAGMA _MutableByteArray (b, b) (MutableByteArray# a) #-}
  20 allocChars :: Int -> _State a -> (_MutableByteArray a (), _State a)
  21         {-# GHC_PRAGMA _A_ 2 _U_ 11 _N_ _S_ "U(P)U(P)" {_A_ 2 _U_ 22 _N_ _N_ _N_ _N_} _N_ _N_ #-}
  22 allocWords :: Int -> _State a -> (_MutableByteArray a (), _State a)
  23         {-# GHC_PRAGMA _A_ 2 _U_ 11 _N_ _S_ "U(P)U(P)" {_A_ 2 _U_ 22 _N_ _N_ _N_ _N_} _N_ _N_ #-}
  24 freeze :: _MutableByteArray a () -> _State a -> (_ByteArray (), _State a)
  25         {-# GHC_PRAGMA _A_ 2 _U_ 11 _N_ _S_ "U(LP)U(P)" {_A_ 3 _U_ 222 _N_ _N_ _N_ _N_} _N_ _N_ #-}
  26 strcpy :: _Addr -> _State _RealWorld -> ([Char], _State _RealWorld)
  27         {-# GHC_PRAGMA _A_ 2 _U_ 11 _N_ _S_ "U(P)U(P)" {_A_ 2 _U_ 22 _N_ _N_ _N_ _N_} _N_ _N_ #-}
  28 syserr :: [Char] -> _State _RealWorld -> (Either IOError13 a, _State _RealWorld)
  29         {-# GHC_PRAGMA _A_ 2 _U_ 21 _N_ _S_ "LU(P)" {_A_ 2 _U_ 22 _N_ _N_ _N_ _N_} _N_ _N_ #-}
  30 unvectorize :: _Addr -> Int -> _State _RealWorld -> ([[Char]], _State _RealWorld)
  31         {-# GHC_PRAGMA _A_ 3 _U_ 111 _N_ _S_ "U(P)U(P)U(P)" {_A_ 3 _U_ 222 _N_ _N_ _N_ _N_} _N_ _N_ #-}
  32 vectorize :: [[Char]] -> _State _RealWorld -> (_ByteArray (), _State _RealWorld)
  33         {-# GHC_PRAGMA _A_ 2 _U_ 21 _N_ _S_ "SU(P)" {_A_ 2 _U_ 22 _N_ _N_ _N_ _N_} _N_ _N_ #-}
  34