sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>
On This Page
module IO : Graphql_intf.IO
module Ws : Websocket.Connection.S with type 'a IO.t = 'a IO.t
module Json = Yojson.Basic.Util
type client_message =
| Gql_connection_init
| Gql_start of {
id : string;
query : string;
variables : (string * Graphql_parser.const_value) list option;
operation_name : string option;
}
| Gql_stop of {
}
| Gql_connection_terminate
val client_message_of_payload :
Yojson.Basic.t ->
(client_message, string) result
val server_message_to_string : server_message -> string
val create_message :
?opcode:Websocket.Frame.Opcode.t ->
?id:string ->
?payload:Yojson.Basic.t ->
server_message ->
Websocket.Frame.t
val handle_frame :
t ->
execute_query:
((string * Graphql_parser.const_value) list option ->
string option ->
string ->
([< `Response of Yojson.Basic.t
| `Stream of (Yojson.Basic.t, Yojson.Basic.t) result IO.Stream.t ],
Yojson.Basic.t)
result
IO.t) ->
Websocket.Frame.t ->
unit Ws.IO.t
val handle :
((string * Graphql_parser.const_value) list option ->
string option ->
string ->
([< `Response of Yojson.Basic.t
| `Stream of (Yojson.Basic.t, Yojson.Basic.t) result IO.Stream.t ],
Yojson.Basic.t)
result
IO.t) ->
Ws.t ->
'a IO.t