 
 {#enum git_otype as OType {underscoreToCase}#}
 {#enum git_rtype as RType {underscoreToCase}#}
-{#enum git_oid as OID {underscoreToCase}#}
-{#enum git_blob as Blob {underscoreToCase}#}
 {#enum git_repository_pathid as RepositoryPathID {underscoreToCase}#}
 {#enum git_error as GitError {underscoreToCase}#}
 {#enum git_odb_streammode as ODBStreamMode {underscoreToCase}#}

 */
GIT_EXTERN(int) git_blob_create_fromfile(git_oid *oid, git_repository *repo, const char *path);
-}
createBlobFromFile :: OID -> Repository -> String -> IO (Maybe GitError)
createBlobFromFile (OID o) (Repository r) path = do
  pathStr  <- newCString path
  res      <- {#call git_blob_create_fromfile #} o r pathStr
  if res == 0

newtype ObjDB      = ObjDB CPtr
newtype Repository = Repository CPtr
newtype Index      = Index CPtr
newtype Blob       = Blob CPtr
newtype ObjID      = ObjID CPtr

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