diff options
| author | Son Ho | 2023-10-25 15:36:06 +0200 |
|---|---|---|
| committer | Son Ho | 2023-10-25 15:36:06 +0200 |
| commit | e3cb3646bbe3d50240aa0bf4763f8e816fb9a706 (patch) | |
| tree | f6b58bcd7ce1f9becba0b292adfc087a9e099135 /backends/lean/Base/Primitives/Base.lean | |
| parent | a41299c8543fe12f98ae2554bc9cefca6990af5f (diff) | |
Fix some issues at extraction and add builtins
Diffstat (limited to 'backends/lean/Base/Primitives/Base.lean')
| -rw-r--r-- | backends/lean/Base/Primitives/Base.lean | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/backends/lean/Base/Primitives/Base.lean b/backends/lean/Base/Primitives/Base.lean index 10af8f67..7fc33251 100644 --- a/backends/lean/Base/Primitives/Base.lean +++ b/backends/lean/Base/Primitives/Base.lean @@ -127,4 +127,11 @@ def Result.attach {α: Type} (o : Result α): Result { x : α // o = ret x } := Use with `simp [ aeneas ]` -/ register_simp_attr aeneas +-- We don't really use raw pointers for now +structure MutRawPtr (T : Type) where + v : T + +structure ConstRawPtr (T : Type) where + v : T + end Primitives |