Legend:
Page
Library
Module
Module type
Parameter
Class
Class type
Source
Page
Library
Module
Module type
Parameter
Class
Class type
Source
global.ml
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
open Js_of_ocaml.Js open Js_of_ocaml.Js.Unsafe type t let add_global wasm_mod name typ is_mut init = meth_call wasm_mod "addGlobal" [| inject (string name); inject typ; inject (if is_mut then 1 else 0); inject init; |] let get_global wasm_mod name = meth_call wasm_mod "getGlobal" [| inject (string name) |] let remove_global wasm_mod name = meth_call wasm_mod "removeGlobal" [| inject (string name) |]