Module File

module File: sig .. end
filename handles old firefox without name property

class type blob = object .. end
class type file = object .. end
type file_any 
module CoerceTo: sig .. end
class type fileList = object .. end
class type fileError = object .. end
class type ['a] progressEvent = object .. end
class type progressEventTarget = object .. end
type readyState = 
| EMPTY
| LOADING
| DONE
class type fileReader = object .. end
module ReaderEvent: sig .. end
val filename : file Js.t -> Js.js_string Js.t
filename handles old firefox without name property
val fileReader : fileReader Js.t Js.constr
val readAsBinaryString : #blob Js.t -> Js.js_string Js.t Lwt.t
val readAsText : #blob Js.t -> Js.js_string Js.t Lwt.t
val readAsText_withEncoding : #blob Js.t -> Js.js_string Js.t -> Js.js_string Js.t Lwt.t
val readAsDataURL : #blob Js.t -> Js.js_string Js.t Lwt.t
val addEventListener : (#progressEventTarget as 'a) Js.t ->
'b Dom.Event.typ ->
('a Js.t, 'b) Dom.event_listener -> bool Js.t -> Dom.event_listener_id
Add an event listener. This function matches the addEventListener DOM method, except that it returns an id for removing the listener.