Frontend (reference.odoc_notebook.odoc_notebook.frontend.Frontend)

Sourcemodule W = Js_top_worker_client_fut.W

Sourceval ocaml : Code_mirror.Extension.t

Sourcetype meta = {

libs : string list;
html_scripts : string list;

}

Sourceval meta_to_yojson : meta -> Yojson.Safe.t

Sourceval meta_of_yojson : Yojson.Safe.t -> meta Ppx_deriving_yojson_runtime.error_or

Sourceval _ : Yojson.Safe.t -> meta Ppx_deriving_yojson_runtime.error_or

Source

val initialise : 
  string list ->
  string ->
  (unit -> unit) ->
  (Js_top_worker_client_fut.rpc, Js_top_worker_rpc__Toplevel_api_gen.err)
    Fut.result

Sourceval styled_text : string -> string -> Brr.El.t list

Source

val mime_els : 
  'a ->
  Js_top_worker_rpc.Toplevel_api_gen.mime_val list ->
  Brr.El.t list

Source

val append_to_output : 
  string ->
  Js_top_worker_rpc.Toplevel_api_gen.exec_result ->
  'a ->
  unit

Sourceval basic_setup : Code_mirror.Extension.t

Sourcetype block_ty =

| Deferred
| OCaml
| Toplevel
| Other

Sourceval string_of_block_ty : block_ty -> string

Sourceval block_ty_of_string : string -> block_ty

Sourcetype ostate = {

id : string;
output_id : string;
hidden : bool;
solution : string option;
ty : block_ty;
mime_only : bool;
rpc : Js_top_worker_client_fut.rpc;

}

Sourceval to_jv : ostate -> Jv.t

Sourceval of_jv : Jv.t -> ostate

Sourceval oeffect : ostate Code_mirror.State.StateEffect.ty

Sourceval autorun_effect : bool Code_mirror.State.StateEffect.ty

Sourceval autorun_state_field : bool Code_mirror.State.StateField.t

Sourceval exec_js : string -> 'a -> unit

Source

val run_code : 
  ostate ->
  string ->
  Code_mirror.View.EditorView.t ->
  (unit, unit) result Fut.t

Source

val panel_constructor : 
  ostate ->
  Code_mirror.View.EditorView.t ->
  Code_mirror.View.Panel.t

Sourceval ostate : ostate Code_mirror.State.StateField.t

Source

val init : 
  ?doc:string ->
  ?exts:Code_mirror.Extension.t list ->
  unit ->
  Code_mirror.State.EditorState.t * Code_mirror.View.EditorView.t

Source

val make_editor : 
  Js_top_worker_client_fut.rpc ->
  int ->
  Brr.El.t ->
  (Code_mirror.State.EditorState.t * Code_mirror.View.EditorView.t) option

Sourceval get_sections : unit -> Brr.El.t list

Sourceval show_section : int -> unit

Sourceval nav_setup : unit -> unit

Source

val init_page : 
  string list ->
  (unit, Js_top_worker_rpc__Toplevel_api_gen.err) Fut.result

Sourceval main : 'a -> unit Fut.t