userdiff/perl: match full line of POD headers
[git] / blob.c
1 #include "cache.h"
2 #include "blob.h"
3
4 const char *blob_type = "blob";
5
6 struct blob *lookup_blob(const unsigned char *sha1)
7 {
8         struct object *obj = lookup_object(sha1);
9         if (!obj)
10                 return create_object(sha1, OBJ_BLOB, alloc_blob_node());
11         if (!obj->type)
12                 obj->type = OBJ_BLOB;
13         if (obj->type != OBJ_BLOB) {
14                 error("Object %s is a %s, not a blob",
15                       sha1_to_hex(sha1), typename(obj->type));
16                 return NULL;
17         }
18         return (struct blob *) obj;
19 }
20
21 int parse_blob_buffer(struct blob *item, void *buffer, unsigned long size)
22 {
23         item->object.parsed = 1;
24         return 0;
25 }