{-# LINE 1 "Bindings/APR/Env.hsc" #-}

{-# LINE 2 "Bindings/APR/Env.hsc" #-}

{-# LINE 3 "Bindings/APR/Env.hsc" #-}

module Bindings.APR.Env where
import Foreign.Ptr (Ptr,FunPtr,plusPtr)
import Foreign.Ptr (wordPtrToPtr,castPtrToFunPtr)
import Foreign.Storable
import Foreign.C.Types
import Foreign.C.String (CString,CStringLen,CWString,CWStringLen)
import Foreign.Marshal.Alloc (alloca)
import Foreign.Marshal.Array (peekArray,pokeArray)
import Data.Int
import Data.Word

{-# LINE 6 "Bindings/APR/Env.hsc" #-}
import Bindings.APR.ErrNo
import Bindings.APR.Pools

foreign import ccall "apr_env_get" c'apr_env_get
  :: Ptr (Ptr CChar) -> Ptr CChar -> Ptr C'apr_pool_t -> IO C'apr_status_t
foreign import ccall "&apr_env_get" p'apr_env_get
  :: FunPtr (Ptr (Ptr CChar) -> Ptr CChar -> Ptr C'apr_pool_t -> IO C'apr_status_t)

{-# LINE 10 "Bindings/APR/Env.hsc" #-}
foreign import ccall "apr_env_set" c'apr_env_set
  :: Ptr CChar -> Ptr CChar -> Ptr C'apr_pool_t -> IO C'apr_status_t
foreign import ccall "&apr_env_set" p'apr_env_set
  :: FunPtr (Ptr CChar -> Ptr CChar -> Ptr C'apr_pool_t -> IO C'apr_status_t)

{-# LINE 11 "Bindings/APR/Env.hsc" #-}
foreign import ccall "apr_env_delete" c'apr_env_delete
  :: Ptr CChar -> Ptr C'apr_pool_t -> IO C'apr_status_t
foreign import ccall "&apr_env_delete" p'apr_env_delete
  :: FunPtr (Ptr CChar -> Ptr C'apr_pool_t -> IO C'apr_status_t)

{-# LINE 12 "Bindings/APR/Env.hsc" #-}