#include #include module Bindings.APR.User where #strict_import import Bindings.APR.ErrNo import Bindings.APR.Pools #integral_t apr_uid_t #integral_t apr_gid_t #if APR_HAS_USER # ccall apr_uid_current , Ptr -> Ptr -> Ptr -> IO # ccall apr_uid_name_get , Ptr (Ptr CChar) -> -> Ptr -> IO # ccall apr_uid_get , Ptr -> Ptr -> Ptr CChar -> Ptr -> IO # ccall apr_uid_homepath_get, Ptr (Ptr CChar) -> Ptr CChar -> Ptr -> IO # cinline apr_uid_compare , -> -> IO # ccall apr_gid_name_get , Ptr (Ptr CChar) -> -> Ptr -> IO # ccall apr_gid_get , Ptr -> Ptr CChar -> Ptr -> IO # cinline apr_gid_compare , -> -> IO #endif