X-Git-Url: http://git.cielonegro.org/gitweb.cgi?p=bindings-apr.git;a=blobdiff_plain;f=Bindings%2FAPR%2FStrings.hsc;fp=Bindings%2FAPR%2FStrings.hsc;h=86bcf04f9ed88a5ce05c50fa9912be3a6427c849;hp=0000000000000000000000000000000000000000;hb=24b724830db91f5172a00369e85eca146fb1d090;hpb=5a3f4dada5c980672b04376467cc24aeb5654aff

diff --git a/Bindings/APR/Strings.hsc b/Bindings/APR/Strings.hsc
new file mode 100644
index 0000000..86bcf04
--- /dev/null
+++ b/Bindings/APR/Strings.hsc
@@ -0,0 +1,33 @@
+#include <bindings.dsl.h>
+#include <apr_shm.h>
+
+module Bindings.APR.Strings where
+#strict_import
+import Bindings.APR
+import Bindings.APR.ErrNo
+import Bindings.APR.Pools
+import Bindings.APR.Want
+
+#ccall apr_strnatcmp    , Ptr CChar -> Ptr CChar -> IO CInt
+#ccall apr_strnatcasecmp, Ptr CChar -> Ptr CChar -> IO CInt
+#ccall apr_pstrdup      , Ptr <apr_pool_t> -> Ptr CChar -> IO (Ptr CChar)
+#ccall apr_pstrmemdup   , Ptr <apr_pool_t> -> Ptr CChar -> <apr_size_t> -> IO (Ptr CChar)
+#ccall apr_pstrndup     , Ptr <apr_pool_t> -> Ptr CChar -> <apr_size_t> -> IO (Ptr CChar)
+#ccall apr_pmemdup      , Ptr <apr_pool_t> -> Ptr () -> <apr_size_t> -> IO (Ptr ())
+-- FIXME: apr_pstrcat
+#ccall apr_pstrcatv     , Ptr <apr_pool_t> -> Ptr <iovec> -> <apr_size_t> -> Ptr <apr_size_t> -> IO (Ptr CChar)
+-- FIXME: apr_pvsprintf
+-- FIXME: apr_psprintf
+#ccall apr_cpystrn         , Ptr CChar -> Ptr CChar -> <apr_size_t> -> IO (Ptr CChar)
+#ccall apr_collapse_spaces , Ptr CChar -> Ptr CChar -> IO (Ptr CChar)
+#ccall apr_tokenize_to_argv, Ptr CChar -> Ptr (Ptr (Ptr CChar)) -> Ptr <apr_pool_t> -> IO <apr_status_t>
+#ccall apr_strtok          , Ptr CChar -> Ptr CChar -> Ptr (Ptr CChar) -> IO (Ptr CChar)
+-- FIXME: apr_snprintf
+-- FIXME: apr_vsnprintf
+#ccall apr_itoa         , Ptr <apr_pool_t> -> CInt -> IO (Ptr CChar)
+#ccall apr_ltoa         , Ptr <apr_pool_t> -> CLong -> IO (Ptr CChar)
+#ccall apr_off_t_toa    , Ptr <apr_pool_t> -> <apr_off_t> -> IO (Ptr CChar)
+#ccall apr_strtoff      , Ptr <apr_off_t> -> Ptr CChar -> Ptr (Ptr CChar) -> CInt -> IO <apr_status_t>
+#ccall apr_strtoi64     , Ptr CChar -> Ptr (Ptr CChar) -> CInt -> IO <apr_int64_t>
+#ccall apr_atoi64       , Ptr CChar -> IO <apr_int64_t>
+#ccall apr_strfsize     , <apr_off_t> -> Ptr CChar -> IO (Ptr CChar)