From eb0224d3f26c4fd90894bac5fb346c2aa3533efe Mon Sep 17 00:00:00 2001
From: Ahmad Sattar <thehabbos007@gmail.com>
Date: Thu, 18 Jun 2020 19:04:03 +0200
Subject: Result or function

---
 src/gleam/result.gleam | 23 +++++++++++++++++++++++
 1 file changed, 23 insertions(+)

(limited to 'src')

diff --git a/src/gleam/result.gleam b/src/gleam/result.gleam
index b686939..88f933a 100644
--- a/src/gleam/result.gleam
+++ b/src/gleam/result.gleam
@@ -176,3 +176,26 @@ pub fn unwrap(result: Result(a, e), or default: a) -> a {
 pub fn nil_error(result: Result(a, e)) -> Result(a, Nil) {
   map_error(result, fn(_) { Nil })
 }
+
+/// Return the first value if it is Ok, otherwise return the second value.
+///
+/// ## Examples
+///
+///    > or(Ok(1), Ok(2))
+///    Ok(1)
+///
+///    > or(Ok(1), Error("Error 2"))
+///    Ok(1)
+///
+///    > or(Error("Error 1"), Ok(2))
+///    Ok(2)
+///
+///    > or(Error("Error 1"), Error("Error 2"))
+///    Error("Error 2")
+///
+pub fn or(first: Result(a, e), second: Result(a, e)) -> Result(a, e) {
+  case first {
+    Ok(_) -> first
+    Error(_) -> second
+  }
+}
-- 
cgit v1.2.3