package virtual_dom_toplayer

  1. Overview
  2. Docs
OCaml bindings for the floating positioning library for 'toplevel' virtual dom components

Install

dune-project
 Dependency

Authors

Maintainers

Sources

virtual_dom_toplayer-v0.17.0.tar.gz
sha256=b525b0ba3607f142d417fe6edf1a08dbed86ae4e817680fb9bc191959b7a3aea

doc/src/virtual_dom_toplayer.floating_positioning/custom_converters.ml.html

Source file custom_converters.ml

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
open Core
open Js_of_ocaml

module Js = struct
  type 'a t = 'a Js.t

  (* [_ Js.t] is [Ojs.t]. *)

  let t_to_js : ('a -> Gen_js_api.Ojs.t) -> 'a Js.t -> Gen_js_api.Ojs.t =
    fun _ -> Obj.magic
  ;;

  let t_of_js : (Gen_js_api.Ojs.t -> 'a) -> Gen_js_api.Ojs.t -> 'a Js.t =
    fun _ -> Obj.magic
  ;;
end

module Dom_html = struct
  type element = Js_of_ocaml.Dom_html.element

  (* [element] should only be converted when it's a type parameter of [Js.t]. *)

  let element_to_js _ = failwith "BUG"
  let element_of_js _ = failwith "BUG"
end