From ba73375413bf799c040db1d874257af42f0179fd Mon Sep 17 00:00:00 2001
From: PHO <pho@cielonegro.org>
Date: Sun, 22 Aug 2010 15:11:06 +0900
Subject: [PATCH] bindings-apr 0.1

---
 Bindings/APR/AnyLock.hsc   | 32 --------------------------------
 bindings-apr.cabal         |  5 -----
 cbits/helper_apr_anylock.c |  6 ------
 3 files changed, 43 deletions(-)
 delete mode 100644 Bindings/APR/AnyLock.hsc
 delete mode 100644 cbits/helper_apr_anylock.c

diff --git a/Bindings/APR/AnyLock.hsc b/Bindings/APR/AnyLock.hsc
deleted file mode 100644
index acfc483..0000000
--- a/Bindings/APR/AnyLock.hsc
+++ /dev/null
@@ -1,32 +0,0 @@
-#include <bindings.dsl.h>
-#include <apr_anylock.h>
-
-module Bindings.APR.AnyLock where
-#strict_import
-import Bindings.APR.ErrNo
-import Bindings.APR.Proc.Mutex
-import Bindings.APR.Thread.Mutex
-import Bindings.APR.Thread.RWLock
-
-#synonym_t tm_lock, CInt
-#num apr_anylock_none
-#num apr_anylock_procmutex
-#num apr_anylock_readlock
-#num apr_anylock_writelock
-
-#starttype union apr_anylock_u_t
-#  union_field pm, Ptr <apr_proc_mutex_t>
-#  if APR_HAS_THREADS
-#    union_field tm, Ptr <apr_thread_mutex_t>
-#    union_field rw, Ptr <apr_thread_rwlock_t>
-#  endif
-#stoptype
-
-#starttype struct apr_anylock_t
-#field type, <tm_lock>
-#field lock, <apr_anylock_u_t>
-#stoptype
-
-#cinline APR_ANYLOCK_LOCK   , Ptr <apr_anylock_t> -> IO <apr_status_t>
-#cinline APR_ANYLOCK_TRYLOCK, Ptr <apr_anylock_t> -> IO <apr_status_t>
-#cinline APR_ANYLOCK_UNLOCK , Ptr <apr_anylock_t> -> IO <apr_status_t>
diff --git a/bindings-apr.cabal b/bindings-apr.cabal
index 752bcb2..2cf60a9 100644
--- a/bindings-apr.cabal
+++ b/bindings-apr.cabal
@@ -28,10 +28,6 @@ Library
         apr-1 >= 1.3
 
     Exposed-Modules:
-        Bindings.APR
-        Bindings.APR.Allocator
-        Bindings.APR.Allocator.Types
---        Bindings.APR.AnyLock
         Bindings.APR.Atomic
         Bindings.APR.DSO
         Bindings.APR.Env
@@ -67,7 +63,6 @@ Library
         Bindings.APR.Want
 
     C-Sources:
---        cbits/helper_apr_anylock.c
         cbits/helper_apr_errno.c
         cbits/helper_apr_general.c
         cbits/helper_apr_pools.c
diff --git a/cbits/helper_apr_anylock.c b/cbits/helper_apr_anylock.c
deleted file mode 100644
index a874008..0000000
--- a/cbits/helper_apr_anylock.c
+++ /dev/null
@@ -1,6 +0,0 @@
-#include <bindings.cmacros.h>
-#include <apr_anylock.h>
-
-BC_INLINE1(APR_ANYLOCK_LOCK   , apr_anylock_t*, apr_status_t)
-BC_INLINE1(APR_ANYLOCK_TRYLOCK, apr_anylock_t*, apr_status_t)
-BC_INLINE1(APR_ANYLOCK_UNLOCK , apr_anylock_t*, apr_status_t)
-- 
2.40.0