summaryrefslogtreecommitdiff
path: root/tests/lean/Betree/FunsExternal.lean
diff options
context:
space:
mode:
Diffstat (limited to 'tests/lean/Betree/FunsExternal.lean')
-rw-r--r--tests/lean/Betree/FunsExternal.lean30
1 files changed, 30 insertions, 0 deletions
diff --git a/tests/lean/Betree/FunsExternal.lean b/tests/lean/Betree/FunsExternal.lean
new file mode 100644
index 00000000..859cbd68
--- /dev/null
+++ b/tests/lean/Betree/FunsExternal.lean
@@ -0,0 +1,30 @@
+-- [betree]: external functions.
+import Base
+import Betree.Types
+open Primitives
+open betree
+
+-- TODO: fill those bodies
+
+/- [betree::betree_utils::load_internal_node] -/
+def betree_utils.load_internal_node
+ :
+ U64 → State → Result (State × (betree.List (U64 × betree.Message))) :=
+ fun _ _ => .fail .panic
+
+/- [betree::betree_utils::store_internal_node] -/
+def betree_utils.store_internal_node
+ :
+ U64 → betree.List (U64 × betree.Message) → State → Result (State
+ × Unit) :=
+ fun _ _ _ => .fail .panic
+
+/- [betree::betree_utils::load_leaf_node] -/
+def betree_utils.load_leaf_node
+ : U64 → State → Result (State × (betree.List (U64 × U64))) :=
+ fun _ _ => .fail .panic
+
+/- [betree::betree_utils::store_leaf_node] -/
+def betree_utils.store_leaf_node
+ : U64 → betree.List (U64 × U64) → State → Result (State × Unit) :=
+ fun _ _ _ => .fail .panic