olinq 0.1 · OCaml Package

type ('a, +'b) query = ('a, 'b) OLinq.t constraint 'b = [< `Any | `AtMostOne | `One ]

type json = [

]

val as_list : 
  (json, [< `Any | `AtMostOne | `One ]) query ->
  (json list, [ `Any ]) query

val as_assoc : 
  (json, [< `Any | `AtMostOne | `One ]) query ->
  ((string * json) list, [ `Any ]) query

val as_bool : 
  (json, [< `Any | `AtMostOne | `One ]) query ->
  (bool, [ `Any ]) query

val as_int : 
  (json, [< `Any | `AtMostOne | `One ]) query ->
  (int, [ `Any ]) query

val as_int_lit : 
  (json, [< `Any | `AtMostOne | `One ]) query ->
  (string, [ `Any ]) query

val as_float : 
  (json, [< `Any | `AtMostOne | `One ]) query ->
  (float, [ `Any ]) query

val as_null : 
  (json, [< `Any | `AtMostOne | `One ]) query ->
  (unit, [ `Any ]) query

val as_string : 
  (json, [< `Any | `AtMostOne | `One ]) query ->
  (string, [ `Any ]) query

val as_tuple : 
  (json, [< `Any | `AtMostOne | `One ]) query ->
  (json list, [ `Any ]) query

val as_variant : 
  (json, [< `Any | `AtMostOne | `One ]) query ->
  (string * json option, [ `Any ]) query

val assoc : 
  string ->
  (json, [< `Any | `AtMostOne | `One ]) query ->
  (json, [ `Any ]) query

val enter_assoc : 
  (json, [< `AtMostOne | `One ]) query ->
  (string * json, [ `Any ]) query

val enter_list : 
  (json, [< `Any | `AtMostOne | `One AtMostOne One ]) query ->
  (json, [ `Any ]) query

val enter_tuple : 
  (json, [< `AtMostOne | `One ]) query ->
  (json, [ `Any ]) query

val enter_tuple_index : 
  (json, [< `Any | `AtMostOne | `One ]) query ->
  (int * json, [ `Any ]) query

val map_list : 
  (json -> (json, [ `One ]) query) ->
  json ->
  (json, [ `AtMostOne | `One ]) query

val map_assoc : 
  (string -> json -> (json, [ `One ]) query) ->
  json ->
  (json, [ `AtMostOne | `One ]) query

package olinq