Testing (graphql_basic_scalars.Graphql_basic

Utils for roundtrip testing of graphql scalars.

module type Test_Intf = sig ... end

val list_of_seq : ( 'a, 'b ) Stdlib.result Stdlib.Seq.t -> 'a list

val json_from_response : 
  ( [< `Response of [> `List of 'b list | `Null | `String of string ] as 'a
    | `Stream of ( 'b, 'c ) Stdlib.result Stdlib.Seq.t ],
    'd )
    Stdlib.result ->
  'e

val test_query : 
  'a Graphql.Schema.schema ->
  'b ->
  string ->
  ( Yojson.Basic.t -> unit ) ->
  unit

val get_test_field : Yojson.Basic.t -> Yojson.Basic.t

module Make_test
  (S : 
    Utils.Json_intf_any_typ
      with type ('a, 'b) typ := ( 'a, 'b ) Graphql.Schema.typ)
  (G : Test_Intf with type t = S.t) : 
  sig ... end