From 4cb87da152aa22bf368e5648ef0956c5f863e313 Mon Sep 17 00:00:00 2001 From: PHO Date: Tue, 31 Aug 2010 21:50:49 +0900 Subject: [PATCH] Bindings.APR.Base64 --- Bindings/APR/Base64.hsc | 13 +++++++++++++ Bindings/APU.hsc | 26 ++++++++++++++++++++++++++ bindings-apr-util.cabal | 2 ++ 3 files changed, 41 insertions(+) create mode 100644 Bindings/APR/Base64.hsc create mode 100644 Bindings/APU.hsc diff --git a/Bindings/APR/Base64.hsc b/Bindings/APR/Base64.hsc new file mode 100644 index 0000000..2ea30a0 --- /dev/null +++ b/Bindings/APR/Base64.hsc @@ -0,0 +1,13 @@ +#include +#include + +module Bindings.APR.Base64 where +#strict_import + +#ccall apr_base64_encode_len , CInt -> IO CInt +#ccall apr_base64_encode , Ptr CChar -> Ptr CChar -> CInt -> IO CInt +#ccall apr_base64_encode_binary, Ptr CChar -> Ptr CUChar -> CInt -> IO CInt +#ccall apr_base64_decode_len , Ptr CChar -> IO CInt +#ccall apr_base64_decode , Ptr CChar -> Ptr CChar -> IO CInt +#ccall apr_base64_decode_binary, Ptr CUChar -> Ptr CChar -> IO CInt + diff --git a/Bindings/APU.hsc b/Bindings/APU.hsc new file mode 100644 index 0000000..f5bc88a --- /dev/null +++ b/Bindings/APU.hsc @@ -0,0 +1,26 @@ +#include +#include + +module Bindings.APU where +#strict_import + +#num APU_HAVE_SDBM +#num APU_HAVE_GDBM +#num APU_HAVE_NDBM +#num APU_HAVE_DB + +#if APU_HAVE_DB +# num APU_HAVE_DB_VERSION +#endif + +#num APU_HAVE_PGSQL +#num APU_HAVE_MYSQL +#num APU_HAVE_SQLITE3 +#num APU_HAVE_SQLITE2 +#num APU_HAVE_ORACLE +#num APU_HAVE_FREETDS +#num APU_HAVE_ODBC + +#num APU_HAVE_APR_ICONV +#num APU_HAVE_ICONV +#num APR_HAS_XLATE diff --git a/bindings-apr-util.cabal b/bindings-apr-util.cabal index 7378386..4c8d66a 100644 --- a/bindings-apr-util.cabal +++ b/bindings-apr-util.cabal @@ -29,7 +29,9 @@ Library apr-util-1 >= 1.3 Exposed-Modules: + Bindings.APU Bindings.APR.AnyLock + Bindings.APR.Base64 C-Sources: cbits/helper_apr_anylock.c -- 2.40.0