This commit is contained in:
parent
e02c4a11a7
commit
9f53a9e5fa
11 changed files with 101 additions and 19 deletions
|
|
@ -1,11 +1,10 @@
|
|||
open Rresult
|
||||
open Lwt.Infix
|
||||
open Cmdliner
|
||||
open Mte
|
||||
|
||||
let port =
|
||||
let doc = Arg.info ~doc:"Port of HTTP service." [ "p"; "port" ] in
|
||||
Arg.(value & opt int 8080 doc)
|
||||
Arg.(value & opt int 3434 doc)
|
||||
|
||||
let use_tls =
|
||||
let doc =
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue