29 lines
1.1 KiB
OCaml
29 lines
1.1 KiB
OCaml
|
(**************************************************************************)
|
||
|
|
(* ocplib-resto *)
|
||
|
|
(* Copyright (C) 2016, OCamlPro. *)
|
||
|
|
(* *)
|
||
|
|
(* All rights reserved. This file is distributed under the terms *)
|
||
|
|
(* of the GNU Lesser General Public License version 2.1, with the *)
|
||
|
|
(* special exception on linking described in the file LICENSE. *)
|
||
|
|
(* *)
|
||
|
|
(**************************************************************************)
|
||
|
|
|
||
|
|
module Encoding : Resto.ENCODING
|
||
|
|
with type 'a t = 'a Json_encoding.encoding
|
||
|
|
and type schema = Json_schema.schema
|
||
|
|
|
||
|
|
module type VALUE = sig
|
||
|
|
type t
|
||
|
|
type 'a encoding
|
||
|
|
val construct: 'a encoding -> 'a -> t
|
||
|
|
val destruct: 'a encoding -> t -> 'a
|
||
|
|
end
|
||
|
|
|
||
|
|
module Ezjsonm : VALUE
|
||
|
|
with type t = Json_repr.Ezjsonm.value
|
||
|
|
and type 'a encoding := 'a Encoding.t
|
||
|
|
|
||
|
|
module Bson : VALUE
|
||
|
|
with type t = Json_repr_bson.bson
|
||
|
|
and type 'a encoding := 'a Encoding.t
|