  */
 GIT_EXTERN(int) git_blob_create_frombuffer(git_oid *oid, git_repository *repo, const void *buffer, size_t len);
 -}
--- createBlobFromBuffer :: OID -> Repository -> ... -> Int -> IO (Maybe GitError)
+-- createBlobFromBuffer :: ObjID -> Repository -> ... -> Int -> IO (Maybe GitError)
 createBlobFromBuffer = undefined
 
 

 */
GIT_INLINE(int) git_blob_lookup(git_blob **blob, git_repository *repo, const git_oid *id)
-}
blobLookup :: Repository -> OID -> IO (Either GitError Blob)
blobLookup = undefined



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