type blob = unit

let blob_of_value (_ : Value.value) = failwith "TODO"
let value_of_blob (_ : blob) = failwith "TODO"
let blob_of_bytes (_ : bytes) = failwith "TODO"
let bytes_of_blob (_ : blob) = failwith "TODO"