package ezjs_extension

  1. Overview
  2. Docs
Binding for Chrome and Firefox extension API

Install 

dune-project
 Dependency

github.com Readme Changelog LGPL-2.1-only License Edit opam file Versions (2)

Authors

  1. M
    Maxime Levillain <maxime.levillain@ocamlpro.com>

Maintainers

  1. O
    OCamlPro <contact@ocamlpro.com>

Sources

0.1.tar.gz
md5=0d1dc7175a620eb50c07f2bbe0531533
sha512=5742b4e64398533c95291fe7c9b5ed3e264214dee7522fec1a0074766afd40e633aa1ceea16cbc6923ab80d737a15c13b50b96d4ddf8fad8ec74c30816877c9a

doc/src/ezjs_extension.chrome-lwt/storage_chrome_lwt.ml.html

Source file storage_chrome_lwt.ml

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
open Ezjs_min_lwt
open Promise
include Chrome_common.Storage

let get ?key (st:storageArea t) =
  to_lwt_cb (fun cb -> st##get (opt string key) cb)
let get_arr ?keys (st:storageArea t) =
  let keys = opt (of_listf string) keys in
  to_lwt_cb (fun cb -> st##get_arr keys cb)
let get_o ?obj (st:storageArea t) =
  to_lwt_cb (fun cb -> st##get (Opt.option obj) cb)
let getBytesInUse ?key (st:storageArea t) =
  to_lwt_cb (fun cb -> st##getBytesInUse (opt string key) cb)
let getBytesInUse_list ?keys (st:storageArea t) =
  let keys = opt (of_listf string) keys in
  to_lwt_cb (fun cb -> st##getBytesInUse_arr keys cb)
let set ?callback (st:storageArea t) o =
  to_lwt_cb_opt callback (fun cb -> st##set o cb)
let remove ?callback (st:storageArea t) s =
  to_lwt_cb_opt callback (fun cb -> st##remove (string s) cb)
let clear ?callback (st:storageArea t) =
  to_lwt_cb_opt callback (fun cb -> st##clear cb)