Skip to content
Permalink
master
Switch branches/tags
Go to file
 
 
Cannot retrieve contributors at this time
13 lines (12 sloc) 377 Bytes
module Event = {
type mouseDownEventType;
[@bs.get] external code : mouseDownEventType => string = "";
[@bs.get] external keyCode : mouseDownEventType => int = "";
};
module Document = {
/* hardcoded since we're only using this one */
[@bs.val] [@bs.scope "document"]
external addEventListener :
(string, Event.mouseDownEventType => unit) => unit =
"";
};