summaryrefslogtreecommitdiff
path: root/backends/fstar/Primitives.fst
diff options
context:
space:
mode:
authorSon Ho2024-04-25 16:27:43 +0200
committerSon Ho2024-04-25 16:27:43 +0200
commiteb5b2e76de6e2c6780b9817c1424777276ea5e00 (patch)
tree3c4865d0c9759af3bbb286243cf50d9c30fbcd61 /backends/fstar/Primitives.fst
parent078b7f59ddfcb12a7b4c69f0a51bfd57cb391ddf (diff)
Update the backend and ExtractBuiltin.ml
Diffstat (limited to '')
-rw-r--r--backends/fstar/Primitives.fst6
1 files changed, 6 insertions, 0 deletions
diff --git a/backends/fstar/Primitives.fst b/backends/fstar/Primitives.fst
index c7c9f9db..9951ccc3 100644
--- a/backends/fstar/Primitives.fst
+++ b/backends/fstar/Primitives.fst
@@ -540,6 +540,12 @@ let core_clone_CloneI128 : core_clone_Clone i128 = {
clone = fun x -> Ok (core_clone_impls_CloneI128_clone x)
}
+(** [core::option::{core::option::Option<T>}::unwrap] *)
+let core_option_Option_unwrap (t : Type0) (x : option t) : result t =
+ match x with
+ | None -> Fail Failure
+ | Some x -> Ok x
+
(*** core::ops *)
// Trait declaration: [core::ops::index::Index]