package emile

You can search for identifiers within the package.

in-package search v0.2.0

emile
- Library emile
  - Emile
    
    Parser
    
    List
- Library emile.cmdliner
  - Emile_cmdliner
- Sources
  - emile
    
    emile.ml
  - emile.cmdliner
    
    emile_cmdliner.ml

Legend:
Page
Library
Module
Module type
Parameter
Class
Class type
Source

Source file `emile_cmdliner.ml`

1
2
3
4
5
6
7
8
9
10
open Cmdliner

let error_msgf fmt = Format.kasprintf (fun err -> Error (`Msg err)) fmt

let mailbox =
  let parser x = match Emile.of_string x with
    | Ok v -> Ok v
    | Error _ -> error_msgf "%S is an invalid mail address" x in
  let pp = Emile.pp_mailbox in
  Arg.conv ~docv:"<mailbox>" (parser, pp)