From b36e0548223dc733a16f431a0e33219b79ac445c Mon Sep 17 00:00:00 2001
From: Al Dee <amyalicedee@gmail.com>
Date: Fri, 22 May 2020 16:10:17 +0100
Subject: Add to_result and from_result to option module

---
 src/gleam/option.gleam | 32 ++++++++++++++++++++++++++++++++
 1 file changed, 32 insertions(+)

(limited to 'src')

diff --git a/src/gleam/option.gleam b/src/gleam/option.gleam
index 30bc1e2..e5be4cc 100644
--- a/src/gleam/option.gleam
+++ b/src/gleam/option.gleam
@@ -36,3 +36,35 @@ pub fn is_some(option: Option(a)) -> Bool {
 pub fn is_none(option: Option(a)) -> Bool {
   option == None
 }
+
+/// Converts an Option type to a Result type
+///
+/// ## Examples
+///
+///    > to_result(Some(1), "some_error")
+///    Ok(1)
+///    > to_result(None, "some_error")
+///    Error("some_error")
+///
+pub fn to_result(option: Option(a), e) -> Result(a, e) {
+  case option {
+    Some(a) -> Ok(a)
+    _ -> Error(e)
+  }
+}
+
+/// Converts a Result type to an Option type
+///
+/// ## Examples
+///
+///    > from_result(Ok(1))
+///    Some(1)
+///    > from_result(Error"some_error"))
+///    None
+///
+pub fn from_result(result: Result(a, e)) -> Option(a) {
+  case result {
+    Ok(a) -> Some(a)
+    _ -> None
+  }
+}
-- 
cgit v1.2.3