package bonsai

  1. Overview
  2. Docs
A library for building dynamic webapps, using Js_of_ocaml

Install 

dune-project
 Dependency

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

Authors

  1. J
    Jane Street Group, LLC

Maintainers

  1. J
    Jane Street developers

Sources

v0.17.0.tar.gz
sha256=c78c4476ee6b856846e2d0941e5965009d5e1b853e564b2b1bee61202f0b1ebb

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
open! Core

type packed = T : Runner.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) -> Runner.invalidate_observers driver);
    most_recent_driver := None;
    fun () -> ())
;;