package vif

  1. Overview
  2. Docs
A simple web framework for OCaml 5

Install 

dune-project
 Dependency

github.com Readme Changelog MIT License Edit opam file Versions (6)

Authors

  1. R
    Robur <team@robur.coop>

Maintainers

  1. R
    Robur <team@robur.coop>

Sources

vif-0.0.1.beta6.tbz
sha256=98c4b7959e5a2289179e26c4c378720f4c60b920bf5be2c1c1ba8bac82b4230b
sha512=20c155e32073ccee63996f8012d1dadfae6c0f7a8f838729566d36b426a26953be94ce0edf4e6a47007f1b9b0af45a028667258d7b14bbcbc282b099feae0f33

doc/src/vif.core/vif_method.ml.html

Source file vif_method.ml

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
type t =
  [ `CONNECT
  | `DELETE
  | `GET
  | `HEAD
  | `OPTIONS
  | `POST
  | `PUT
  | `TRACE
  | `Other of string ]

let pp ppf = function
  | `CONNECT -> Fmt.string ppf "CONNECT"
  | `DELETE -> Fmt.string ppf "DELETE"
  | `GET -> Fmt.string ppf "GET"
  | `HEAD -> Fmt.string ppf "HEAD"
  | `OPTIONS -> Fmt.string ppf "OPTIONS"
  | `POST -> Fmt.string ppf "POST"
  | `PUT -> Fmt.string ppf "PUT"
  | `TRACE -> Fmt.string ppf "TRACE"
  | `Other str -> Fmt.string ppf (String.uppercase_ascii str)

(* NOTE(reynir): this should be safe. *)
let compare = Stdlib.compare
let equal a b = compare a b = 0

module Map = Map.Make (struct
  type nonrec t = t

  let compare = compare
end)