mirror of
https://github.com/Smaug123/gitea-repo-config
synced 2025-10-05 15:38:41 +00:00
15 lines
315 B
Forth
15 lines
315 B
Forth
namespace Gitea.Declarative.Test
|
|
|
|
[<RequireQualifiedAccess>]
|
|
module Result =
|
|
|
|
let get r =
|
|
match r with
|
|
| Ok o -> o
|
|
| Error e -> failwithf "Expected Ok, got: %+A" e
|
|
|
|
let getError r =
|
|
match r with
|
|
| Ok o -> failwithf "Expected Error, got: %+A" o
|
|
| Error e -> e
|