package bonsai

You can search for identifiers within the package.

in-package search v0.2.0

A library for building dynamic webapps, using Js_of_ocaml

Install

Dune Dependency

github.com Readme MIT License Edit opam file Versions (6)

Authors

J

Jane Street Group, LLC

Maintainers

J

Jane Street developers

Sources

v0.15.1.tar.gz

sha256=0c4a714146073f421f1a6179561f836b45d8dc012c743207d3481ea63bef74bf

doc/src/bonsai.bench/cleanup.ml.html

Source file `cleanup.ml`

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
open! Core
open! Bonsai_test.Arrow

type packed = T : _ Driver.t -> packed

let (most_recent_driver : packed option ref) = ref None
let register_driver driver = most_recent_driver := Some (T driver)

let invalidate_observers =
  Core_bench_js.Test.create_with_initialization
    ~name:"cleaning up observers..."
    (fun `init ->
       (match !most_recent_driver with
        | None -> ()
        | Some (T driver) -> Driver.invalidate_observers driver);
       most_recent_driver := None;
       fun () -> ())
;;