fix: refix formatting
@@ -70,8 +70,7 @@ let assert_success : [Show e]
-> Eff [| error : Error e, writer : Test | r |] a
-> Eff [| writer : Test | r |] ()
=
- run_error
- >> flat_map assert_ok
+ run_error >> flat_map assert_ok
let assert_throws : forall e .
[Show a] -> Eff [| error : Error e, writer : Test | r |] a -> Eff [| writer : Test | r |] ()
