diff options
| author | Marcos Magueta <maguetamarcos@gmail.com> | 2026-10-02 22:36:49 -0300 |
|---|---|---|
| committer | Marcos Magueta <maguetamarcos@gmail.com> | 2026-10-02 22:36:49 -0300 |
| commit | 32e663591a84d095723e62ef934a0bc6e1470b52 (patch) | |
| tree | 60d6905606c4c5b829d51dcf95603d62df946f84 /test/Helpers.ml | |
| parent | 9f8fe7b4e5891e848d035c240731fb578f6b33b5 (diff) | |
| parent | 73aec387d33626e33026432db5b1137b59edf0cf (diff) | |
| download | RNT-32e663591a84d095723e62ef934a0bc6e1470b52.tar.gz RNT-32e663591a84d095723e62ef934a0bc6e1470b52.zip | |
Merge branch 'relation-bipartite-registration'
Diffstat (limited to 'test/Helpers.ml')
| -rw-r--r-- | test/Helpers.ml | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/test/Helpers.ml b/test/Helpers.ml index 7f65007..f812a3a 100644 --- a/test/Helpers.ml +++ b/test/Helpers.ml @@ -51,7 +51,9 @@ module Storage = struct SR.TupleSet.insert tx (Concepts.Tuple.hash tuple) tuple node ) (Ok SR.TupleSet.empty) tuples in - Ok {SR.schematics; tuples= SR.TupleSet.hash_of node} ) + let relation = {SR.schematics; tuples= SR.TupleSet.hash_of node} in + let* _ = SI.store_blob tx (SR.encode relation) in + Ok relation ) in SR.load conn value |
