X-Git-Url: http://git.cielonegro.org/gitweb.cgi?p=bindings-apr.git;a=blobdiff_plain;f=Bindings%2FAPR%2FPortable.hsc;fp=Bindings%2FAPR%2FPortable.hsc;h=66288f5fb2c03c5f66219928df8811ca1d5560b2;hp=498b17d51633c0a2787b9ae473957c44b5fa3f3e;hb=7c98f6e99621867364357f69f9034a559999b324;hpb=ba73375413bf799c040db1d874257af42f0179fd

diff --git a/Bindings/APR/Portable.hsc b/Bindings/APR/Portable.hsc
index 498b17d..66288f5 100644
--- a/Bindings/APR/Portable.hsc
+++ b/Bindings/APR/Portable.hsc
@@ -39,22 +39,8 @@ import Bindings.APR.Time
 #  field protocol, CInt
 #stoptype
 
-#if APR_PROC_MUTEX_IS_GLOBAL
-type C'apr_os_global_mutex_t = C'apr_os_proc_mutex_t
-
-c'apr_os_global_mutex_get :: Ptr C'apr_os_global_mutex_t -> Ptr C'apr_global_mutex_t -> IO C'apr_status_t
-c'apr_os_global_mutex_get = c'apr_os_proc_mutex_get
-#else
-#  starttype struct apr_os_global_mutex_t
-#    field pool      , Ptr <apr_pool_t>
-#    field proc_mutex, Ptr <apr_proc_mutex_t>
-#    if APR_HAS_THREADS
-#      field thread_mutex, Ptr <apr_thread_mutex_t>
-#    endif
-#  stoptype
-
-#  ccall apr_os_global_mutex_get, Ptr <apr_os_global_mutex_t> -> Ptr <apr_global_mutex_t> -> IO <apr_status_t>
-#endif
+#opaque_t apr_os_global_mutex_t
+#cinline apr_os_global_mutex_get, Ptr <apr_os_global_mutex_t> -> Ptr <apr_global_mutex_t> -> IO <apr_status_t>
 
 #ccall apr_os_file_get      , Ptr <apr_os_file_t> -> Ptr <apr_file_t> -> IO <apr_status_t>
 #ccall apr_os_dir_get       , Ptr (Ptr <apr_os_dir_t>) -> Ptr <apr_dir_t> -> IO <apr_status_t>