From 25afb0bde9b8a2c064135a534231c232a461b341 Mon Sep 17 00:00:00 2001 From: Joris Date: Sun, 16 Feb 2020 22:45:07 +0100 Subject: Set up a first version of tabata timer --- src/Dom/Element.ml | 14 ++++++++++++++ 1 file changed, 14 insertions(+) create mode 100644 src/Dom/Element.ml (limited to 'src/Dom/Element.ml') diff --git a/src/Dom/Element.ml b/src/Dom/Element.ml new file mode 100644 index 0000000..4b38fa9 --- /dev/null +++ b/src/Dom/Element.ml @@ -0,0 +1,14 @@ +external setValue : Dom.element -> string -> unit = "value" [@@bs.set] + +external setInnerText : Dom.element -> string -> unit = "innerText" [@@bs.set] + +external setStyle : Dom.element -> string -> unit = "style" [@@bs.set] + +external setClassName : Dom.element -> string -> unit = "className" [@@bs.set] + +external setAttribute : Dom.element -> string -> string -> unit = "setAttribute" + [@@bs.send] + +external addEventListener : Dom.element -> string -> (Dom.event -> unit) -> unit + = "addEventListener" + [@@bs.send] -- cgit v1.2.3