package ppx_deriving_cmdliner

  1. Overview
  2. Docs
Cmdliner.Term.t generator

Install 

dune-project
 Dependency

github.com Readme Changelog Edit opam file Versions (3)

Authors

  1. I
    Isaac Hodes <isaachodes@gmail.com>
  2. B
    B. Arman Aksoy <arman@aksoy.org>
  3. S
    Seb Mondet <seb@mondet.org>
  4. N
    Nick Zalutskiy <nick@const.fun>
  5. A
    Armaël Guéneau <armael.gueneau@ens-lyon.fr>
  6. T
    Tom Repetti <trepetti@cs.columbia.edu>
  7. M
    Marcello Seri <m.seri@rug.nl>

Maintainers

  1. S
    Seb Mondet <seb@mondet.org>

Sources

v0.6.0.tar.gz
sha256=858b040231bacc6cbf1028d92710d87dc1c19855541d9c9624a61bd378127edc
md5=5a1050704c477f0ee46001cc2f4fe697

doc/src/ppx_deriving_cmdliner.runtime/ppx_deriving_cmdliner_runtime.ml.html

Source file ppx_deriving_cmdliner_runtime.ml

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
include Ppx_deriving_runtime

let (>>=) x f =
  match x with Result.Ok x -> f x | (Result.Error _) as x -> x

let (>|=) x f =
  x >>= fun x -> Result.Ok (f x)

let rec map_bind f acc xs =
  match xs with
  | x :: xs -> f x >>= fun x -> map_bind f (x :: acc) xs
  | [] -> Result.Ok (List.rev acc)

type 'a error_or = ('a, string) Result.result