]> gitweb @ CieloNegro.org - bindings-apr-util.git/blob - Bindings/APR/ResList.hsc
Bindings.APR.XML and APU.Version
[bindings-apr-util.git] / Bindings / APR / ResList.hsc
1 #include <bindings.dsl.h>
2 #include <apr_reslist.h>
3
4 module Bindings.APR.ResList where
5 #strict_import
6 import Bindings.APR
7 import Bindings.APR.ErrNo
8 import Bindings.APR.Pools
9 import Bindings.APR.Time
10
11 #if APR_HAS_THREADS
12 #  opaque_t apr_reslist_t
13 #  callback apr_reslist_constructor, Ptr (Ptr ()) -> Ptr () -> Ptr <apr_pool_t> -> IO <apr_status_t>
14 #  callback apr_reslist_destructor , Ptr () -> Ptr () -> Ptr <apr_pool_t> -> IO <apr_status_t>
15
16 #  ccall apr_reslist_create , Ptr (Ptr <apr_reslist_t>) -> CInt -> CInt -> CInt -> <apr_interval_time_t> -> <apr_reslist_constructor> -> <apr_reslist_destructor> -> Ptr () -> Ptr <apr_pool_t> -> IO <apr_status_t>
17 #  ccall apr_reslist_destroy, Ptr <apr_reslist_t> -> IO <apr_status_t>
18 #  ccall apr_reslist_acquire, Ptr <apr_reslist_t> -> Ptr (Ptr ()) -> IO <apr_status_t>
19 #  ccall apr_reslist_release, Ptr <apr_reslist_t> -> Ptr () -> IO <apr_status_t>
20
21 #  ccall apr_reslist_timeout_set   , Ptr <apr_reslist_t> -> <apr_interval_time_t> -> IO ()
22 #  ccall apr_reslist_acquired_count, Ptr <apr_reslist_t> -> IO <apr_uint32_t>
23 #  ccall apr_reslist_invalidate    , Ptr <apr_reslist_t> -> Ptr () -> IO <apr_status_t>
24 #endif