sihl-core 0.2.0 · OCaml Package

val names : string list

val fn : 
  ([< `Read | `Set_and_create ], t, unit -> unit Lwt.t)
    Fieldslib.Field.t_with_perm

val scheduled_time : 
  ([< `Read | `Set_and_create ], t, scheduled_time) Fieldslib.Field.t_with_perm

val label : 
  ([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm

val make_creator : 
  label:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      'a ->
      ('b -> string) * 'c) ->
  scheduled_time:
    (([< `Read | `Set_and_create ], t, scheduled_time)
       Fieldslib.Field.t_with_perm ->
      'c ->
      ('b -> scheduled_time) * 'd) ->
  fn:
    (([< `Read | `Set_and_create ], t, unit -> unit Lwt.t)
       Fieldslib.Field.t_with_perm ->
      'd ->
      ('b -> unit -> unit Lwt.t) * 'e) ->
  'a ->
  ('b -> t) * 'e

val create : 
  label:string ->
  scheduled_time:scheduled_time ->
  fn:(unit -> unit Lwt.t) ->
  t

val map : 
  label:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      string) ->
  scheduled_time:
    (([< `Read | `Set_and_create ], t, scheduled_time)
       Fieldslib.Field.t_with_perm ->
      scheduled_time) ->
  fn:
    (([< `Read | `Set_and_create ], t, unit -> unit Lwt.t)
       Fieldslib.Field.t_with_perm ->
      unit ->
      unit Lwt.t) ->
  t

val iter : 
  label:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      unit) ->
  scheduled_time:
    (([< `Read | `Set_and_create ], t, scheduled_time)
       Fieldslib.Field.t_with_perm ->
      unit) ->
  fn:
    (([< `Read | `Set_and_create ], t, unit -> unit Lwt.t)
       Fieldslib.Field.t_with_perm ->
      unit) ->
  unit

val fold : 
  init:'a ->
  label:
    ('a ->
      ([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      'b) ->
  scheduled_time:
    ('b ->
      ([< `Read | `Set_and_create ], t, scheduled_time)
        Fieldslib.Field.t_with_perm ->
      'c) ->
  fn:
    ('c ->
      ([< `Read | `Set_and_create ], t, unit -> unit Lwt.t)
        Fieldslib.Field.t_with_perm ->
      'd) ->
  'd

val map_poly : 
  ([< `Read | `Set_and_create ], t, 'a) Fieldslib.Field.user ->
  'a list

val for_all : 
  label:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      bool) ->
  scheduled_time:
    (([< `Read | `Set_and_create ], t, scheduled_time)
       Fieldslib.Field.t_with_perm ->
      bool) ->
  fn:
    (([< `Read | `Set_and_create ], t, unit -> unit Lwt.t)
       Fieldslib.Field.t_with_perm ->
      bool) ->
  bool

val exists : 
  label:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      bool) ->
  scheduled_time:
    (([< `Read | `Set_and_create ], t, scheduled_time)
       Fieldslib.Field.t_with_perm ->
      bool) ->
  fn:
    (([< `Read | `Set_and_create ], t, unit -> unit Lwt.t)
       Fieldslib.Field.t_with_perm ->
      bool) ->
  bool

val to_list : 
  label:
    (([< `Read | `Set_and_create ], t, string) Fieldslib.Field.t_with_perm ->
      'a) ->
  scheduled_time:
    (([< `Read | `Set_and_create ], t, scheduled_time)
       Fieldslib.Field.t_with_perm ->
      'a) ->
  fn:
    (([< `Read | `Set_and_create ], t, unit -> unit Lwt.t)
       Fieldslib.Field.t_with_perm ->
      'a) ->
  'a list

module Direct : sig ... end

package sihl-core