diff options
| author | Ryan Lahfa | 2024-04-17 00:01:34 +0200 |
|---|---|---|
| committer | Ryan Lahfa | 2024-04-24 11:04:11 +0200 |
| commit | 18484e28ef7b13b95dc3af0b1e34c2181e1778e5 (patch) | |
| tree | f9480db9b7b00df8a2c4eae43c9705be5b8e2928 /backends/lean/Base/Primitives | |
| parent | c264b08cfb9beb5fe34d872b02a8f4cd1e12d45e (diff) | |
compiler: map `core::mem::swap` to the pure swap
In the pure functional model, `swap` is mostly about borrow checking and
should simplify to the pure swap in our backends.
Other backends than Lean are not done in this commit.
Signed-off-by: Ryan Lahfa <ryan.lahfa@inria.fr>
Diffstat (limited to 'backends/lean/Base/Primitives')
| -rw-r--r-- | backends/lean/Base/Primitives/Base.lean | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/backends/lean/Base/Primitives/Base.lean b/backends/lean/Base/Primitives/Base.lean index 62546ac3..94134d86 100644 --- a/backends/lean/Base/Primitives/Base.lean +++ b/backends/lean/Base/Primitives/Base.lean @@ -132,6 +132,8 @@ def Result.attach {α: Type} (o : Result α): Result { x : α // o = ok x } := @[simp] def core.mem.replace (a : Type) (x : a) (_ : a) : a × a := (x, x) /- [core::option::Option::take] -/ @[simp] def Option.take (T: Type) (self: Option T): Option T × Option T := (self, .none) +/- [core::mem::swap] -/ +@[simp] def core.mem.swap (T: Type) (a b: T): T × T := (b, a) /-- Aeneas-translated function -- useful to reduce non-recursive definitions. Use with `simp [ aeneas ]` -/ |