From 21c9820193f88c09058ca70e4cf37418382d86e9 Mon Sep 17 00:00:00 2001 From: Louis Pilfold Date: Wed, 19 Apr 2023 08:27:59 +0100 Subject: then tests --- test/gleam/result_test.gleam | 18 ++++++++++++++++++ 1 file changed, 18 insertions(+) (limited to 'test') diff --git a/test/gleam/result_test.gleam b/test/gleam/result_test.gleam index df07a4b..6ff35ee 100644 --- a/test/gleam/result_test.gleam +++ b/test/gleam/result_test.gleam @@ -77,6 +77,24 @@ pub fn try_test() { |> should.equal(Error(1)) } +pub fn then_test() { + Error(1) + |> result.then(fn(x) { Ok(x + 1) }) + |> should.equal(Error(1)) + + Ok(1) + |> result.then(fn(x) { Ok(x + 1) }) + |> should.equal(Ok(2)) + + Ok(1) + |> result.then(fn(_) { Ok("type change") }) + |> should.equal(Ok("type change")) + + Ok(1) + |> result.then(fn(_) { Error(1) }) + |> should.equal(Error(1)) +} + pub fn unwrap_test() { Ok(1) |> result.unwrap(50) -- cgit v1.2.3