diff options
| author | Estevan Castilho <tevo@riajuu.net> | 2026-07-09 00:33:37 +0000 |
|---|---|---|
| committer | Estevan Castilho <tevo@riajuu.net> | 2026-07-09 00:33:37 +0000 |
| commit | 2566cfae03199f8e90098c84b712d48182d9b806 (patch) | |
| tree | 4209d319e67f0f055e5055bc67a022bfdb3dd43f /lib/concepts/Hash.ml | |
| parent | 5a799734ddd523027a7d6ef8b0acab6d0b796ec6 (diff) | |
| download | RNT-2566cfae03199f8e90098c84b712d48182d9b806.tar.gz RNT-2566cfae03199f8e90098c84b712d48182d9b806.zip | |
Interface for the storage layer
Diffstat (limited to '')
| -rw-r--r-- | lib/concepts/Hash.ml | 5 | ||||
| -rw-r--r-- | lib/concepts/Hash.mli | 8 |
2 files changed, 13 insertions, 0 deletions
diff --git a/lib/concepts/Hash.ml b/lib/concepts/Hash.ml new file mode 100644 index 0000000..4c6cd8a --- /dev/null +++ b/lib/concepts/Hash.ml @@ -0,0 +1,5 @@ +type hash = () + +val hash_of_value (_: Value.value) = failwith "TODO" + +val hash_equals (_: hash) (_: hash) = failwith "TODO" diff --git a/lib/concepts/Hash.mli b/lib/concepts/Hash.mli new file mode 100644 index 0000000..dc25669 --- /dev/null +++ b/lib/concepts/Hash.mli @@ -0,0 +1,8 @@ +(** An abstract value representing a hash *) +type hash + +(** Given a value, compute it's hash *) +val hash_of_value: Value.value -> hash + +(** Given two hashes, are they the same? *) +val hash_equals: hash -> hash -> bool |