diff options
author | Son Ho | 2024-04-25 16:27:43 +0200 |
---|---|---|
committer | Son Ho | 2024-04-25 16:27:43 +0200 |
commit | eb5b2e76de6e2c6780b9817c1424777276ea5e00 (patch) | |
tree | 3c4865d0c9759af3bbb286243cf50d9c30fbcd61 /backends/coq | |
parent | 078b7f59ddfcb12a7b4c69f0a51bfd57cb391ddf (diff) |
Update the backend and ExtractBuiltin.ml
Diffstat (limited to 'backends/coq')
-rw-r--r-- | backends/coq/Primitives.v | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/backends/coq/Primitives.v b/backends/coq/Primitives.v index 5ffda12f..b29fce43 100644 --- a/backends/coq/Primitives.v +++ b/backends/coq/Primitives.v @@ -564,6 +564,13 @@ Definition core_clone_CloneI128 : core_clone_Clone i128 := {| clone := fun x => Ok (core_clone_impls_CloneI128_clone x) |}. +(** [core::option::{core::option::Option<T>}::unwrap] *) +Definition core_option_Option_unwrap (T : Type) (x : option T) : result T := + match x with + | None => Fail_ Failure + | Some x => Ok x + end. + (*** core::ops *) (* Trait declaration: [core::ops::index::Index] *) |