#include #include module Bindings.Libgit2.Config where #strict_import import Bindings.Libgit2.Common import Bindings.Libgit2.Types {- struct git_config_file { struct git_config * cfg; int (* open)(struct git_config_file *); int (* get)(struct git_config_file *, const char * key, const char * * value); int (* get_multivar)(struct git_config_file *, const char * key, const char * regexp, int (* fn)(const char *, void *), void * data); int (* set)(struct git_config_file *, const char * key, const char * value); int (* set_multivar)(git_config_file * cfg, const char * name, const char * regexp, const char * value); int (* del)(struct git_config_file *, const char * key); int (* foreach)(struct git_config_file *, int (* fn)(const char *, const char *, void *), void * data); void (* free)(struct git_config_file *); }; -} #callback git_config_open_callback , Ptr -> IO CInt #callback git_config_get_callback , Ptr -> CString -> Ptr (CString) -> IO CInt #callback git_config_get_multivar_inner_callback , CString -> Ptr () -> IO CInt #callback git_config_get_multivar_callback , Ptr -> CString -> CString -> -> Ptr () -> IO CInt #callback git_config_set_callback , Ptr -> CString -> CString -> IO CInt #callback git_config_set_multivar_callback , Ptr -> CString -> CString -> CString -> IO CInt #callback git_config_del_callback , Ptr -> CString -> IO CInt #callback git_config_foreach_inner_callback , CString -> CString -> Ptr () -> IO CInt #callback git_config_foreach_callback , Ptr -> -> Ptr () -> IO CInt #callback git_config_free_callback , Ptr -> IO () #starttype git_config_file #field cfg , Ptr #field open , #field get , #field get_multivar , #field set , #field set_multivar , #field del , #field foreach , #field free , #stoptype {- typedef enum { GIT_CVAR_FALSE = 0, GIT_CVAR_TRUE = 1, GIT_CVAR_INT32, GIT_CVAR_STRING } git_cvar_t; -} #integral_t git_cvar_t #num GIT_CVAR_FALSE #num GIT_CVAR_TRUE #num GIT_CVAR_INT32 #num GIT_CVAR_STRING {- typedef struct { git_cvar_t cvar_type; const char * str_match; int map_value; } git_cvar_map; -} #starttype git_cvar_map #field cvar_type , #field str_match , CString #field map_value , CInt #stoptype #ccall git_config_find_global , CString -> CSize -> IO (CInt) #ccall git_config_find_system , CString -> CSize -> IO (CInt) #ccall git_config_open_global , Ptr (Ptr ) -> IO (CInt) #ccall git_config_file__ondisk , Ptr (Ptr ) -> CString -> IO (CInt) #ccall git_config_new , Ptr (Ptr ) -> IO (CInt) #ccall git_config_add_file , Ptr -> Ptr -> CInt -> IO (CInt) #ccall git_config_add_file_ondisk , Ptr -> CString -> CInt -> IO (CInt) #ccall git_config_open_ondisk , Ptr (Ptr ) -> CString -> IO (CInt) #ccall git_config_free , Ptr -> IO () #ccall git_config_get_int32 , Ptr CInt -> Ptr -> CString -> IO (CInt) #ccall git_config_get_int64 , Ptr CLong -> Ptr -> CString -> IO (CInt) #ccall git_config_get_bool , Ptr CInt -> Ptr -> CString -> IO (CInt) #ccall git_config_get_string , Ptr (CString) -> Ptr -> CString -> IO (CInt) #ccall git_config_get_multivar , Ptr -> CString -> CString -> -> Ptr () -> IO (CInt) #ccall git_config_set_int32 , Ptr -> CString -> CInt -> IO (CInt) #ccall git_config_set_int64 , Ptr -> CString -> CLong -> IO (CInt) #ccall git_config_set_bool , Ptr -> CString -> CInt -> IO (CInt) #ccall git_config_set_string , Ptr -> CString -> CString -> IO (CInt) #ccall git_config_set_multivar , Ptr -> CString -> CString -> CString -> IO (CInt) #ccall git_config_delete , Ptr -> CString -> IO (CInt) #ccall git_config_foreach , Ptr -> -> Ptr () -> IO (CInt) #ccall git_config_get_mapped , Ptr CInt -> Ptr -> CString -> Ptr -> CSize -> IO (CInt)