Cache (p.statocaml_github.0.1.0.doc.statocaml_github.Statocaml

Sourceval log_src : Logs.src

Sourcemodule Log : Logs.LOG

Sourcetype policy =

| No_cache
| Cache_read
| Cache_store

Sourcetype error =

| No_scheme of Iri.t
| No_host of Iri.t
| Unexpected_json of Yojson.Safe.t
| Missing_json_field of string

Sourceexception Error of error

Sourceval error : error -> 'a

Sourceval fail : error -> 'a Lwt.t

Sourceval unexpected_json : Yojson.Safe.t -> 'a

Sourceval missing_json_field : string -> 'a

Sourceval string_of_error : error -> string

Sourceval fp_append : Fpath.t -> Fpath.t -> Fpath.t

Sourceval file_of_iri : Fpath.t -> Iri.t -> Fpath.t

Source

val json_get : 
  map:
    [> `Bool of bool -> 'a
    | `Int of int -> 'a
    | `Json of Yojson.Safe.t -> 'a
    | `String of string -> 'a ] ->
  string ->
  (string * Yojson.Safe.t) list ->
  'a

Sourceval string_of_encoding : Cohttp.Transfer.encoding -> string

Sourceval encoding_of_string : string -> Cohttp.Transfer.encoding

Sourceval header_value_of_json : Yojson.Safe.t -> string list

Sourceval header_of_json : Yojson.Safe.t -> Cohttp__Header.t

Sourceval response_of_json : Yojson.Safe.t -> Cohttp.Response.t

Sourceval meta_of_json : Yojson.Safe.t -> Iri.t * Cohttp.Response.t

Source

val json_of_header : 
  Cohttp__Header.t ->
  [> `Assoc of (string * [> `String of string ]) list ]

Source

val json_of_response : 
  Cohttp.Response.t ->
  [> `Assoc of
       (string
        * [> `Assoc of (string * [> `String of string ]) list
          | `Bool of bool
          | `Int of int
          | `String of string ])
         list ]

Sourceval safe_mkdir : ?perm:Lwt_unix.file_perm -> Fpath.t -> unit Lwt.t

Source

val store_resource : 
  Fpath.t ->
  Iri.t ->
  Cohttp.Response.t ->
  string ->
  unit Lwt.t

Sourceval date_rfc1123_fmt : string

Sourceval cache_date_header : string

Sourceval query_delay : float

Sourceval read_resource : Fpath.t -> (Cohttp.Response.t * string) option Lwt.t

Sourceval mk_cache : Fpath.t -> policy ref * (module Ldp.Http.Cache_impl)