summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSon Ho2023-05-15 13:08:49 +0200
committerSon HO2023-06-04 21:44:33 +0200
commit72d35d4ce84a863bb4d96b844fb552028d94234a (patch)
tree5f1ac95a2a7600e95f375bf3e0c22edf06059192
parent9f806e52580c806b1dc3e963c0dfdd1dbfed7263 (diff)
Add Result_Inhabited to Primitives.lean
-rw-r--r--backends/lean/Primitives.lean3
-rw-r--r--tests/lean/hashmap/Base/Primitives.lean3
-rw-r--r--tests/lean/hashmap_on_disk/Base/Primitives.lean3
-rw-r--r--tests/lean/misc-constants/Base/Primitives.lean3
-rw-r--r--tests/lean/misc-external/Base/Primitives.lean3
-rw-r--r--tests/lean/misc-loops/Base/Primitives.lean3
-rw-r--r--tests/lean/misc-no_nested_borrows/Base/Primitives.lean3
-rw-r--r--tests/lean/misc-paper/Base/Primitives.lean3
-rw-r--r--tests/lean/misc-polonius_list/Base/Primitives.lean3
9 files changed, 27 insertions, 0 deletions
diff --git a/backends/lean/Primitives.lean b/backends/lean/Primitives.lean
index 034f41b2..4a66a453 100644
--- a/backends/lean/Primitives.lean
+++ b/backends/lean/Primitives.lean
@@ -49,6 +49,9 @@ deriving Repr, BEq
open Result
+instance Result_Inhabited (α : Type u) : Inhabited (Result α) :=
+ Inhabited.mk (fail panic)
+
/- HELPERS -/
def ret? {α: Type} (r: Result α): Bool :=
diff --git a/tests/lean/hashmap/Base/Primitives.lean b/tests/lean/hashmap/Base/Primitives.lean
index 034f41b2..4a66a453 100644
--- a/tests/lean/hashmap/Base/Primitives.lean
+++ b/tests/lean/hashmap/Base/Primitives.lean
@@ -49,6 +49,9 @@ deriving Repr, BEq
open Result
+instance Result_Inhabited (α : Type u) : Inhabited (Result α) :=
+ Inhabited.mk (fail panic)
+
/- HELPERS -/
def ret? {α: Type} (r: Result α): Bool :=
diff --git a/tests/lean/hashmap_on_disk/Base/Primitives.lean b/tests/lean/hashmap_on_disk/Base/Primitives.lean
index 034f41b2..4a66a453 100644
--- a/tests/lean/hashmap_on_disk/Base/Primitives.lean
+++ b/tests/lean/hashmap_on_disk/Base/Primitives.lean
@@ -49,6 +49,9 @@ deriving Repr, BEq
open Result
+instance Result_Inhabited (α : Type u) : Inhabited (Result α) :=
+ Inhabited.mk (fail panic)
+
/- HELPERS -/
def ret? {α: Type} (r: Result α): Bool :=
diff --git a/tests/lean/misc-constants/Base/Primitives.lean b/tests/lean/misc-constants/Base/Primitives.lean
index 034f41b2..4a66a453 100644
--- a/tests/lean/misc-constants/Base/Primitives.lean
+++ b/tests/lean/misc-constants/Base/Primitives.lean
@@ -49,6 +49,9 @@ deriving Repr, BEq
open Result
+instance Result_Inhabited (α : Type u) : Inhabited (Result α) :=
+ Inhabited.mk (fail panic)
+
/- HELPERS -/
def ret? {α: Type} (r: Result α): Bool :=
diff --git a/tests/lean/misc-external/Base/Primitives.lean b/tests/lean/misc-external/Base/Primitives.lean
index 034f41b2..4a66a453 100644
--- a/tests/lean/misc-external/Base/Primitives.lean
+++ b/tests/lean/misc-external/Base/Primitives.lean
@@ -49,6 +49,9 @@ deriving Repr, BEq
open Result
+instance Result_Inhabited (α : Type u) : Inhabited (Result α) :=
+ Inhabited.mk (fail panic)
+
/- HELPERS -/
def ret? {α: Type} (r: Result α): Bool :=
diff --git a/tests/lean/misc-loops/Base/Primitives.lean b/tests/lean/misc-loops/Base/Primitives.lean
index 034f41b2..4a66a453 100644
--- a/tests/lean/misc-loops/Base/Primitives.lean
+++ b/tests/lean/misc-loops/Base/Primitives.lean
@@ -49,6 +49,9 @@ deriving Repr, BEq
open Result
+instance Result_Inhabited (α : Type u) : Inhabited (Result α) :=
+ Inhabited.mk (fail panic)
+
/- HELPERS -/
def ret? {α: Type} (r: Result α): Bool :=
diff --git a/tests/lean/misc-no_nested_borrows/Base/Primitives.lean b/tests/lean/misc-no_nested_borrows/Base/Primitives.lean
index 034f41b2..4a66a453 100644
--- a/tests/lean/misc-no_nested_borrows/Base/Primitives.lean
+++ b/tests/lean/misc-no_nested_borrows/Base/Primitives.lean
@@ -49,6 +49,9 @@ deriving Repr, BEq
open Result
+instance Result_Inhabited (α : Type u) : Inhabited (Result α) :=
+ Inhabited.mk (fail panic)
+
/- HELPERS -/
def ret? {α: Type} (r: Result α): Bool :=
diff --git a/tests/lean/misc-paper/Base/Primitives.lean b/tests/lean/misc-paper/Base/Primitives.lean
index 034f41b2..4a66a453 100644
--- a/tests/lean/misc-paper/Base/Primitives.lean
+++ b/tests/lean/misc-paper/Base/Primitives.lean
@@ -49,6 +49,9 @@ deriving Repr, BEq
open Result
+instance Result_Inhabited (α : Type u) : Inhabited (Result α) :=
+ Inhabited.mk (fail panic)
+
/- HELPERS -/
def ret? {α: Type} (r: Result α): Bool :=
diff --git a/tests/lean/misc-polonius_list/Base/Primitives.lean b/tests/lean/misc-polonius_list/Base/Primitives.lean
index 034f41b2..4a66a453 100644
--- a/tests/lean/misc-polonius_list/Base/Primitives.lean
+++ b/tests/lean/misc-polonius_list/Base/Primitives.lean
@@ -49,6 +49,9 @@ deriving Repr, BEq
open Result
+instance Result_Inhabited (α : Type u) : Inhabited (Result α) :=
+ Inhabited.mk (fail panic)
+
/- HELPERS -/
def ret? {α: Type} (r: Result α): Bool :=