   if res == nullPtr
     then return Nothing
     else return . Just . ObjID $ res
-
-{-
-/**
- * Create a new commit in the repository using `git_object`
- * instances as parameters.
- *
- * @param oid Pointer where to store the OID of the
- *	newly created commit
- *
- * @param repo Repository where to store the commit
- *
- * @param update_ref If not NULL, name of the reference that
- *	will be updated to point to this commit. If the reference
- *	is not direct, it will be resolved to a direct reference.
- *	Use "HEAD" to update the HEAD of the current branch and
- *	make it point to this commit
- *
- * @param author Signature representing the author and the authory
- *	time of this commit
- *
- * @param committer Signature representing the committer and the
- *  commit time of this commit
- *
- * @param message Full message for this commit
- *
- * @param tree An instance of a `git_tree` object that will
- * be used as the tree for the commit. This tree object must
- * also be owned by the given `repo`.
- *
- * @param parent_count Number of parents for this commit
- *
- * @param parents[] Array of `parent_count` pointers to `git_commit`
- * objects that will be used as the parents for this commit. This
- * array may be NULL if `parent_count` is 0 (root commit). All the
- * given commits must be owned by the `repo`.
- *
- * @return 0 on success; error code otherwise
- *	The created commit will be written to the Object Database and
- *	the given reference will be updated to point to it
- */
-GIT_EXTERN(int) git_commit_create(
-		git_oid *oid,
-		git_repository *repo,
-		const char *update_ref,
-		const git_signature *author,
-		const git_signature *committer,
-		const char *message,
-		const git_tree *tree,
-		int parent_count,
-		const git_commit *parents[]);
--}
 
 createCommit :: ObjID -> Repository -> Maybe String -> Signature -> Signature
              -> String -> Tree -> [Commit] -> IO (Maybe GitError)

-------------------------------------------------------------------------------



-------------------------------------------------------------------------------
-- BEGIN: repositoy.h

newtype Commit     = Commit CPtr
newtype Signature  = Signature CPtr
newtype Tree       = Tree CPtr
newtype Config     = Config CPtr

defaultPort :: String
defaultPort = "9418" -- TODO: Import from net.h?
