   withForeignPtr cfp $ \c ->
   withForeignPtr ffp $ \f ->
   retEnum $ {#call git_config_add_file#} c f (fromIntegral pr)
-
 
 -- | Add an on-disk config file instance to an existing config
 --


-- | Get the value of an integer config variable.
configInt :: Config -> String -> IOEitherErr Int
configInt (Config cfp) str =
  withForeignPtr cfp $ \c ->
  withCString str $ \str' ->
  undefined
  {- callPeek fromIntegral ({#call git_config_get_int#} c str')-}

-- | Get the value of an integer config variable.
configInteger :: Config -> String -> IOEitherErr Integer
configInteger (Config cfp) str =
  withForeignPtr cfp $ \c ->
  withCString str $ \str' ->
  undefined
  {- callPeek fromIntegral ({#call git_config_get_long#} c str')-}

-- | Get the value of a boolean config variable.
configBool :: Config -> String -> IO (Either GitError Bool)

-- you first have to add this file to a configuration object before you can
-- query it for configuration variables.
createOnDisk :: String -> IOEitherErr ConfigFile
createOnDisk str =
  withCString str $ \str' ->
  callPeek ConfigFile (\out -> {#call git_config_file__ondisk#} out str')

-- | Allocate a new configuration object
