Example Reason+Bucklescript bindings

console.re

external log : 'anything => unit = "console.log" [@@bs.val];

external trace : 'anything => unit = "console.trace" [@@bs.val];

document.re

/*
 * vim: set ft=rust:
 * vim: set ft=reason:
 */
type element;

external getElementById : string => element = "document.getElementById" [@@bs.val];

external querySelector : string => element = "document.querySelector" [@@bs.val];

window.re

type intervalId;

type timeoutId;

external setInterval : (unit => unit) => int => intervalId = "window.setInterval" [@@bs.val];

external clearInterval : intervalId => unit = "window.clearInterval" [@@bs.val];

external setTimeout : (unit => unit) => int => timeoutId = "window.setTimeout" [@@bs.val];

external reload : unit => unit = "window.location.reload" [@@bs.val];