sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>
On This Page
type history_request = Protocol_j.history_request
val mime : ?base64:bool -> ty:string -> string -> exec_action
val ok : ?actions:exec_action list -> string option -> exec_status_ok
type t = {
init : unit -> unit Lwt.t;
exec : count:int -> string -> exec_status_ok or_error Lwt.t;
is_complete : string -> is_complete_reply Lwt.t;
language : string;
language_version : int list;
file_extension : string;
mime_type : string option;
codemirror_mode : string option;
complete : pos:int -> string -> completion_status Lwt.t;
inspect : inspect_request -> inspect_reply_ok or_error Lwt.t;
history : history_request -> string list Lwt.t;
}
val make :
?banner:string ->
?file_extension:string ->
?mime_type:string ->
?codemirror_mode:string ->
?init:(unit -> unit Lwt.t) ->
?is_complete:(string -> is_complete_reply Lwt.t) ->
?complete:(pos:int -> string -> completion_status Lwt.t) ->
?inspect:(inspect_request -> inspect_reply_ok or_error Lwt.t) ->
?history:(history_request -> string list Lwt.t) ->
language_version:int list ->
language:string ->
exec:(count:int -> string -> exec_status_ok or_error Lwt.t) ->
unit ->
t