package ppx_orakuda

  1. Overview
  2. Docs
val (=~) : string -> ?pos:int -> 'a t -> 'a option

Infix op version of exec_exn.

val case : string -> [> `Error of string ]
val (==>) : 'a t -> ('a -> 'b) -> [< `Ok of 'b | `Error of string ] -> [> `Ok of 'b | `Error of string ]
val default : (unit -> 'b) -> [< `Ok of 'b | `Error of string ] -> 'b

case <string> |> ( m|pat|m ==> fun r -> ... ) |> ( m|pat|m ==> fun r -> ... ) ... |> default (fun () -> ... )