Use spans for Efficiency

2022-11-13 21:44:19 +00:00
parent 2f1ae5cd7f
commit 72785eda06
12 changed files with 315 additions and 150 deletions
--- a/Raft.Test/Result.fs
+++ b/Raft.Test/Result.fs
@@ -0,0 +1,9 @@
+namespace Raft.Test
+
+[<RequireQualifiedAccess>]
+module Result =
+
+    let get<'a, 'b> (r : Result<'a, 'b>) : 'a =
+        match r with
+        | Ok a -> a
+        | Error e -> failwithf "%+A" e