diff options
author | Son Ho | 2023-07-05 14:52:23 +0200 |
---|---|---|
committer | Son Ho | 2023-07-05 14:52:23 +0200 |
commit | 0a0445c72e005c328b4764f5fb0f8f38e7a55d60 (patch) | |
tree | 43fb9284e8c02ec5ed8b8a5d59f6569d66b900ff /tests/lean/BetreeMain/FunsExternal.lean | |
parent | 442caaf62e4a217b9a10116c4e529c49f83c4efd (diff) |
Start using namespaces in the Lean backend
Diffstat (limited to '')
-rw-r--r-- | tests/lean/BetreeMain/FunsExternal.lean | 35 |
1 files changed, 35 insertions, 0 deletions
diff --git a/tests/lean/BetreeMain/FunsExternal.lean b/tests/lean/BetreeMain/FunsExternal.lean new file mode 100644 index 00000000..0c715ef9 --- /dev/null +++ b/tests/lean/BetreeMain/FunsExternal.lean @@ -0,0 +1,35 @@ +-- [betree_main]: external functions. +import Base +import BetreeMain.Types +open Primitives +open betree_main + +-- TODO: fill those bodies + +/- [betree_main::betree_utils::load_internal_node] -/ +def betree_utils.load_internal_node_fwd + : + U64 → State → Result (State × (betree_list_t (U64 × betree_message_t))) := + fun _ _ => .fail .panic + +/- [betree_main::betree_utils::store_internal_node] -/ +def betree_utils.store_internal_node_fwd + : + U64 → betree_list_t (U64 × betree_message_t) → State → Result (State + × Unit) := + fun _ _ _ => .fail .panic + +/- [betree_main::betree_utils::load_leaf_node] -/ +def betree_utils.load_leaf_node_fwd + : U64 → State → Result (State × (betree_list_t (U64 × U64))) := + fun _ _ => .fail .panic + +/- [betree_main::betree_utils::store_leaf_node] -/ +def betree_utils.store_leaf_node_fwd + : U64 → betree_list_t (U64 × U64) → State → Result (State × Unit) := + fun _ _ _ => .fail .panic + +/- [core::option::Option::{0}::unwrap] -/ +def core.option.Option.unwrap_fwd + (T : Type) : Option T → State → Result (State × T) := + fun _ _ => .fail .panic |