diff options
Diffstat (limited to '')
| -rw-r--r-- | lib/concepts/Representation.ml | 5 | ||||
| -rw-r--r-- | lib/concepts/Representation.mli | 7 |
2 files changed, 12 insertions, 0 deletions
diff --git a/lib/concepts/Representation.ml b/lib/concepts/Representation.ml new file mode 100644 index 0000000..4df7812 --- /dev/null +++ b/lib/concepts/Representation.ml @@ -0,0 +1,5 @@ +type blob = unit + +let blob_of_value (_: Value.value) = failwith "TODO" + +let value_of_blob (_: blob) = failwith "TODO" diff --git a/lib/concepts/Representation.mli b/lib/concepts/Representation.mli new file mode 100644 index 0000000..9d0a8f5 --- /dev/null +++ b/lib/concepts/Representation.mli @@ -0,0 +1,7 @@ +(** an abstract representation of an encoded value *) +type blob + +(** encode a blob into a value *) +val blob_of_value: Value.value -> blob +(** decode a value from a blob *) +val value_of_blob: blob -> Value.value |