ghcjs-dom 0.2.4.0 → 0.9.9.2

raw patch · 1047 files changed

This diff is very large; some files are shown as “too large to diff”. Download the raw patch for the complete diff.

Files

cbits/ghcjs_stubs.c +0/−4
ghcjs-dom.cabal +649/−1114
jsbits/xhr.js +0/−25
src/GHCJS/DOM.hs +0/−167
src/GHCJS/DOM/ANGLEInstancedArrays.hs +0/−11
src/GHCJS/DOM/AbstractView.hs +0/−11
src/GHCJS/DOM/AbstractWorker.hs +0/−11
src/GHCJS/DOM/AllAudioCapabilities.hs +0/−11
src/GHCJS/DOM/AllVideoCapabilities.hs +0/−11
src/GHCJS/DOM/AnalyserNode.hs +0/−11
src/GHCJS/DOM/AnimationEvent.hs +0/−11
src/GHCJS/DOM/ApplicationCache.hs +0/−13
src/GHCJS/DOM/Attr.hs +0/−13
src/GHCJS/DOM/AudioBuffer.hs +0/−11
src/GHCJS/DOM/AudioBufferCallback.hs +0/−11
src/GHCJS/DOM/AudioBufferSourceNode.hs +0/−11
src/GHCJS/DOM/AudioContext.hs +0/−11
src/GHCJS/DOM/AudioDestinationNode.hs +0/−11
src/GHCJS/DOM/AudioListener.hs +0/−11
src/GHCJS/DOM/AudioNode.hs +0/−11
src/GHCJS/DOM/AudioParam.hs +0/−11
src/GHCJS/DOM/AudioProcessingEvent.hs +0/−11
src/GHCJS/DOM/AudioStreamTrack.hs +0/−11
src/GHCJS/DOM/AudioTrack.hs +0/−13
src/GHCJS/DOM/AudioTrackList.hs +0/−13
src/GHCJS/DOM/AutocompleteErrorEvent.hs +0/−11
src/GHCJS/DOM/BarProp.hs +0/−13
src/GHCJS/DOM/BatteryManager.hs +0/−13
src/GHCJS/DOM/BeforeLoadEvent.hs +0/−11
src/GHCJS/DOM/BeforeUnloadEvent.hs +0/−11
src/GHCJS/DOM/BiquadFilterNode.hs +0/−11
src/GHCJS/DOM/Blob.hs +0/−13
src/GHCJS/DOM/CSS.hs +0/−13
src/GHCJS/DOM/CSSCharsetRule.hs +0/−11
src/GHCJS/DOM/CSSFontFaceLoadEvent.hs +0/−11
src/GHCJS/DOM/CSSFontFaceRule.hs +0/−11
src/GHCJS/DOM/CSSImportRule.hs +0/−11
src/GHCJS/DOM/CSSKeyframeRule.hs +0/−11
src/GHCJS/DOM/CSSKeyframesRule.hs +0/−11
src/GHCJS/DOM/CSSMediaRule.hs +0/−11
src/GHCJS/DOM/CSSPageRule.hs +0/−11
src/GHCJS/DOM/CSSPrimitiveValue.hs +0/−11
src/GHCJS/DOM/CSSRule.hs +0/−13
src/GHCJS/DOM/CSSRuleList.hs +0/−13
src/GHCJS/DOM/CSSStyleDeclaration.hs +0/−13
src/GHCJS/DOM/CSSStyleRule.hs +0/−11
src/GHCJS/DOM/CSSStyleSheet.hs +0/−13
src/GHCJS/DOM/CSSSupportsRule.hs +0/−11
src/GHCJS/DOM/CSSValue.hs +0/−13
src/GHCJS/DOM/CSSValueList.hs +0/−11
src/GHCJS/DOM/CanvasGradient.hs +0/−11
src/GHCJS/DOM/CanvasRenderingContext.hs +0/−11
src/GHCJS/DOM/CanvasRenderingContext2D.hs +0/−11
src/GHCJS/DOM/CapabilityRange.hs +0/−11
src/GHCJS/DOM/CharacterData.hs +0/−13
src/GHCJS/DOM/ChildNode.hs +0/−11
src/GHCJS/DOM/ClientRect.hs +0/−11
src/GHCJS/DOM/ClientRectList.hs +0/−11
src/GHCJS/DOM/CloseEvent.hs +0/−11
src/GHCJS/DOM/CommandLineAPIHost.hs +0/−11
src/GHCJS/DOM/Comment.hs +0/−11
src/GHCJS/DOM/CompositionEvent.hs +0/−11
src/GHCJS/DOM/ConvolverNode.hs +0/−11
src/GHCJS/DOM/Coordinates.hs +0/−11
src/GHCJS/DOM/Counter.hs +0/−11
src/GHCJS/DOM/Crypto.hs +0/−11
src/GHCJS/DOM/CryptoKey.hs +0/−11
src/GHCJS/DOM/CryptoKeyPair.hs +0/−11
src/GHCJS/DOM/CustomEvent.hs +0/−11
src/GHCJS/DOM/DOMError.hs +0/−11
src/GHCJS/DOM/DOMImplementation.hs +0/−13
src/GHCJS/DOM/DOMNamedFlowCollection.hs +0/−13
src/GHCJS/DOM/DOMParser.hs +0/−11
src/GHCJS/DOM/DOMSettableTokenList.hs +0/−13
src/GHCJS/DOM/DOMStringList.hs +0/−13
src/GHCJS/DOM/DOMTokenList.hs +0/−13
src/GHCJS/DOM/DataCue.hs +0/−11
src/GHCJS/DOM/DataTransfer.hs +0/−11
src/GHCJS/DOM/DataTransferItem.hs +0/−11
src/GHCJS/DOM/DataTransferItemList.hs +0/−11
src/GHCJS/DOM/Database.hs +0/−11
src/GHCJS/DOM/DatabaseCallback.hs +0/−11
src/GHCJS/DOM/Debug.hs +179/−0
src/GHCJS/DOM/Debug/Internal.hs +71/−0
src/GHCJS/DOM/DedicatedWorkerGlobalScope.hs +0/−11
src/GHCJS/DOM/DelayNode.hs +0/−11
src/GHCJS/DOM/DeviceMotionEvent.hs +0/−11
src/GHCJS/DOM/DeviceOrientationEvent.hs +0/−11
src/GHCJS/DOM/DeviceProximityEvent.hs +0/−11
src/GHCJS/DOM/Document.hs +96/−7
src/GHCJS/DOM/DocumentFragment.hs +0/−11
src/GHCJS/DOM/DocumentType.hs +0/−13
src/GHCJS/DOM/DynamicsCompressorNode.hs +0/−11
src/GHCJS/DOM/EXTBlendMinMax.hs +0/−11
src/GHCJS/DOM/EXTTextureFilterAnisotropic.hs +0/−11
src/GHCJS/DOM/EXTsRGB.hs +0/−11
src/GHCJS/DOM/Element.hs +0/−13
src/GHCJS/DOM/Entity.hs +0/−11
src/GHCJS/DOM/Enums.hs +0/−13
src/GHCJS/DOM/ErrorEvent.hs +0/−11
src/GHCJS/DOM/Event.hs +0/−13
src/GHCJS/DOM/EventListener.hs +0/−11
src/GHCJS/DOM/EventM.hs +0/−297
src/GHCJS/DOM/EventSource.hs +0/−11
src/GHCJS/DOM/EventTarget.hs +0/−13
src/GHCJS/DOM/EventTargetClosures.hs +0/−46
src/GHCJS/DOM/File.hs +0/−13
src/GHCJS/DOM/FileError.hs +0/−11
src/GHCJS/DOM/FileList.hs +0/−13
src/GHCJS/DOM/FileReader.hs +0/−11
src/GHCJS/DOM/FileReaderSync.hs +0/−11
src/GHCJS/DOM/FocusEvent.hs +0/−11
src/GHCJS/DOM/FontLoader.hs +0/−11
src/GHCJS/DOM/FormData.hs +0/−11
src/GHCJS/DOM/GainNode.hs +0/−11
src/GHCJS/DOM/Gamepad.hs +0/−11
src/GHCJS/DOM/GamepadButton.hs +0/−11
src/GHCJS/DOM/GamepadEvent.hs +0/−11
src/GHCJS/DOM/Geolocation.hs +0/−13
src/GHCJS/DOM/Geoposition.hs +0/−11
src/GHCJS/DOM/HTMLAllCollection.hs +0/−11
src/GHCJS/DOM/HTMLAnchorElement.hs +0/−13
src/GHCJS/DOM/HTMLAppletElement.hs +0/−13
src/GHCJS/DOM/HTMLAreaElement.hs +0/−13
src/GHCJS/DOM/HTMLBRElement.hs +0/−13
src/GHCJS/DOM/HTMLBaseElement.hs +0/−13
src/GHCJS/DOM/HTMLBaseFontElement.hs +0/−13
src/GHCJS/DOM/HTMLBodyElement.hs +0/−13
src/GHCJS/DOM/HTMLButtonElement.hs +0/−13
src/GHCJS/DOM/HTMLCanvasElement.hs +0/−13
src/GHCJS/DOM/HTMLCollection.hs +0/−13
src/GHCJS/DOM/HTMLDListElement.hs +0/−13
src/GHCJS/DOM/HTMLDataListElement.hs +0/−11
src/GHCJS/DOM/HTMLDetailsElement.hs +0/−13
src/GHCJS/DOM/HTMLDirectoryElement.hs +0/−13
src/GHCJS/DOM/HTMLDivElement.hs +0/−13
src/GHCJS/DOM/HTMLDocument.hs +0/−13
src/GHCJS/DOM/HTMLElement.hs +0/−13
src/GHCJS/DOM/HTMLEmbedElement.hs +0/−13
src/GHCJS/DOM/HTMLFieldSetElement.hs +0/−13
src/GHCJS/DOM/HTMLFontElement.hs +0/−13
src/GHCJS/DOM/HTMLFormControlsCollection.hs +0/−11
src/GHCJS/DOM/HTMLFormElement.hs +0/−13
src/GHCJS/DOM/HTMLFrameElement.hs +0/−13
src/GHCJS/DOM/HTMLFrameSetElement.hs +0/−13
src/GHCJS/DOM/HTMLHRElement.hs +0/−13
src/GHCJS/DOM/HTMLHeadElement.hs +0/−13
src/GHCJS/DOM/HTMLHeadingElement.hs +0/−13
src/GHCJS/DOM/HTMLHtmlElement.hs +0/−13
src/GHCJS/DOM/HTMLIFrameElement.hs +0/−13
src/GHCJS/DOM/HTMLImageElement.hs +0/−13
src/GHCJS/DOM/HTMLInputElement.hs +0/−13
src/GHCJS/DOM/HTMLKeygenElement.hs +0/−13
src/GHCJS/DOM/HTMLLIElement.hs +0/−13
src/GHCJS/DOM/HTMLLabelElement.hs +0/−13
src/GHCJS/DOM/HTMLLegendElement.hs +0/−13
src/GHCJS/DOM/HTMLLinkElement.hs +0/−13
src/GHCJS/DOM/HTMLMapElement.hs +0/−13
src/GHCJS/DOM/HTMLMarqueeElement.hs +0/−13
src/GHCJS/DOM/HTMLMediaElement.hs +0/−13
src/GHCJS/DOM/HTMLMenuElement.hs +0/−13
src/GHCJS/DOM/HTMLMetaElement.hs +0/−13
src/GHCJS/DOM/HTMLMeterElement.hs +0/−11
src/GHCJS/DOM/HTMLModElement.hs +0/−13
src/GHCJS/DOM/HTMLOListElement.hs +0/−13
src/GHCJS/DOM/HTMLObjectElement.hs +0/−13
src/GHCJS/DOM/HTMLOptGroupElement.hs +0/−13
src/GHCJS/DOM/HTMLOptionElement.hs +0/−13
src/GHCJS/DOM/HTMLOptionsCollection.hs +0/−13
src/GHCJS/DOM/HTMLOutputElement.hs +0/−11
src/GHCJS/DOM/HTMLParagraphElement.hs +0/−13
src/GHCJS/DOM/HTMLParamElement.hs +0/−13
src/GHCJS/DOM/HTMLPreElement.hs +0/−13
src/GHCJS/DOM/HTMLProgressElement.hs +0/−11
src/GHCJS/DOM/HTMLQuoteElement.hs +0/−13
src/GHCJS/DOM/HTMLScriptElement.hs +0/−13
src/GHCJS/DOM/HTMLSelectElement.hs +0/−13
src/GHCJS/DOM/HTMLSourceElement.hs +0/−11
src/GHCJS/DOM/HTMLStyleElement.hs +0/−13
src/GHCJS/DOM/HTMLTableCaptionElement.hs +0/−13
src/GHCJS/DOM/HTMLTableCellElement.hs +0/−13
src/GHCJS/DOM/HTMLTableColElement.hs +0/−13
src/GHCJS/DOM/HTMLTableElement.hs +0/−13
src/GHCJS/DOM/HTMLTableRowElement.hs +0/−13
src/GHCJS/DOM/HTMLTableSectionElement.hs +0/−13
src/GHCJS/DOM/HTMLTemplateElement.hs +0/−11
src/GHCJS/DOM/HTMLTextAreaElement.hs +0/−13
src/GHCJS/DOM/HTMLTitleElement.hs +0/−13
src/GHCJS/DOM/HTMLTrackElement.hs +0/−11
src/GHCJS/DOM/HTMLUListElement.hs +0/−13
src/GHCJS/DOM/HTMLVideoElement.hs +0/−13
src/GHCJS/DOM/HashChangeEvent.hs +0/−11
src/GHCJS/DOM/History.hs +0/−13
src/GHCJS/DOM/IDBCursor.hs +0/−11
src/GHCJS/DOM/IDBCursorWithValue.hs +0/−11
src/GHCJS/DOM/IDBDatabase.hs +0/−11
src/GHCJS/DOM/IDBFactory.hs +0/−11
src/GHCJS/DOM/IDBIndex.hs +0/−11
src/GHCJS/DOM/IDBKeyRange.hs +0/−11
src/GHCJS/DOM/IDBObjectStore.hs +0/−11
src/GHCJS/DOM/IDBOpenDBRequest.hs +0/−11
src/GHCJS/DOM/IDBRequest.hs +0/−11
src/GHCJS/DOM/IDBTransaction.hs +0/−11
src/GHCJS/DOM/IDBVersionChangeEvent.hs +0/−11
src/GHCJS/DOM/ImageData.hs +0/−11
src/GHCJS/DOM/InspectorFrontendHost.hs +0/−11
src/GHCJS/DOM/InternalSettings.hs +0/−11
src/GHCJS/DOM/Internals.hs +0/−11
src/GHCJS/DOM/JSFFI/AudioContext.hs +0/−35
src/GHCJS/DOM/JSFFI/DOMError.hs +0/−20
src/GHCJS/DOM/JSFFI/Database.hs +0/−75
src/GHCJS/DOM/JSFFI/Generated/ANGLEInstancedArrays.hs +0/−63
src/GHCJS/DOM/JSFFI/Generated/AbstractView.hs +0/−36
src/GHCJS/DOM/JSFFI/Generated/AbstractWorker.hs +0/−22
src/GHCJS/DOM/JSFFI/Generated/AllAudioCapabilities.hs +0/−38
src/GHCJS/DOM/JSFFI/Generated/AllVideoCapabilities.hs +0/−88
src/GHCJS/DOM/JSFFI/Generated/AnalyserNode.hs +0/−133
src/GHCJS/DOM/JSFFI/Generated/AnimationEvent.hs +0/−36
src/GHCJS/DOM/JSFFI/Generated/ApplicationCache.hs +0/−89
src/GHCJS/DOM/JSFFI/Generated/Attr.hs +0/−67
src/GHCJS/DOM/JSFFI/Generated/AudioBuffer.hs +0/−75
src/GHCJS/DOM/JSFFI/Generated/AudioBufferCallback.hs +0/−55
src/GHCJS/DOM/JSFFI/Generated/AudioBufferSourceNode.hs +0/−180
src/GHCJS/DOM/JSFFI/Generated/AudioContext.hs +0/−424
src/GHCJS/DOM/JSFFI/Generated/AudioDestinationNode.hs +0/−26
src/GHCJS/DOM/JSFFI/Generated/AudioListener.hs +0/−80
src/GHCJS/DOM/JSFFI/Generated/AudioNode.hs +0/−151
src/GHCJS/DOM/JSFFI/Generated/AudioParam.hs +0/−152
src/GHCJS/DOM/JSFFI/Generated/AudioProcessingEvent.hs +0/−48
src/GHCJS/DOM/JSFFI/Generated/AudioStreamTrack.hs +0/−32
src/GHCJS/DOM/JSFFI/Generated/AudioTrack.hs +0/−93
src/GHCJS/DOM/JSFFI/Generated/AudioTrackList.hs +0/−60
src/GHCJS/DOM/JSFFI/Generated/AutocompleteErrorEvent.hs +0/−28
src/GHCJS/DOM/JSFFI/Generated/BarProp.hs +0/−25
src/GHCJS/DOM/JSFFI/Generated/BatteryManager.hs +0/−68
src/GHCJS/DOM/JSFFI/Generated/BeforeLoadEvent.hs +0/−27
src/GHCJS/DOM/JSFFI/Generated/BeforeUnloadEvent.hs +0/−38
src/GHCJS/DOM/JSFFI/Generated/BiquadFilterNode.hs +0/−100
src/GHCJS/DOM/JSFFI/Generated/Blob.hs +0/−68
src/GHCJS/DOM/JSFFI/Generated/CSS.hs +0/−41
src/GHCJS/DOM/JSFFI/Generated/CSSCharsetRule.hs +0/−38
src/GHCJS/DOM/JSFFI/Generated/CSSFontFaceLoadEvent.hs +0/−37
src/GHCJS/DOM/JSFFI/Generated/CSSFontFaceRule.hs +0/−27
src/GHCJS/DOM/JSFFI/Generated/CSSImportRule.hs +0/−45
src/GHCJS/DOM/JSFFI/Generated/CSSKeyframeRule.hs +0/−45
src/GHCJS/DOM/JSFFI/Generated/CSSKeyframesRule.hs +0/−97
src/GHCJS/DOM/JSFFI/Generated/CSSMediaRule.hs +0/−52
src/GHCJS/DOM/JSFFI/Generated/CSSPageRule.hs +0/−46
src/GHCJS/DOM/JSFFI/Generated/CSSPrimitiveValue.hs +0/−133
src/GHCJS/DOM/JSFFI/Generated/CSSRule.hs +0/−86
src/GHCJS/DOM/JSFFI/Generated/CSSRuleList.hs +0/−34
src/GHCJS/DOM/JSFFI/Generated/CSSStyleDeclaration.hs +0/−163
src/GHCJS/DOM/JSFFI/Generated/CSSStyleRule.hs +0/−47
src/GHCJS/DOM/JSFFI/Generated/CSSStyleSheet.hs +0/−81
src/GHCJS/DOM/JSFFI/Generated/CSSSupportsRule.hs +0/−55
src/GHCJS/DOM/JSFFI/Generated/CSSValue.hs +0/−54
src/GHCJS/DOM/JSFFI/Generated/CSSValueList.hs +0/−38
src/GHCJS/DOM/JSFFI/Generated/CanvasGradient.hs +0/−29
src/GHCJS/DOM/JSFFI/Generated/CanvasRenderingContext.hs +0/−32
src/GHCJS/DOM/JSFFI/Generated/CanvasRenderingContext2D.hs +0/−1489
src/GHCJS/DOM/JSFFI/Generated/CapabilityRange.hs +0/−41
src/GHCJS/DOM/JSFFI/Generated/CharacterData.hs +0/−107
src/GHCJS/DOM/JSFFI/Generated/ChildNode.hs +0/−25
src/GHCJS/DOM/JSFFI/Generated/ClientRect.hs +0/−62
src/GHCJS/DOM/JSFFI/Generated/ClientRectList.hs +0/−35
src/GHCJS/DOM/JSFFI/Generated/CloseEvent.hs +0/−41
src/GHCJS/DOM/JSFFI/Generated/CommandLineAPIHost.hs +0/−87
src/GHCJS/DOM/JSFFI/Generated/Comment.hs +0/−25
src/GHCJS/DOM/JSFFI/Generated/CompositionEvent.hs +0/−47
src/GHCJS/DOM/JSFFI/Generated/ConvolverNode.hs +0/−50
src/GHCJS/DOM/JSFFI/Generated/Coordinates.hs +0/−76
src/GHCJS/DOM/JSFFI/Generated/Counter.hs +0/−47
src/GHCJS/DOM/JSFFI/Generated/Crypto.hs +0/−41
src/GHCJS/DOM/JSFFI/Generated/CryptoKey.hs +0/−50
src/GHCJS/DOM/JSFFI/Generated/CryptoKeyPair.hs +0/−36
src/GHCJS/DOM/JSFFI/Generated/CustomEvent.hs +0/−40
src/GHCJS/DOM/JSFFI/Generated/DOMError.hs +0/−29
src/GHCJS/DOM/JSFFI/Generated/DOMImplementation.hs +0/−104
src/GHCJS/DOM/JSFFI/Generated/DOMNamedFlowCollection.hs +0/−49
src/GHCJS/DOM/JSFFI/Generated/DOMParser.hs +0/−40
src/GHCJS/DOM/JSFFI/Generated/DOMSettableTokenList.hs +0/−47
src/GHCJS/DOM/JSFFI/Generated/DOMStringList.hs +0/−45
src/GHCJS/DOM/JSFFI/Generated/DOMTokenList.hs +0/−95
src/GHCJS/DOM/JSFFI/Generated/DataCue.hs +0/−78
src/GHCJS/DOM/JSFFI/Generated/DataTransfer.hs +0/−123
src/GHCJS/DOM/JSFFI/Generated/DataTransferItem.hs +0/−54
src/GHCJS/DOM/JSFFI/Generated/DataTransferItemList.hs +0/−63
src/GHCJS/DOM/JSFFI/Generated/Database.hs +0/−92
src/GHCJS/DOM/JSFFI/Generated/DatabaseCallback.hs +0/−49
src/GHCJS/DOM/JSFFI/Generated/DedicatedWorkerGlobalScope.hs +0/−36
src/GHCJS/DOM/JSFFI/Generated/DelayNode.hs +0/−27
src/GHCJS/DOM/JSFFI/Generated/DeviceMotionEvent.hs +0/−95
src/GHCJS/DOM/JSFFI/Generated/DeviceOrientationEvent.hs +0/−71
src/GHCJS/DOM/JSFFI/Generated/DeviceProximityEvent.hs +0/−41
src/GHCJS/DOM/JSFFI/Generated/Document.hs +0/−1565
src/GHCJS/DOM/JSFFI/Generated/DocumentFragment.hs +0/−54
src/GHCJS/DOM/JSFFI/Generated/DocumentType.hs +0/−77
src/GHCJS/DOM/JSFFI/Generated/DynamicsCompressorNode.hs +0/−74
src/GHCJS/DOM/JSFFI/Generated/EXTBlendMinMax.hs +0/−21
src/GHCJS/DOM/JSFFI/Generated/EXTTextureFilterAnisotropic.hs +0/−23
src/GHCJS/DOM/JSFFI/Generated/EXTsRGB.hs +0/−25
src/GHCJS/DOM/JSFFI/Generated/Element.hs +0/−1045
src/GHCJS/DOM/JSFFI/Generated/Entity.hs +0/−47
src/GHCJS/DOM/JSFFI/Generated/Enums.hs +0/−771
src/GHCJS/DOM/JSFFI/Generated/ErrorEvent.hs +0/−51
src/GHCJS/DOM/JSFFI/Generated/Event.hs +0/−203
src/GHCJS/DOM/JSFFI/Generated/EventListener.hs +0/−29
src/GHCJS/DOM/JSFFI/Generated/EventSource.hs +0/−80
src/GHCJS/DOM/JSFFI/Generated/EventTarget.hs +0/−61
src/GHCJS/DOM/JSFFI/Generated/File.hs +0/−34
src/GHCJS/DOM/JSFFI/Generated/FileError.hs +0/−43
src/GHCJS/DOM/JSFFI/Generated/FileList.hs +0/−34
src/GHCJS/DOM/JSFFI/Generated/FileReader.hs +0/−128
src/GHCJS/DOM/JSFFI/Generated/FileReaderSync.hs +0/−82
src/GHCJS/DOM/JSFFI/Generated/FocusEvent.hs +0/−28
src/GHCJS/DOM/JSFFI/Generated/FontLoader.hs +0/−81
src/GHCJS/DOM/JSFFI/Generated/FormData.hs +0/−39
src/GHCJS/DOM/JSFFI/Generated/GainNode.hs +0/−25
src/GHCJS/DOM/JSFFI/Generated/Gamepad.hs +0/−72
src/GHCJS/DOM/JSFFI/Generated/GamepadButton.hs +0/−33
src/GHCJS/DOM/JSFFI/Generated/GamepadEvent.hs +0/−27
src/GHCJS/DOM/JSFFI/Generated/Geolocation.hs +0/−64
src/GHCJS/DOM/JSFFI/Generated/Geoposition.hs +0/−33
src/GHCJS/DOM/JSFFI/Generated/HTMLAllCollection.hs +0/−56
src/GHCJS/DOM/JSFFI/Generated/HTMLAnchorElement.hs +0/−409
src/GHCJS/DOM/JSFFI/Generated/HTMLAppletElement.hs +0/−206
src/GHCJS/DOM/JSFFI/Generated/HTMLAreaElement.hs +0/−221
src/GHCJS/DOM/JSFFI/Generated/HTMLBRElement.hs +0/−35
src/GHCJS/DOM/JSFFI/Generated/HTMLBaseElement.hs +0/−53
src/GHCJS/DOM/JSFFI/Generated/HTMLBaseFontElement.hs +0/−67
src/GHCJS/DOM/JSFFI/Generated/HTMLBodyElement.hs +0/−181
src/GHCJS/DOM/JSFFI/Generated/HTMLButtonElement.hs +0/−262
src/GHCJS/DOM/JSFFI/Generated/HTMLCanvasElement.hs +0/−83
src/GHCJS/DOM/JSFFI/Generated/HTMLCollection.hs +0/−50
src/GHCJS/DOM/JSFFI/Generated/HTMLDListElement.hs +0/−33
src/GHCJS/DOM/JSFFI/Generated/HTMLDataListElement.hs +0/−28
src/GHCJS/DOM/JSFFI/Generated/HTMLDetailsElement.hs +0/−33
src/GHCJS/DOM/JSFFI/Generated/HTMLDirectoryElement.hs +0/−34
src/GHCJS/DOM/JSFFI/Generated/HTMLDivElement.hs +0/−35
src/GHCJS/DOM/JSFFI/Generated/HTMLDocument.hs +0/−269
src/GHCJS/DOM/JSFFI/Generated/HTMLElement.hs +0/−355
src/GHCJS/DOM/JSFFI/Generated/HTMLEmbedElement.hs +0/−128
src/GHCJS/DOM/JSFFI/Generated/HTMLFieldSetElement.hs +0/−123
src/GHCJS/DOM/JSFFI/Generated/HTMLFontElement.hs +0/−68
src/GHCJS/DOM/JSFFI/Generated/HTMLFormControlsCollection.hs +0/−41
src/GHCJS/DOM/JSFFI/Generated/HTMLFormElement.hs +0/−284
src/GHCJS/DOM/JSFFI/Generated/HTMLFrameElement.hs +0/−227
src/GHCJS/DOM/JSFFI/Generated/HTMLFrameSetElement.hs +0/−111
src/GHCJS/DOM/JSFFI/Generated/HTMLHRElement.hs +0/−83
src/GHCJS/DOM/JSFFI/Generated/HTMLHeadElement.hs +0/−36
src/GHCJS/DOM/JSFFI/Generated/HTMLHeadingElement.hs +0/−35
src/GHCJS/DOM/JSFFI/Generated/HTMLHtmlElement.hs +0/−55
src/GHCJS/DOM/JSFFI/Generated/HTMLIFrameElement.hs +0/−263
src/GHCJS/DOM/JSFFI/Generated/HTMLImageElement.hs +0/−328
src/GHCJS/DOM/JSFFI/Generated/HTMLInputElement.hs +0/−883
src/GHCJS/DOM/JSFFI/Generated/HTMLKeygenElement.hs +0/−173
src/GHCJS/DOM/JSFFI/Generated/HTMLLIElement.hs +0/−50
src/GHCJS/DOM/JSFFI/Generated/HTMLLabelElement.hs +0/−54
src/GHCJS/DOM/JSFFI/Generated/HTMLLegendElement.hs +0/−43
src/GHCJS/DOM/JSFFI/Generated/HTMLLinkElement.hs +0/−206
src/GHCJS/DOM/JSFFI/Generated/HTMLMapElement.hs +0/−43
src/GHCJS/DOM/JSFFI/Generated/HTMLMarqueeElement.hs +0/−213
src/GHCJS/DOM/JSFFI/Generated/HTMLMediaElement.hs +0/−858
src/GHCJS/DOM/JSFFI/Generated/HTMLMenuElement.hs +0/−33
src/GHCJS/DOM/JSFFI/Generated/HTMLMetaElement.hs +0/−89
src/GHCJS/DOM/JSFFI/Generated/HTMLMeterElement.hs +0/−114
src/GHCJS/DOM/JSFFI/Generated/HTMLModElement.hs +0/−54
src/GHCJS/DOM/JSFFI/Generated/HTMLOListElement.hs +0/−80
src/GHCJS/DOM/JSFFI/Generated/HTMLObjectElement.hs +0/−363
src/GHCJS/DOM/JSFFI/Generated/HTMLOptGroupElement.hs +0/−50
src/GHCJS/DOM/JSFFI/Generated/HTMLOptionElement.hs +0/−132
src/GHCJS/DOM/JSFFI/Generated/HTMLOptionsCollection.hs +0/−96
src/GHCJS/DOM/JSFFI/Generated/HTMLOutputElement.hs +0/−158
src/GHCJS/DOM/JSFFI/Generated/HTMLParagraphElement.hs +0/−37
src/GHCJS/DOM/JSFFI/Generated/HTMLParamElement.hs +0/−87
src/GHCJS/DOM/JSFFI/Generated/HTMLPreElement.hs +0/−48
src/GHCJS/DOM/JSFFI/Generated/HTMLProgressElement.hs +0/−64
src/GHCJS/DOM/JSFFI/Generated/HTMLQuoteElement.hs +0/−35
src/GHCJS/DOM/JSFFI/Generated/HTMLScriptElement.hs +0/−188
src/GHCJS/DOM/JSFFI/Generated/HTMLSelectElement.hs +0/−305
src/GHCJS/DOM/JSFFI/Generated/HTMLSourceElement.hs +0/−68
src/GHCJS/DOM/JSFFI/Generated/HTMLStyleElement.hs +0/−74
src/GHCJS/DOM/JSFFI/Generated/HTMLTableCaptionElement.hs +0/−38
src/GHCJS/DOM/JSFFI/Generated/HTMLTableCellElement.hs +0/−268
src/GHCJS/DOM/JSFFI/Generated/HTMLTableColElement.hs +0/−117
src/GHCJS/DOM/JSFFI/Generated/HTMLTableElement.hs +0/−334
src/GHCJS/DOM/JSFFI/Generated/HTMLTableRowElement.hs +0/−145
src/GHCJS/DOM/JSFFI/Generated/HTMLTableSectionElement.hs +0/−121
src/GHCJS/DOM/JSFFI/Generated/HTMLTemplateElement.hs +0/−28
src/GHCJS/DOM/JSFFI/Generated/HTMLTextAreaElement.hs +0/−456
src/GHCJS/DOM/JSFFI/Generated/HTMLTitleElement.hs +0/−37
src/GHCJS/DOM/JSFFI/Generated/HTMLTrackElement.hs +0/−121
src/GHCJS/DOM/JSFFI/Generated/HTMLUListElement.hs +0/−50
src/GHCJS/DOM/JSFFI/Generated/HTMLVideoElement.hs +0/−222
src/GHCJS/DOM/JSFFI/Generated/HashChangeEvent.hs +0/−55
src/GHCJS/DOM/JSFFI/Generated/History.hs +0/−79
src/GHCJS/DOM/JSFFI/Generated/IDBCursor.hs +0/−88
src/GHCJS/DOM/JSFFI/Generated/IDBCursorWithValue.hs +0/−26
src/GHCJS/DOM/JSFFI/Generated/IDBDatabase.hs +0/−119
src/GHCJS/DOM/JSFFI/Generated/IDBFactory.hs +0/−50
src/GHCJS/DOM/JSFFI/Generated/IDBIndex.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/IDBKeyRange.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/IDBObjectStore.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/IDBOpenDBRequest.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/IDBRequest.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/IDBTransaction.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/IDBVersionChangeEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/ImageData.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/InspectorFrontendHost.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/InternalSettings.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/Internals.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/KeyboardEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/Location.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MallocStatistics.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MediaController.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MediaControlsHost.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MediaElementAudioSourceNode.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MediaError.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MediaKeyError.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MediaKeyEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MediaKeyMessageEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MediaKeyNeededEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MediaKeySession.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MediaKeys.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MediaList.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MediaQueryList.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MediaQueryListListener.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MediaSource.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MediaSourceStates.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MediaStream.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MediaStreamAudioDestinationNode.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MediaStreamAudioSourceNode.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MediaStreamEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MediaStreamTrack.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MediaStreamTrackEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MediaStreamTrackSourcesCallback.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MediaTrackConstraints.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MemoryInfo.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MessageChannel.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MessageEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MessagePort.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MimeType.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MimeTypeArray.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MouseEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MutationEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MutationObserver.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/MutationRecord.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/NamedNodeMap.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/Navigator.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/NavigatorUserMediaError.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/NavigatorUserMediaErrorCallback.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/NavigatorUserMediaSuccessCallback.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/Node.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/NodeFilter.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/NodeIterator.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/NodeList.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/Notification.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/NotificationCenter.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/NotificationPermissionCallback.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/OESStandardDerivatives.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/OESTextureHalfFloat.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/OESVertexArrayObject.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/OfflineAudioCompletionEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/OfflineAudioContext.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/OscillatorNode.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/OverflowEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/PageTransitionEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/PannerNode.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/Path2D.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/Performance.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/PerformanceEntry.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/PerformanceEntryList.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/PerformanceNavigation.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/PerformanceResourceTiming.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/PerformanceTiming.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/Plugin.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/PluginArray.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/PopStateEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/PositionCallback.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/PositionError.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/PositionErrorCallback.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/ProcessingInstruction.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/ProgressEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/QuickTimePluginReplacement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/RGBColor.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/RTCConfiguration.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/RTCDTMFSender.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/RTCDTMFToneChangeEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/RTCDataChannel.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/RTCDataChannelEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/RTCIceCandidate.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/RTCIceCandidateEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/RTCIceServer.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/RTCPeerConnection.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/RTCPeerConnectionErrorCallback.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/RTCSessionDescription.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/RTCSessionDescriptionCallback.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/RTCStatsCallback.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/RTCStatsReport.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/RTCStatsResponse.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/RadioNodeList.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/Range.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/ReadableStream.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/Rect.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/RequestAnimationFrameCallback.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SQLError.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SQLResultSet.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SQLResultSetRowList.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SQLStatementCallback.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SQLStatementErrorCallback.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SQLTransaction.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SQLTransactionCallback.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SQLTransactionErrorCallback.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGAElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGAltGlyphElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGAngle.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedAngle.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedBoolean.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedEnumeration.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedInteger.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedLength.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedLengthList.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedNumber.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedNumberList.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedPreserveAspectRatio.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedRect.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedString.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedTransformList.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGAnimationElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGCircleElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGClipPathElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGColor.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGComponentTransferFunctionElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGCursorElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGDocument.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGEllipseElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGExternalResourcesRequired.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGFEBlendElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGFEColorMatrixElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGFEComponentTransferElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGFECompositeElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGFEConvolveMatrixElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGFEDiffuseLightingElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGFEDisplacementMapElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGFEDistantLightElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGFEDropShadowElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGFEGaussianBlurElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGFEImageElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGFEMergeNodeElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGFEMorphologyElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGFEOffsetElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGFEPointLightElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGFESpecularLightingElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGFESpotLightElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGFETileElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGFETurbulenceElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGFilterElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGFilterPrimitiveStandardAttributes.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGFitToViewBox.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGForeignObjectElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGGlyphRefElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGGradientElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGGraphicsElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGImageElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGLength.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGLengthList.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGLineElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGLinearGradientElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGMarkerElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGMaskElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGMatrix.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGNumber.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGNumberList.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPaint.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPathElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPathSeg.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPathSegArcAbs.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPathSegArcRel.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPathSegCurvetoCubicAbs.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPathSegCurvetoCubicRel.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPathSegCurvetoCubicSmoothAbs.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPathSegCurvetoCubicSmoothRel.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPathSegCurvetoQuadraticAbs.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPathSegCurvetoQuadraticRel.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPathSegCurvetoQuadraticSmoothAbs.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPathSegCurvetoQuadraticSmoothRel.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPathSegLinetoAbs.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPathSegLinetoHorizontalAbs.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPathSegLinetoHorizontalRel.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPathSegLinetoRel.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPathSegLinetoVerticalAbs.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPathSegLinetoVerticalRel.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPathSegList.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPathSegMovetoAbs.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPathSegMovetoRel.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPatternElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPoint.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPointList.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPolygonElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPolylineElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGPreserveAspectRatio.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGRadialGradientElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGRect.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGRectElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGRenderingIntent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGSVGElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGScriptElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGStopElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGStringList.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGStyleElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGTests.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGTextContentElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGTextPathElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGTextPositioningElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGTransform.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGTransformList.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGURIReference.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGUnitTypes.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGUseElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGViewElement.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGViewSpec.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGZoomAndPan.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SVGZoomEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/Screen.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/ScriptProcessorNode.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/ScriptProfile.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/ScriptProfileNode.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SecurityPolicy.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SecurityPolicyViolationEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/Selection.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SourceBuffer.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SourceBufferList.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SourceInfo.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SpeechSynthesis.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SpeechSynthesisEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SpeechSynthesisUtterance.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SpeechSynthesisVoice.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/Storage.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/StorageErrorCallback.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/StorageEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/StorageInfo.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/StorageQuota.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/StorageQuotaCallback.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/StorageUsageCallback.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/StringCallback.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/StyleMedia.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/StyleSheet.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/StyleSheetList.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/SubtleCrypto.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/Text.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/TextEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/TextMetrics.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/TextTrack.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/TextTrackCue.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/TextTrackCueList.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/TextTrackList.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/TimeRanges.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/Touch.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/TouchEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/TouchList.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/TrackEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/TransitionEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/TreeWalker.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/TypeConversions.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/UIEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/UIRequestEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/URL.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/URLUtils.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/UserMessageHandler.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/VTTCue.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/VTTRegion.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/VTTRegionList.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/ValidityState.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/VideoPlaybackQuality.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/VideoStreamTrack.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/VideoTrack.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/VideoTrackList.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/VoidCallback.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WaveShaperNode.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WebGL2RenderingContext.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WebGLActiveInfo.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WebGLCompressedTextureATC.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WebGLCompressedTexturePVRTC.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WebGLCompressedTextureS3TC.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WebGLContextAttributes.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WebGLContextEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WebGLDebugRendererInfo.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WebGLDebugShaders.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WebGLDepthTexture.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WebGLDrawBuffers.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WebGLLoseContext.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WebGLRenderingContextBase.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WebGLShaderPrecisionFormat.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WebKitAnimationEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WebKitCSSFilterValue.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WebKitCSSMatrix.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WebKitCSSRegionRule.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WebKitCSSTransformValue.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WebKitCSSViewportRule.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WebKitNamedFlow.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WebKitNamespace.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WebKitPlaybackTargetAvailabilityEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WebKitPoint.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WebKitTransitionEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WebSocket.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WheelEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/Window.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WindowBase64.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WindowTimers.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/Worker.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WorkerGlobalScope.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WorkerLocation.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/WorkerNavigator.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/XMLHttpRequest.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/XMLHttpRequestProgressEvent.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/XMLHttpRequestUpload.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/XMLSerializer.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/XPathEvaluator.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/XPathExpression.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/XPathNSResolver.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/XPathResult.hs too large to diff
src/GHCJS/DOM/JSFFI/Generated/XSLTProcessor.hs too large to diff
src/GHCJS/DOM/JSFFI/Geolocation.hs too large to diff
src/GHCJS/DOM/JSFFI/MediaStreamTrack.hs too large to diff
src/GHCJS/DOM/JSFFI/Navigator.hs too large to diff
src/GHCJS/DOM/JSFFI/NavigatorUserMediaError.hs too large to diff
src/GHCJS/DOM/JSFFI/PositionError.hs too large to diff
src/GHCJS/DOM/JSFFI/RTCPeerConnection.hs too large to diff
src/GHCJS/DOM/JSFFI/RTCPeerConnectionError.hs too large to diff
src/GHCJS/DOM/JSFFI/SQLError.hs too large to diff
src/GHCJS/DOM/JSFFI/SQLTransaction.hs too large to diff
src/GHCJS/DOM/JSFFI/Window.hs too large to diff
src/GHCJS/DOM/JSFFI/XMLHttpRequest.hs too large to diff
src/GHCJS/DOM/KeyboardEvent.hs too large to diff
src/GHCJS/DOM/Location.hs too large to diff
src/GHCJS/DOM/MallocStatistics.hs too large to diff
src/GHCJS/DOM/MediaController.hs too large to diff
src/GHCJS/DOM/MediaControlsHost.hs too large to diff
src/GHCJS/DOM/MediaElementAudioSourceNode.hs too large to diff
src/GHCJS/DOM/MediaError.hs too large to diff
src/GHCJS/DOM/MediaKeyError.hs too large to diff
src/GHCJS/DOM/MediaKeyEvent.hs too large to diff
src/GHCJS/DOM/MediaKeyMessageEvent.hs too large to diff
src/GHCJS/DOM/MediaKeyNeededEvent.hs too large to diff
src/GHCJS/DOM/MediaKeySession.hs too large to diff
src/GHCJS/DOM/MediaKeys.hs too large to diff
src/GHCJS/DOM/MediaList.hs too large to diff
src/GHCJS/DOM/MediaQueryList.hs too large to diff
src/GHCJS/DOM/MediaQueryListListener.hs too large to diff
src/GHCJS/DOM/MediaSource.hs too large to diff
src/GHCJS/DOM/MediaSourceStates.hs too large to diff
src/GHCJS/DOM/MediaStream.hs too large to diff
src/GHCJS/DOM/MediaStreamAudioDestinationNode.hs too large to diff
src/GHCJS/DOM/MediaStreamAudioSourceNode.hs too large to diff
src/GHCJS/DOM/MediaStreamEvent.hs too large to diff
src/GHCJS/DOM/MediaStreamTrack.hs too large to diff
src/GHCJS/DOM/MediaStreamTrackEvent.hs too large to diff
src/GHCJS/DOM/MediaStreamTrackSourcesCallback.hs too large to diff
src/GHCJS/DOM/MediaTrackConstraints.hs too large to diff
src/GHCJS/DOM/MemoryInfo.hs too large to diff
src/GHCJS/DOM/MessageChannel.hs too large to diff
src/GHCJS/DOM/MessageEvent.hs too large to diff
src/GHCJS/DOM/MessagePort.hs too large to diff
src/GHCJS/DOM/MimeType.hs too large to diff
src/GHCJS/DOM/MimeTypeArray.hs too large to diff
src/GHCJS/DOM/MouseEvent.hs too large to diff
src/GHCJS/DOM/MutationEvent.hs too large to diff
src/GHCJS/DOM/MutationObserver.hs too large to diff
src/GHCJS/DOM/MutationRecord.hs too large to diff
src/GHCJS/DOM/NamedNodeMap.hs too large to diff
src/GHCJS/DOM/Navigator.hs too large to diff
src/GHCJS/DOM/NavigatorUserMediaError.hs too large to diff
src/GHCJS/DOM/NavigatorUserMediaErrorCallback.hs too large to diff
src/GHCJS/DOM/NavigatorUserMediaSuccessCallback.hs too large to diff
src/GHCJS/DOM/Node.hs too large to diff
src/GHCJS/DOM/NodeFilter.hs too large to diff
src/GHCJS/DOM/NodeIterator.hs too large to diff
src/GHCJS/DOM/NodeList.hs too large to diff
src/GHCJS/DOM/Notification.hs too large to diff
src/GHCJS/DOM/NotificationCenter.hs too large to diff
src/GHCJS/DOM/NotificationPermissionCallback.hs too large to diff
src/GHCJS/DOM/OESStandardDerivatives.hs too large to diff
src/GHCJS/DOM/OESTextureHalfFloat.hs too large to diff
src/GHCJS/DOM/OESVertexArrayObject.hs too large to diff
src/GHCJS/DOM/OfflineAudioCompletionEvent.hs too large to diff
src/GHCJS/DOM/OfflineAudioContext.hs too large to diff
src/GHCJS/DOM/OscillatorNode.hs too large to diff
src/GHCJS/DOM/OverflowEvent.hs too large to diff
src/GHCJS/DOM/PageTransitionEvent.hs too large to diff
src/GHCJS/DOM/PannerNode.hs too large to diff
src/GHCJS/DOM/Path2D.hs too large to diff
src/GHCJS/DOM/Performance.hs too large to diff
src/GHCJS/DOM/PerformanceEntry.hs too large to diff
src/GHCJS/DOM/PerformanceEntryList.hs too large to diff
src/GHCJS/DOM/PerformanceNavigation.hs too large to diff
src/GHCJS/DOM/PerformanceResourceTiming.hs too large to diff
src/GHCJS/DOM/PerformanceTiming.hs too large to diff
src/GHCJS/DOM/Plugin.hs too large to diff
src/GHCJS/DOM/PluginArray.hs too large to diff
src/GHCJS/DOM/PopStateEvent.hs too large to diff
src/GHCJS/DOM/PositionCallback.hs too large to diff
src/GHCJS/DOM/PositionError.hs too large to diff
src/GHCJS/DOM/PositionErrorCallback.hs too large to diff
src/GHCJS/DOM/ProcessingInstruction.hs too large to diff
src/GHCJS/DOM/ProgressEvent.hs too large to diff
src/GHCJS/DOM/QuickTimePluginReplacement.hs too large to diff
src/GHCJS/DOM/RGBColor.hs too large to diff
src/GHCJS/DOM/RTCConfiguration.hs too large to diff
src/GHCJS/DOM/RTCDTMFSender.hs too large to diff
src/GHCJS/DOM/RTCDTMFToneChangeEvent.hs too large to diff
src/GHCJS/DOM/RTCDataChannel.hs too large to diff
src/GHCJS/DOM/RTCDataChannelEvent.hs too large to diff
src/GHCJS/DOM/RTCIceCandidate.hs too large to diff
src/GHCJS/DOM/RTCIceCandidateEvent.hs too large to diff
src/GHCJS/DOM/RTCIceServer.hs too large to diff
src/GHCJS/DOM/RTCPeerConnection.hs too large to diff
src/GHCJS/DOM/RTCPeerConnectionErrorCallback.hs too large to diff
src/GHCJS/DOM/RTCSessionDescription.hs too large to diff
src/GHCJS/DOM/RTCSessionDescriptionCallback.hs too large to diff
src/GHCJS/DOM/RTCStatsCallback.hs too large to diff
src/GHCJS/DOM/RTCStatsReport.hs too large to diff
src/GHCJS/DOM/RTCStatsResponse.hs too large to diff
src/GHCJS/DOM/RadioNodeList.hs too large to diff
src/GHCJS/DOM/Range.hs too large to diff
src/GHCJS/DOM/ReadableStream.hs too large to diff
src/GHCJS/DOM/Rect.hs too large to diff
src/GHCJS/DOM/RequestAnimationFrameCallback.hs too large to diff
src/GHCJS/DOM/SQLError.hs too large to diff
src/GHCJS/DOM/SQLResultSet.hs too large to diff
src/GHCJS/DOM/SQLResultSetRowList.hs too large to diff
src/GHCJS/DOM/SQLStatementCallback.hs too large to diff
src/GHCJS/DOM/SQLStatementErrorCallback.hs too large to diff
src/GHCJS/DOM/SQLTransaction.hs too large to diff
src/GHCJS/DOM/SQLTransactionCallback.hs too large to diff
src/GHCJS/DOM/SQLTransactionErrorCallback.hs too large to diff
src/GHCJS/DOM/SVGAElement.hs too large to diff
src/GHCJS/DOM/SVGAltGlyphElement.hs too large to diff
src/GHCJS/DOM/SVGAngle.hs too large to diff
src/GHCJS/DOM/SVGAnimatedAngle.hs too large to diff
src/GHCJS/DOM/SVGAnimatedBoolean.hs too large to diff
src/GHCJS/DOM/SVGAnimatedEnumeration.hs too large to diff
src/GHCJS/DOM/SVGAnimatedInteger.hs too large to diff
src/GHCJS/DOM/SVGAnimatedLength.hs too large to diff
src/GHCJS/DOM/SVGAnimatedLengthList.hs too large to diff
src/GHCJS/DOM/SVGAnimatedNumber.hs too large to diff
src/GHCJS/DOM/SVGAnimatedNumberList.hs too large to diff
src/GHCJS/DOM/SVGAnimatedPreserveAspectRatio.hs too large to diff
src/GHCJS/DOM/SVGAnimatedRect.hs too large to diff
src/GHCJS/DOM/SVGAnimatedString.hs too large to diff
src/GHCJS/DOM/SVGAnimatedTransformList.hs too large to diff
src/GHCJS/DOM/SVGAnimationElement.hs too large to diff
src/GHCJS/DOM/SVGCircleElement.hs too large to diff
src/GHCJS/DOM/SVGClipPathElement.hs too large to diff
src/GHCJS/DOM/SVGColor.hs too large to diff
src/GHCJS/DOM/SVGComponentTransferFunctionElement.hs too large to diff
src/GHCJS/DOM/SVGCursorElement.hs too large to diff
src/GHCJS/DOM/SVGDocument.hs too large to diff
src/GHCJS/DOM/SVGElement.hs too large to diff
src/GHCJS/DOM/SVGEllipseElement.hs too large to diff
src/GHCJS/DOM/SVGExternalResourcesRequired.hs too large to diff
src/GHCJS/DOM/SVGFEBlendElement.hs too large to diff
src/GHCJS/DOM/SVGFEColorMatrixElement.hs too large to diff
src/GHCJS/DOM/SVGFEComponentTransferElement.hs too large to diff
src/GHCJS/DOM/SVGFECompositeElement.hs too large to diff
src/GHCJS/DOM/SVGFEConvolveMatrixElement.hs too large to diff
src/GHCJS/DOM/SVGFEDiffuseLightingElement.hs too large to diff
src/GHCJS/DOM/SVGFEDisplacementMapElement.hs too large to diff
src/GHCJS/DOM/SVGFEDistantLightElement.hs too large to diff
src/GHCJS/DOM/SVGFEDropShadowElement.hs too large to diff
src/GHCJS/DOM/SVGFEGaussianBlurElement.hs too large to diff
src/GHCJS/DOM/SVGFEImageElement.hs too large to diff
src/GHCJS/DOM/SVGFEMergeNodeElement.hs too large to diff
src/GHCJS/DOM/SVGFEMorphologyElement.hs too large to diff
src/GHCJS/DOM/SVGFEOffsetElement.hs too large to diff
src/GHCJS/DOM/SVGFEPointLightElement.hs too large to diff
src/GHCJS/DOM/SVGFESpecularLightingElement.hs too large to diff
src/GHCJS/DOM/SVGFESpotLightElement.hs too large to diff
src/GHCJS/DOM/SVGFETileElement.hs too large to diff
src/GHCJS/DOM/SVGFETurbulenceElement.hs too large to diff
src/GHCJS/DOM/SVGFilterElement.hs too large to diff
src/GHCJS/DOM/SVGFilterPrimitiveStandardAttributes.hs too large to diff
src/GHCJS/DOM/SVGFitToViewBox.hs too large to diff
src/GHCJS/DOM/SVGForeignObjectElement.hs too large to diff
src/GHCJS/DOM/SVGGlyphRefElement.hs too large to diff
src/GHCJS/DOM/SVGGradientElement.hs too large to diff
src/GHCJS/DOM/SVGGraphicsElement.hs too large to diff
src/GHCJS/DOM/SVGImageElement.hs too large to diff
src/GHCJS/DOM/SVGLength.hs too large to diff
src/GHCJS/DOM/SVGLengthList.hs too large to diff
src/GHCJS/DOM/SVGLineElement.hs too large to diff
src/GHCJS/DOM/SVGLinearGradientElement.hs too large to diff
src/GHCJS/DOM/SVGMarkerElement.hs too large to diff
src/GHCJS/DOM/SVGMaskElement.hs too large to diff
src/GHCJS/DOM/SVGMatrix.hs too large to diff
src/GHCJS/DOM/SVGNumber.hs too large to diff
src/GHCJS/DOM/SVGNumberList.hs too large to diff
src/GHCJS/DOM/SVGPaint.hs too large to diff
src/GHCJS/DOM/SVGPathElement.hs too large to diff
src/GHCJS/DOM/SVGPathSeg.hs too large to diff
src/GHCJS/DOM/SVGPathSegArcAbs.hs too large to diff
src/GHCJS/DOM/SVGPathSegArcRel.hs too large to diff
src/GHCJS/DOM/SVGPathSegCurvetoCubicAbs.hs too large to diff
src/GHCJS/DOM/SVGPathSegCurvetoCubicRel.hs too large to diff
src/GHCJS/DOM/SVGPathSegCurvetoCubicSmoothAbs.hs too large to diff
src/GHCJS/DOM/SVGPathSegCurvetoCubicSmoothRel.hs too large to diff
src/GHCJS/DOM/SVGPathSegCurvetoQuadraticAbs.hs too large to diff
src/GHCJS/DOM/SVGPathSegCurvetoQuadraticRel.hs too large to diff
src/GHCJS/DOM/SVGPathSegCurvetoQuadraticSmoothAbs.hs too large to diff
src/GHCJS/DOM/SVGPathSegCurvetoQuadraticSmoothRel.hs too large to diff
src/GHCJS/DOM/SVGPathSegLinetoAbs.hs too large to diff
src/GHCJS/DOM/SVGPathSegLinetoHorizontalAbs.hs too large to diff
src/GHCJS/DOM/SVGPathSegLinetoHorizontalRel.hs too large to diff
src/GHCJS/DOM/SVGPathSegLinetoRel.hs too large to diff
src/GHCJS/DOM/SVGPathSegLinetoVerticalAbs.hs too large to diff
src/GHCJS/DOM/SVGPathSegLinetoVerticalRel.hs too large to diff
src/GHCJS/DOM/SVGPathSegList.hs too large to diff
src/GHCJS/DOM/SVGPathSegMovetoAbs.hs too large to diff
src/GHCJS/DOM/SVGPathSegMovetoRel.hs too large to diff
src/GHCJS/DOM/SVGPatternElement.hs too large to diff
src/GHCJS/DOM/SVGPoint.hs too large to diff
src/GHCJS/DOM/SVGPointList.hs too large to diff
src/GHCJS/DOM/SVGPolygonElement.hs too large to diff
src/GHCJS/DOM/SVGPolylineElement.hs too large to diff
src/GHCJS/DOM/SVGPreserveAspectRatio.hs too large to diff
src/GHCJS/DOM/SVGRadialGradientElement.hs too large to diff
src/GHCJS/DOM/SVGRect.hs too large to diff
src/GHCJS/DOM/SVGRectElement.hs too large to diff
src/GHCJS/DOM/SVGRenderingIntent.hs too large to diff
src/GHCJS/DOM/SVGSVGElement.hs too large to diff
src/GHCJS/DOM/SVGScriptElement.hs too large to diff
src/GHCJS/DOM/SVGStopElement.hs too large to diff
src/GHCJS/DOM/SVGStringList.hs too large to diff
src/GHCJS/DOM/SVGStyleElement.hs too large to diff
src/GHCJS/DOM/SVGTests.hs too large to diff
src/GHCJS/DOM/SVGTextContentElement.hs too large to diff
src/GHCJS/DOM/SVGTextPathElement.hs too large to diff
src/GHCJS/DOM/SVGTextPositioningElement.hs too large to diff
src/GHCJS/DOM/SVGTransform.hs too large to diff
src/GHCJS/DOM/SVGTransformList.hs too large to diff
src/GHCJS/DOM/SVGURIReference.hs too large to diff
src/GHCJS/DOM/SVGUnitTypes.hs too large to diff
src/GHCJS/DOM/SVGUseElement.hs too large to diff
src/GHCJS/DOM/SVGViewElement.hs too large to diff
src/GHCJS/DOM/SVGViewSpec.hs too large to diff
src/GHCJS/DOM/SVGZoomAndPan.hs too large to diff
src/GHCJS/DOM/SVGZoomEvent.hs too large to diff
src/GHCJS/DOM/Screen.hs too large to diff
src/GHCJS/DOM/ScriptProcessorNode.hs too large to diff
src/GHCJS/DOM/ScriptProfile.hs too large to diff
src/GHCJS/DOM/ScriptProfileNode.hs too large to diff
src/GHCJS/DOM/SecurityPolicy.hs too large to diff
src/GHCJS/DOM/SecurityPolicyViolationEvent.hs too large to diff
src/GHCJS/DOM/Selection.hs too large to diff
src/GHCJS/DOM/SourceBuffer.hs too large to diff
src/GHCJS/DOM/SourceBufferList.hs too large to diff
src/GHCJS/DOM/SourceInfo.hs too large to diff
src/GHCJS/DOM/SpeechSynthesis.hs too large to diff
src/GHCJS/DOM/SpeechSynthesisEvent.hs too large to diff
src/GHCJS/DOM/SpeechSynthesisUtterance.hs too large to diff
src/GHCJS/DOM/SpeechSynthesisVoice.hs too large to diff
src/GHCJS/DOM/Storage.hs too large to diff
src/GHCJS/DOM/StorageErrorCallback.hs too large to diff
src/GHCJS/DOM/StorageEvent.hs too large to diff
src/GHCJS/DOM/StorageInfo.hs too large to diff
src/GHCJS/DOM/StorageQuota.hs too large to diff
src/GHCJS/DOM/StorageQuotaCallback.hs too large to diff
src/GHCJS/DOM/StorageUsageCallback.hs too large to diff
src/GHCJS/DOM/StringCallback.hs too large to diff
src/GHCJS/DOM/StyleMedia.hs too large to diff
src/GHCJS/DOM/StyleSheet.hs too large to diff
src/GHCJS/DOM/StyleSheetList.hs too large to diff
src/GHCJS/DOM/SubtleCrypto.hs too large to diff
src/GHCJS/DOM/Text.hs too large to diff
src/GHCJS/DOM/TextEvent.hs too large to diff
src/GHCJS/DOM/TextMetrics.hs too large to diff
src/GHCJS/DOM/TextTrack.hs too large to diff
src/GHCJS/DOM/TextTrackCue.hs too large to diff
src/GHCJS/DOM/TextTrackCueList.hs too large to diff
src/GHCJS/DOM/TextTrackList.hs too large to diff
src/GHCJS/DOM/TimeRanges.hs too large to diff
src/GHCJS/DOM/Touch.hs too large to diff
src/GHCJS/DOM/TouchEvent.hs too large to diff
src/GHCJS/DOM/TouchList.hs too large to diff
src/GHCJS/DOM/TrackEvent.hs too large to diff
src/GHCJS/DOM/TransitionEvent.hs too large to diff
src/GHCJS/DOM/TreeWalker.hs too large to diff
src/GHCJS/DOM/TypeConversions.hs too large to diff
src/GHCJS/DOM/Types.hs too large to diff
src/GHCJS/DOM/UIEvent.hs too large to diff
src/GHCJS/DOM/UIRequestEvent.hs too large to diff
src/GHCJS/DOM/URL.hs too large to diff
src/GHCJS/DOM/URLUtils.hs too large to diff
src/GHCJS/DOM/UserMessageHandler.hs too large to diff
src/GHCJS/DOM/VTTCue.hs too large to diff
src/GHCJS/DOM/VTTRegion.hs too large to diff
src/GHCJS/DOM/VTTRegionList.hs too large to diff
src/GHCJS/DOM/ValidityState.hs too large to diff
src/GHCJS/DOM/VideoPlaybackQuality.hs too large to diff
src/GHCJS/DOM/VideoStreamTrack.hs too large to diff
src/GHCJS/DOM/VideoTrack.hs too large to diff
src/GHCJS/DOM/VideoTrackList.hs too large to diff
src/GHCJS/DOM/VoidCallback.hs too large to diff
src/GHCJS/DOM/WaveShaperNode.hs too large to diff
src/GHCJS/DOM/WebGL2RenderingContext.hs too large to diff
src/GHCJS/DOM/WebGLActiveInfo.hs too large to diff
src/GHCJS/DOM/WebGLCompressedTextureATC.hs too large to diff
src/GHCJS/DOM/WebGLCompressedTexturePVRTC.hs too large to diff
src/GHCJS/DOM/WebGLCompressedTextureS3TC.hs too large to diff
src/GHCJS/DOM/WebGLContextAttributes.hs too large to diff
src/GHCJS/DOM/WebGLContextEvent.hs too large to diff
src/GHCJS/DOM/WebGLDebugRendererInfo.hs too large to diff
src/GHCJS/DOM/WebGLDebugShaders.hs too large to diff
src/GHCJS/DOM/WebGLDepthTexture.hs too large to diff
src/GHCJS/DOM/WebGLDrawBuffers.hs too large to diff
src/GHCJS/DOM/WebGLLoseContext.hs too large to diff
src/GHCJS/DOM/WebGLRenderingContextBase.hs too large to diff
src/GHCJS/DOM/WebGLShaderPrecisionFormat.hs too large to diff
src/GHCJS/DOM/WebKitAnimationEvent.hs too large to diff
src/GHCJS/DOM/WebKitCSSFilterValue.hs too large to diff
src/GHCJS/DOM/WebKitCSSMatrix.hs too large to diff
src/GHCJS/DOM/WebKitCSSRegionRule.hs too large to diff
src/GHCJS/DOM/WebKitCSSTransformValue.hs too large to diff
src/GHCJS/DOM/WebKitCSSViewportRule.hs too large to diff
src/GHCJS/DOM/WebKitNamedFlow.hs too large to diff
src/GHCJS/DOM/WebKitNamespace.hs too large to diff
src/GHCJS/DOM/WebKitPlaybackTargetAvailabilityEvent.hs too large to diff
src/GHCJS/DOM/WebKitPoint.hs too large to diff
src/GHCJS/DOM/WebKitTransitionEvent.hs too large to diff
src/GHCJS/DOM/WebSocket.hs too large to diff
src/GHCJS/DOM/WheelEvent.hs too large to diff
src/GHCJS/DOM/Window.hs too large to diff
src/GHCJS/DOM/WindowBase64.hs too large to diff
src/GHCJS/DOM/WindowTimers.hs too large to diff
src/GHCJS/DOM/Worker.hs too large to diff
src/GHCJS/DOM/WorkerGlobalScope.hs too large to diff
src/GHCJS/DOM/WorkerLocation.hs too large to diff
src/GHCJS/DOM/WorkerNavigator.hs too large to diff
src/GHCJS/DOM/XMLHttpRequest.hs too large to diff
src/GHCJS/DOM/XMLHttpRequestProgressEvent.hs too large to diff
src/GHCJS/DOM/XMLHttpRequestUpload.hs too large to diff
src/GHCJS/DOM/XMLSerializer.hs too large to diff
src/GHCJS/DOM/XPathEvaluator.hs too large to diff
src/GHCJS/DOM/XPathExpression.hs too large to diff
src/GHCJS/DOM/XPathNSResolver.hs too large to diff
src/GHCJS/DOM/XPathResult.hs too large to diff
src/GHCJS/DOM/XSLTProcessor.hs too large to diff

− cbits/ghcjs_stubs.c

@@ -1,4 +0,0 @@-void * ghcjs_currentWindow() { return 0; }--void * ghcjs_currentDocument() { return 0; }-

ghcjs-dom.cabal view

@@ -1,1114 +1,649 @@-name: ghcjs-dom-version: 0.2.4.0-cabal-version: >=1.10-build-type: Simple-license: MIT-license-file: LICENSE-maintainer: Hamish Mackenzie <Hamish.K.Mackenzie@googlemail.com>-synopsis: DOM library that supports both GHCJS and WebKitGTK-description: Documentent Object Model (DOM) functions that work with-             GHCJS, but can also be used with GHC and WebKitGTK.-author: Hamish Mackenzie-data-dir: ""-category: Web--Source-Repository head-  type:         git-  location:     https://github.com/ghcjs/ghcjs-dom--flag jsffi-    description: Use JavaScriptFFI extension for GHCJS JavaScript output-    default: True--flag webkit-    description: Use WebKitGtk DOM functions-    default: False--flag old-webkit-    description: If you have an old version of WebKitGTK+ this will get ghcjs-dom-                 to build, leaving out functions that are new or have changed.-                 This option is mainly here to get the travis builds to work.-    default: False--flag jsc-    description: Use WebKitGtk JavaScriptCore-    default: False--flag gtk3-    description: Use GTK3 rather than GTK2 (only matters when using webkit)-    default: True--library-    build-depends: base <5,-                   transformers >=0.2 && <0.6,-                   text >= 0.11.0.6 && < 1.3--    default-language: Haskell2010-    exposed-modules:-          GHCJS.DOM-          GHCJS.DOM.ANGLEInstancedArrays-          GHCJS.DOM.AbstractView-          GHCJS.DOM.AbstractWorker-          GHCJS.DOM.AllAudioCapabilities-          GHCJS.DOM.AllVideoCapabilities-          GHCJS.DOM.AnalyserNode-          GHCJS.DOM.AnimationEvent-          GHCJS.DOM.Attr-          GHCJS.DOM.AudioBuffer-          GHCJS.DOM.AudioBufferCallback-          GHCJS.DOM.AudioBufferSourceNode-          GHCJS.DOM.AudioContext-          GHCJS.DOM.AudioDestinationNode-          GHCJS.DOM.AudioListener-          GHCJS.DOM.AudioNode-          GHCJS.DOM.AudioParam-          GHCJS.DOM.AudioProcessingEvent-          GHCJS.DOM.AudioStreamTrack-          GHCJS.DOM.AudioTrack-          GHCJS.DOM.AudioTrackList-          GHCJS.DOM.AutocompleteErrorEvent-          GHCJS.DOM.BarProp-          GHCJS.DOM.BatteryManager-          GHCJS.DOM.BeforeLoadEvent-          GHCJS.DOM.BeforeUnloadEvent-          GHCJS.DOM.BiquadFilterNode-          GHCJS.DOM.Blob-          GHCJS.DOM.CSSCharsetRule-          GHCJS.DOM.CSSFontFaceLoadEvent-          GHCJS.DOM.CSSFontFaceRule-          GHCJS.DOM.CSSImportRule-          GHCJS.DOM.CSSKeyframeRule-          GHCJS.DOM.CSSKeyframesRule-          GHCJS.DOM.CSSMediaRule-          GHCJS.DOM.CSSPageRule-          GHCJS.DOM.CSSPrimitiveValue-          GHCJS.DOM.CSSRule-          GHCJS.DOM.CSSRuleList-          GHCJS.DOM.CSSStyleDeclaration-          GHCJS.DOM.CSSStyleRule-          GHCJS.DOM.CSSStyleSheet-          GHCJS.DOM.CSSSupportsRule-          GHCJS.DOM.CSSValue-          GHCJS.DOM.CSSValueList-          GHCJS.DOM.CanvasGradient-          GHCJS.DOM.CanvasRenderingContext-          GHCJS.DOM.CanvasRenderingContext2D-          GHCJS.DOM.CapabilityRange-          GHCJS.DOM.CharacterData-          GHCJS.DOM.ChildNode-          GHCJS.DOM.ClientRect-          GHCJS.DOM.ClientRectList-          GHCJS.DOM.CloseEvent-          GHCJS.DOM.CommandLineAPIHost-          GHCJS.DOM.Comment-          GHCJS.DOM.CompositionEvent-          GHCJS.DOM.ConvolverNode-          GHCJS.DOM.Coordinates-          GHCJS.DOM.Counter-          GHCJS.DOM.Crypto-          GHCJS.DOM.CryptoKey-          GHCJS.DOM.CryptoKeyPair-          GHCJS.DOM.CustomEvent-          GHCJS.DOM.ApplicationCache-          GHCJS.DOM.DOMError-          GHCJS.DOM.FormData-          GHCJS.DOM.DOMImplementation-          GHCJS.DOM.MimeType-          GHCJS.DOM.MimeTypeArray-          GHCJS.DOM.DOMNamedFlowCollection-          GHCJS.DOM.DOMParser-          GHCJS.DOM.Path2D-          GHCJS.DOM.Plugin-          GHCJS.DOM.PluginArray-          GHCJS.DOM.SecurityPolicy-          GHCJS.DOM.Selection-          GHCJS.DOM.DOMSettableTokenList-          GHCJS.DOM.DOMStringList-          GHCJS.DOM.DOMTokenList-          GHCJS.DOM.URL-          GHCJS.DOM.Window-          GHCJS.DOM.CSS-          GHCJS.DOM.DataCue-          GHCJS.DOM.DataTransfer-          GHCJS.DOM.DataTransferItem-          GHCJS.DOM.DataTransferItemList-          GHCJS.DOM.Database-          GHCJS.DOM.DatabaseCallback-          GHCJS.DOM.DedicatedWorkerGlobalScope-          GHCJS.DOM.DelayNode-          GHCJS.DOM.DeviceMotionEvent-          GHCJS.DOM.DeviceOrientationEvent-          GHCJS.DOM.DeviceProximityEvent-          GHCJS.DOM.Document-          GHCJS.DOM.DocumentFragment-          GHCJS.DOM.DocumentType-          GHCJS.DOM.DynamicsCompressorNode-          GHCJS.DOM.EXTBlendMinMax-          GHCJS.DOM.EXTsRGB-          GHCJS.DOM.EXTTextureFilterAnisotropic-          GHCJS.DOM.Element-          GHCJS.DOM.Entity-          GHCJS.DOM.Enums-          GHCJS.DOM.ErrorEvent-          GHCJS.DOM.Event-          GHCJS.DOM.EventListener-          GHCJS.DOM.EventM-          GHCJS.DOM.EventSource-          GHCJS.DOM.EventTarget-          GHCJS.DOM.EventTargetClosures-          GHCJS.DOM.File-          GHCJS.DOM.FileError-          GHCJS.DOM.FileList-          GHCJS.DOM.FileReader-          GHCJS.DOM.FileReaderSync-          GHCJS.DOM.FocusEvent-          GHCJS.DOM.FontLoader-          GHCJS.DOM.GainNode-          GHCJS.DOM.Gamepad-          GHCJS.DOM.GamepadButton-          GHCJS.DOM.GamepadEvent-          GHCJS.DOM.Geolocation-          GHCJS.DOM.Geoposition-          GHCJS.DOM.HTMLAllCollection-          GHCJS.DOM.HTMLAnchorElement-          GHCJS.DOM.HTMLAppletElement-          GHCJS.DOM.HTMLAreaElement-          GHCJS.DOM.HTMLBRElement-          GHCJS.DOM.HTMLBaseElement-          GHCJS.DOM.HTMLBaseFontElement-          GHCJS.DOM.HTMLBodyElement-          GHCJS.DOM.HTMLButtonElement-          GHCJS.DOM.HTMLCanvasElement-          GHCJS.DOM.HTMLCollection-          GHCJS.DOM.HTMLDListElement-          GHCJS.DOM.HTMLDataListElement-          GHCJS.DOM.HTMLDetailsElement-          GHCJS.DOM.HTMLDirectoryElement-          GHCJS.DOM.HTMLDivElement-          GHCJS.DOM.HTMLDocument-          GHCJS.DOM.HTMLElement-          GHCJS.DOM.HTMLEmbedElement-          GHCJS.DOM.HTMLFieldSetElement-          GHCJS.DOM.HTMLFontElement-          GHCJS.DOM.HTMLFormControlsCollection-          GHCJS.DOM.HTMLFormElement-          GHCJS.DOM.HTMLFrameElement-          GHCJS.DOM.HTMLFrameSetElement-          GHCJS.DOM.HTMLHRElement-          GHCJS.DOM.HTMLHeadElement-          GHCJS.DOM.HTMLHeadingElement-          GHCJS.DOM.HTMLHtmlElement-          GHCJS.DOM.HTMLIFrameElement-          GHCJS.DOM.HTMLImageElement-          GHCJS.DOM.HTMLInputElement-          GHCJS.DOM.HTMLKeygenElement-          GHCJS.DOM.HTMLLIElement-          GHCJS.DOM.HTMLLabelElement-          GHCJS.DOM.HTMLLegendElement-          GHCJS.DOM.HTMLLinkElement-          GHCJS.DOM.HTMLMapElement-          GHCJS.DOM.HTMLMarqueeElement-          GHCJS.DOM.HTMLMediaElement-          GHCJS.DOM.HTMLMenuElement-          GHCJS.DOM.HTMLMetaElement-          GHCJS.DOM.HTMLMeterElement-          GHCJS.DOM.HTMLModElement-          GHCJS.DOM.HTMLOListElement-          GHCJS.DOM.HTMLObjectElement-          GHCJS.DOM.HTMLOptGroupElement-          GHCJS.DOM.HTMLOptionElement-          GHCJS.DOM.HTMLOptionsCollection-          GHCJS.DOM.HTMLOutputElement-          GHCJS.DOM.HTMLParagraphElement-          GHCJS.DOM.HTMLParamElement-          GHCJS.DOM.HTMLPreElement-          GHCJS.DOM.HTMLProgressElement-          GHCJS.DOM.HTMLQuoteElement-          GHCJS.DOM.HTMLScriptElement-          GHCJS.DOM.HTMLSelectElement-          GHCJS.DOM.HTMLSourceElement-          GHCJS.DOM.HTMLStyleElement-          GHCJS.DOM.HTMLTableCaptionElement-          GHCJS.DOM.HTMLTableCellElement-          GHCJS.DOM.HTMLTableColElement-          GHCJS.DOM.HTMLTableElement-          GHCJS.DOM.HTMLTableRowElement-          GHCJS.DOM.HTMLTableSectionElement-          GHCJS.DOM.HTMLTemplateElement-          GHCJS.DOM.HTMLTextAreaElement-          GHCJS.DOM.HTMLTitleElement-          GHCJS.DOM.HTMLTrackElement-          GHCJS.DOM.HTMLUListElement-          GHCJS.DOM.HTMLVideoElement-          GHCJS.DOM.HashChangeEvent-          GHCJS.DOM.History-          GHCJS.DOM.IDBCursor-          GHCJS.DOM.IDBCursorWithValue-          GHCJS.DOM.IDBDatabase-          GHCJS.DOM.IDBFactory-          GHCJS.DOM.IDBIndex-          GHCJS.DOM.IDBKeyRange-          GHCJS.DOM.IDBObjectStore-          GHCJS.DOM.IDBOpenDBRequest-          GHCJS.DOM.IDBRequest-          GHCJS.DOM.IDBTransaction-          GHCJS.DOM.IDBVersionChangeEvent-          GHCJS.DOM.ImageData-          GHCJS.DOM.InspectorFrontendHost-          GHCJS.DOM.InternalSettings-          GHCJS.DOM.Internals-          GHCJS.DOM.KeyboardEvent-          GHCJS.DOM.Location-          GHCJS.DOM.MallocStatistics-          GHCJS.DOM.MediaController-          GHCJS.DOM.MediaControlsHost-          GHCJS.DOM.MediaElementAudioSourceNode-          GHCJS.DOM.MediaError-          GHCJS.DOM.MediaKeyError-          GHCJS.DOM.MediaKeyEvent-          GHCJS.DOM.MediaKeyMessageEvent-          GHCJS.DOM.MediaKeyNeededEvent-          GHCJS.DOM.MediaKeySession-          GHCJS.DOM.MediaKeys-          GHCJS.DOM.MediaList-          GHCJS.DOM.MediaQueryList-          GHCJS.DOM.MediaQueryListListener-          GHCJS.DOM.MediaSource-          GHCJS.DOM.MediaSourceStates-          GHCJS.DOM.MediaStream-          GHCJS.DOM.MediaStreamAudioDestinationNode-          GHCJS.DOM.MediaStreamAudioSourceNode-          GHCJS.DOM.MediaStreamEvent-          GHCJS.DOM.MediaStreamTrack-          GHCJS.DOM.MediaStreamTrackEvent-          GHCJS.DOM.MediaStreamTrackSourcesCallback-          GHCJS.DOM.MediaTrackConstraints-          GHCJS.DOM.MemoryInfo-          GHCJS.DOM.MessageChannel-          GHCJS.DOM.MessageEvent-          GHCJS.DOM.MessagePort-          GHCJS.DOM.MouseEvent-          GHCJS.DOM.MutationEvent-          GHCJS.DOM.MutationObserver-          GHCJS.DOM.MutationRecord-          GHCJS.DOM.NamedNodeMap-          GHCJS.DOM.Navigator-          GHCJS.DOM.NavigatorUserMediaError-          GHCJS.DOM.NavigatorUserMediaErrorCallback-          GHCJS.DOM.NavigatorUserMediaSuccessCallback-          GHCJS.DOM.Node-          GHCJS.DOM.NodeFilter-          GHCJS.DOM.NodeIterator-          GHCJS.DOM.NodeList-          GHCJS.DOM.Notification-          GHCJS.DOM.NotificationCenter-          GHCJS.DOM.NotificationPermissionCallback-          GHCJS.DOM.OESStandardDerivatives-          GHCJS.DOM.OESTextureHalfFloat-          GHCJS.DOM.OESVertexArrayObject-          GHCJS.DOM.OfflineAudioCompletionEvent-          GHCJS.DOM.OfflineAudioContext-          GHCJS.DOM.OscillatorNode-          GHCJS.DOM.OverflowEvent-          GHCJS.DOM.PageTransitionEvent-          GHCJS.DOM.PannerNode-          GHCJS.DOM.Performance-          GHCJS.DOM.PerformanceEntry-          GHCJS.DOM.PerformanceEntryList-          GHCJS.DOM.PerformanceNavigation-          GHCJS.DOM.PerformanceResourceTiming-          GHCJS.DOM.PerformanceTiming-          GHCJS.DOM.PopStateEvent-          GHCJS.DOM.PositionCallback-          GHCJS.DOM.PositionError-          GHCJS.DOM.PositionErrorCallback-          GHCJS.DOM.ProcessingInstruction-          GHCJS.DOM.ProgressEvent-          GHCJS.DOM.QuickTimePluginReplacement-          GHCJS.DOM.RGBColor-          GHCJS.DOM.RTCConfiguration-          GHCJS.DOM.RTCDTMFSender-          GHCJS.DOM.RTCDTMFToneChangeEvent-          GHCJS.DOM.RTCDataChannel-          GHCJS.DOM.RTCDataChannelEvent-          GHCJS.DOM.RTCIceCandidate-          GHCJS.DOM.RTCIceCandidateEvent-          GHCJS.DOM.RTCIceServer-          GHCJS.DOM.RTCPeerConnection-          GHCJS.DOM.RTCPeerConnectionErrorCallback-          GHCJS.DOM.RTCSessionDescription-          GHCJS.DOM.RTCSessionDescriptionCallback-          GHCJS.DOM.RTCStatsCallback-          GHCJS.DOM.RTCStatsReport-          GHCJS.DOM.RTCStatsResponse-          GHCJS.DOM.RadioNodeList-          GHCJS.DOM.Range-          GHCJS.DOM.ReadableStream-          GHCJS.DOM.Rect-          GHCJS.DOM.RequestAnimationFrameCallback-          GHCJS.DOM.SQLError-          GHCJS.DOM.SQLResultSet-          GHCJS.DOM.SQLResultSetRowList-          GHCJS.DOM.SQLStatementCallback-          GHCJS.DOM.SQLStatementErrorCallback-          GHCJS.DOM.SQLTransaction-          GHCJS.DOM.SQLTransactionCallback-          GHCJS.DOM.SQLTransactionErrorCallback-          GHCJS.DOM.SVGAElement-          GHCJS.DOM.SVGAltGlyphElement-          GHCJS.DOM.SVGAngle-          GHCJS.DOM.SVGAnimatedAngle-          GHCJS.DOM.SVGAnimatedBoolean-          GHCJS.DOM.SVGAnimatedEnumeration-          GHCJS.DOM.SVGAnimatedInteger-          GHCJS.DOM.SVGAnimatedLength-          GHCJS.DOM.SVGAnimatedLengthList-          GHCJS.DOM.SVGAnimatedNumber-          GHCJS.DOM.SVGAnimatedNumberList-          GHCJS.DOM.SVGAnimatedPreserveAspectRatio-          GHCJS.DOM.SVGAnimatedRect-          GHCJS.DOM.SVGAnimatedString-          GHCJS.DOM.SVGAnimatedTransformList-          GHCJS.DOM.SVGAnimationElement-          GHCJS.DOM.SVGCircleElement-          GHCJS.DOM.SVGClipPathElement-          GHCJS.DOM.SVGColor-          GHCJS.DOM.SVGComponentTransferFunctionElement-          GHCJS.DOM.SVGCursorElement-          GHCJS.DOM.SVGDocument-          GHCJS.DOM.SVGElement-          GHCJS.DOM.SVGEllipseElement-          GHCJS.DOM.SVGExternalResourcesRequired-          GHCJS.DOM.SVGFEBlendElement-          GHCJS.DOM.SVGFEColorMatrixElement-          GHCJS.DOM.SVGFEComponentTransferElement-          GHCJS.DOM.SVGFECompositeElement-          GHCJS.DOM.SVGFEConvolveMatrixElement-          GHCJS.DOM.SVGFEDiffuseLightingElement-          GHCJS.DOM.SVGFEDisplacementMapElement-          GHCJS.DOM.SVGFEDistantLightElement-          GHCJS.DOM.SVGFEDropShadowElement-          GHCJS.DOM.SVGFEGaussianBlurElement-          GHCJS.DOM.SVGFEImageElement-          GHCJS.DOM.SVGFEMergeNodeElement-          GHCJS.DOM.SVGFEMorphologyElement-          GHCJS.DOM.SVGFEOffsetElement-          GHCJS.DOM.SVGFEPointLightElement-          GHCJS.DOM.SVGFESpecularLightingElement-          GHCJS.DOM.SVGFESpotLightElement-          GHCJS.DOM.SVGFETileElement-          GHCJS.DOM.SVGFETurbulenceElement-          GHCJS.DOM.SVGFilterElement-          GHCJS.DOM.SVGFilterPrimitiveStandardAttributes-          GHCJS.DOM.SVGFitToViewBox-          GHCJS.DOM.SVGForeignObjectElement-          GHCJS.DOM.SVGGlyphRefElement-          GHCJS.DOM.SVGGradientElement-          GHCJS.DOM.SVGGraphicsElement-          GHCJS.DOM.SVGImageElement-          GHCJS.DOM.SVGLength-          GHCJS.DOM.SVGLengthList-          GHCJS.DOM.SVGLineElement-          GHCJS.DOM.SVGLinearGradientElement-          GHCJS.DOM.SVGMarkerElement-          GHCJS.DOM.SVGMaskElement-          GHCJS.DOM.SVGMatrix-          GHCJS.DOM.SVGNumber-          GHCJS.DOM.SVGNumberList-          GHCJS.DOM.SVGPaint-          GHCJS.DOM.SVGPathElement-          GHCJS.DOM.SVGPathSeg-          GHCJS.DOM.SVGPathSegArcAbs-          GHCJS.DOM.SVGPathSegArcRel-          GHCJS.DOM.SVGPathSegCurvetoCubicAbs-          GHCJS.DOM.SVGPathSegCurvetoCubicRel-          GHCJS.DOM.SVGPathSegCurvetoCubicSmoothAbs-          GHCJS.DOM.SVGPathSegCurvetoCubicSmoothRel-          GHCJS.DOM.SVGPathSegCurvetoQuadraticAbs-          GHCJS.DOM.SVGPathSegCurvetoQuadraticRel-          GHCJS.DOM.SVGPathSegCurvetoQuadraticSmoothAbs-          GHCJS.DOM.SVGPathSegCurvetoQuadraticSmoothRel-          GHCJS.DOM.SVGPathSegLinetoAbs-          GHCJS.DOM.SVGPathSegLinetoHorizontalAbs-          GHCJS.DOM.SVGPathSegLinetoHorizontalRel-          GHCJS.DOM.SVGPathSegLinetoRel-          GHCJS.DOM.SVGPathSegLinetoVerticalAbs-          GHCJS.DOM.SVGPathSegLinetoVerticalRel-          GHCJS.DOM.SVGPathSegList-          GHCJS.DOM.SVGPathSegMovetoAbs-          GHCJS.DOM.SVGPathSegMovetoRel-          GHCJS.DOM.SVGPatternElement-          GHCJS.DOM.SVGPoint-          GHCJS.DOM.SVGPointList-          GHCJS.DOM.SVGPolygonElement-          GHCJS.DOM.SVGPolylineElement-          GHCJS.DOM.SVGPreserveAspectRatio-          GHCJS.DOM.SVGRadialGradientElement-          GHCJS.DOM.SVGRect-          GHCJS.DOM.SVGRectElement-          GHCJS.DOM.SVGRenderingIntent-          GHCJS.DOM.SVGScriptElement-          GHCJS.DOM.SVGSVGElement-          GHCJS.DOM.SVGStopElement-          GHCJS.DOM.SVGStringList-          GHCJS.DOM.SVGStyleElement-          GHCJS.DOM.SVGTests-          GHCJS.DOM.SVGTextContentElement-          GHCJS.DOM.SVGTextPathElement-          GHCJS.DOM.SVGTextPositioningElement-          GHCJS.DOM.SVGTransform-          GHCJS.DOM.SVGTransformList-          GHCJS.DOM.SVGURIReference-          GHCJS.DOM.SVGUnitTypes-          GHCJS.DOM.SVGUseElement-          GHCJS.DOM.SVGViewElement-          GHCJS.DOM.SVGViewSpec-          GHCJS.DOM.SVGZoomAndPan-          GHCJS.DOM.SVGZoomEvent-          GHCJS.DOM.Screen-          GHCJS.DOM.ScriptProcessorNode-          GHCJS.DOM.ScriptProfile-          GHCJS.DOM.ScriptProfileNode-          GHCJS.DOM.SecurityPolicyViolationEvent-          GHCJS.DOM.SourceBuffer-          GHCJS.DOM.SourceBufferList-          GHCJS.DOM.SourceInfo-          GHCJS.DOM.SpeechSynthesis-          GHCJS.DOM.SpeechSynthesisEvent-          GHCJS.DOM.SpeechSynthesisUtterance-          GHCJS.DOM.SpeechSynthesisVoice-          GHCJS.DOM.Storage-          GHCJS.DOM.StorageErrorCallback-          GHCJS.DOM.StorageEvent-          GHCJS.DOM.StorageInfo-          GHCJS.DOM.StorageQuota-          GHCJS.DOM.StorageQuotaCallback-          GHCJS.DOM.StorageUsageCallback-          GHCJS.DOM.StringCallback-          GHCJS.DOM.StyleMedia-          GHCJS.DOM.StyleSheet-          GHCJS.DOM.StyleSheetList-          GHCJS.DOM.SubtleCrypto-          GHCJS.DOM.Text-          GHCJS.DOM.TextEvent-          GHCJS.DOM.TextMetrics-          GHCJS.DOM.TextTrack-          GHCJS.DOM.TextTrackCue-          GHCJS.DOM.TextTrackCueList-          GHCJS.DOM.TextTrackList-          GHCJS.DOM.TimeRanges-          GHCJS.DOM.Touch-          GHCJS.DOM.TouchEvent-          GHCJS.DOM.TouchList-          GHCJS.DOM.TrackEvent-          GHCJS.DOM.TransitionEvent-          GHCJS.DOM.TreeWalker-          GHCJS.DOM.TypeConversions-          GHCJS.DOM.Types-          GHCJS.DOM.UIEvent-          GHCJS.DOM.UIRequestEvent-          GHCJS.DOM.URLUtils-          GHCJS.DOM.UserMessageHandler-          GHCJS.DOM.VTTCue-          GHCJS.DOM.VTTRegion-          GHCJS.DOM.VTTRegionList-          GHCJS.DOM.ValidityState-          GHCJS.DOM.VideoPlaybackQuality-          GHCJS.DOM.VideoStreamTrack-          GHCJS.DOM.VideoTrack-          GHCJS.DOM.VideoTrackList-          GHCJS.DOM.VoidCallback-          GHCJS.DOM.WaveShaperNode-          GHCJS.DOM.WebGL2RenderingContext-          GHCJS.DOM.WebGLActiveInfo-          GHCJS.DOM.WebGLCompressedTextureATC-          GHCJS.DOM.WebGLCompressedTexturePVRTC-          GHCJS.DOM.WebGLCompressedTextureS3TC-          GHCJS.DOM.WebGLContextAttributes-          GHCJS.DOM.WebGLContextEvent-          GHCJS.DOM.WebGLDebugRendererInfo-          GHCJS.DOM.WebGLDebugShaders-          GHCJS.DOM.WebGLDepthTexture-          GHCJS.DOM.WebGLDrawBuffers-          GHCJS.DOM.WebGLLoseContext-          GHCJS.DOM.WebGLRenderingContextBase-          GHCJS.DOM.WebGLShaderPrecisionFormat-          GHCJS.DOM.WebKitAnimationEvent-          GHCJS.DOM.WebKitCSSFilterValue-          GHCJS.DOM.WebKitCSSMatrix-          GHCJS.DOM.WebKitCSSRegionRule-          GHCJS.DOM.WebKitCSSTransformValue-          GHCJS.DOM.WebKitCSSViewportRule-          GHCJS.DOM.WebKitNamedFlow-          GHCJS.DOM.WebKitNamespace-          GHCJS.DOM.WebKitPlaybackTargetAvailabilityEvent-          GHCJS.DOM.WebKitPoint-          GHCJS.DOM.WebKitTransitionEvent-          GHCJS.DOM.WebSocket-          GHCJS.DOM.WheelEvent-          GHCJS.DOM.WindowBase64-          GHCJS.DOM.WindowTimers-          GHCJS.DOM.Worker-          GHCJS.DOM.WorkerGlobalScope-          GHCJS.DOM.WorkerLocation-          GHCJS.DOM.WorkerNavigator-          GHCJS.DOM.XMLHttpRequest-          GHCJS.DOM.XMLHttpRequestProgressEvent-          GHCJS.DOM.XMLHttpRequestUpload-          GHCJS.DOM.XMLSerializer-          GHCJS.DOM.XPathEvaluator-          GHCJS.DOM.XPathExpression-          GHCJS.DOM.XPathNSResolver-          GHCJS.DOM.XPathResult-          GHCJS.DOM.XSLTProcessor--    if impl(ghcjs) && flag(jsffi)-        cpp-options: -DUSE_JAVASCRIPTFFI-        build-depends: ghcjs-base >=0.2.0.0 && <0.3, ghcjs-prim, ghc-prim-        exposed-modules:-          GHCJS.DOM.JSFFI.AudioContext-          GHCJS.DOM.JSFFI.Database-          GHCJS.DOM.JSFFI.DOMError-          GHCJS.DOM.JSFFI.Geolocation-          GHCJS.DOM.JSFFI.MediaStreamTrack-          GHCJS.DOM.JSFFI.Navigator-          GHCJS.DOM.JSFFI.NavigatorUserMediaError-          GHCJS.DOM.JSFFI.PositionError-          GHCJS.DOM.JSFFI.RTCPeerConnection-          GHCJS.DOM.JSFFI.RTCPeerConnectionError-          GHCJS.DOM.JSFFI.SQLError-          GHCJS.DOM.JSFFI.SQLTransaction-          GHCJS.DOM.JSFFI.Window-          GHCJS.DOM.JSFFI.XMLHttpRequest--          GHCJS.DOM.JSFFI.Generated.ANGLEInstancedArrays-          GHCJS.DOM.JSFFI.Generated.AbstractView-          GHCJS.DOM.JSFFI.Generated.AbstractWorker-          GHCJS.DOM.JSFFI.Generated.AllAudioCapabilities-          GHCJS.DOM.JSFFI.Generated.AllVideoCapabilities-          GHCJS.DOM.JSFFI.Generated.AnalyserNode-          GHCJS.DOM.JSFFI.Generated.AnimationEvent-          GHCJS.DOM.JSFFI.Generated.Attr-          GHCJS.DOM.JSFFI.Generated.AudioBuffer-          GHCJS.DOM.JSFFI.Generated.AudioBufferCallback-          GHCJS.DOM.JSFFI.Generated.AudioBufferSourceNode-          GHCJS.DOM.JSFFI.Generated.AudioContext-          GHCJS.DOM.JSFFI.Generated.AudioDestinationNode-          GHCJS.DOM.JSFFI.Generated.AudioListener-          GHCJS.DOM.JSFFI.Generated.AudioNode-          GHCJS.DOM.JSFFI.Generated.AudioParam-          GHCJS.DOM.JSFFI.Generated.AudioProcessingEvent-          GHCJS.DOM.JSFFI.Generated.AudioStreamTrack-          GHCJS.DOM.JSFFI.Generated.AudioTrack-          GHCJS.DOM.JSFFI.Generated.AudioTrackList-          GHCJS.DOM.JSFFI.Generated.AutocompleteErrorEvent-          GHCJS.DOM.JSFFI.Generated.BarProp-          GHCJS.DOM.JSFFI.Generated.BatteryManager-          GHCJS.DOM.JSFFI.Generated.BeforeLoadEvent-          GHCJS.DOM.JSFFI.Generated.BeforeUnloadEvent-          GHCJS.DOM.JSFFI.Generated.BiquadFilterNode-          GHCJS.DOM.JSFFI.Generated.Blob-          GHCJS.DOM.JSFFI.Generated.CSSCharsetRule-          GHCJS.DOM.JSFFI.Generated.CSSFontFaceLoadEvent-          GHCJS.DOM.JSFFI.Generated.CSSFontFaceRule-          GHCJS.DOM.JSFFI.Generated.CSSImportRule-          GHCJS.DOM.JSFFI.Generated.CSSKeyframeRule-          GHCJS.DOM.JSFFI.Generated.CSSKeyframesRule-          GHCJS.DOM.JSFFI.Generated.CSSMediaRule-          GHCJS.DOM.JSFFI.Generated.CSSPageRule-          GHCJS.DOM.JSFFI.Generated.CSSPrimitiveValue-          GHCJS.DOM.JSFFI.Generated.CSSRule-          GHCJS.DOM.JSFFI.Generated.CSSRuleList-          GHCJS.DOM.JSFFI.Generated.CSSStyleDeclaration-          GHCJS.DOM.JSFFI.Generated.CSSStyleRule-          GHCJS.DOM.JSFFI.Generated.CSSStyleSheet-          GHCJS.DOM.JSFFI.Generated.CSSSupportsRule-          GHCJS.DOM.JSFFI.Generated.CSSValue-          GHCJS.DOM.JSFFI.Generated.CSSValueList-          GHCJS.DOM.JSFFI.Generated.CanvasGradient-          GHCJS.DOM.JSFFI.Generated.CanvasRenderingContext-          GHCJS.DOM.JSFFI.Generated.CanvasRenderingContext2D-          GHCJS.DOM.JSFFI.Generated.CapabilityRange-          GHCJS.DOM.JSFFI.Generated.CharacterData-          GHCJS.DOM.JSFFI.Generated.ChildNode-          GHCJS.DOM.JSFFI.Generated.ClientRect-          GHCJS.DOM.JSFFI.Generated.ClientRectList-          GHCJS.DOM.JSFFI.Generated.CloseEvent-          GHCJS.DOM.JSFFI.Generated.CommandLineAPIHost-          GHCJS.DOM.JSFFI.Generated.Comment-          GHCJS.DOM.JSFFI.Generated.CompositionEvent-          GHCJS.DOM.JSFFI.Generated.ConvolverNode-          GHCJS.DOM.JSFFI.Generated.Coordinates-          GHCJS.DOM.JSFFI.Generated.Counter-          GHCJS.DOM.JSFFI.Generated.Crypto-          GHCJS.DOM.JSFFI.Generated.CryptoKey-          GHCJS.DOM.JSFFI.Generated.CryptoKeyPair-          GHCJS.DOM.JSFFI.Generated.CustomEvent-          GHCJS.DOM.JSFFI.Generated.ApplicationCache-          GHCJS.DOM.JSFFI.Generated.DOMError-          GHCJS.DOM.JSFFI.Generated.FormData-          GHCJS.DOM.JSFFI.Generated.DOMImplementation-          GHCJS.DOM.JSFFI.Generated.MimeType-          GHCJS.DOM.JSFFI.Generated.MimeTypeArray-          GHCJS.DOM.JSFFI.Generated.DOMNamedFlowCollection-          GHCJS.DOM.JSFFI.Generated.DOMParser-          GHCJS.DOM.JSFFI.Generated.Path2D-          GHCJS.DOM.JSFFI.Generated.Plugin-          GHCJS.DOM.JSFFI.Generated.PluginArray-          GHCJS.DOM.JSFFI.Generated.SecurityPolicy-          GHCJS.DOM.JSFFI.Generated.Selection-          GHCJS.DOM.JSFFI.Generated.DOMSettableTokenList-          GHCJS.DOM.JSFFI.Generated.DOMStringList-          GHCJS.DOM.JSFFI.Generated.DOMTokenList-          GHCJS.DOM.JSFFI.Generated.URL-          GHCJS.DOM.JSFFI.Generated.Window-          GHCJS.DOM.JSFFI.Generated.CSS-          GHCJS.DOM.JSFFI.Generated.DataCue-          GHCJS.DOM.JSFFI.Generated.DataTransfer-          GHCJS.DOM.JSFFI.Generated.DataTransferItem-          GHCJS.DOM.JSFFI.Generated.DataTransferItemList-          GHCJS.DOM.JSFFI.Generated.Database-          GHCJS.DOM.JSFFI.Generated.DatabaseCallback-          GHCJS.DOM.JSFFI.Generated.DedicatedWorkerGlobalScope-          GHCJS.DOM.JSFFI.Generated.DelayNode-          GHCJS.DOM.JSFFI.Generated.DeviceMotionEvent-          GHCJS.DOM.JSFFI.Generated.DeviceOrientationEvent-          GHCJS.DOM.JSFFI.Generated.DeviceProximityEvent-          GHCJS.DOM.JSFFI.Generated.Document-          GHCJS.DOM.JSFFI.Generated.DocumentFragment-          GHCJS.DOM.JSFFI.Generated.DocumentType-          GHCJS.DOM.JSFFI.Generated.DynamicsCompressorNode-          GHCJS.DOM.JSFFI.Generated.EXTBlendMinMax-          GHCJS.DOM.JSFFI.Generated.EXTsRGB-          GHCJS.DOM.JSFFI.Generated.EXTTextureFilterAnisotropic-          GHCJS.DOM.JSFFI.Generated.Element-          GHCJS.DOM.JSFFI.Generated.Entity-          GHCJS.DOM.JSFFI.Generated.Enums-          GHCJS.DOM.JSFFI.Generated.ErrorEvent-          GHCJS.DOM.JSFFI.Generated.Event-          GHCJS.DOM.JSFFI.Generated.EventListener-          GHCJS.DOM.JSFFI.Generated.EventSource-          GHCJS.DOM.JSFFI.Generated.EventTarget-          GHCJS.DOM.JSFFI.Generated.File-          GHCJS.DOM.JSFFI.Generated.FileError-          GHCJS.DOM.JSFFI.Generated.FileList-          GHCJS.DOM.JSFFI.Generated.FileReader-          GHCJS.DOM.JSFFI.Generated.FileReaderSync-          GHCJS.DOM.JSFFI.Generated.FocusEvent-          GHCJS.DOM.JSFFI.Generated.FontLoader-          GHCJS.DOM.JSFFI.Generated.GainNode-          GHCJS.DOM.JSFFI.Generated.Gamepad-          GHCJS.DOM.JSFFI.Generated.GamepadButton-          GHCJS.DOM.JSFFI.Generated.GamepadEvent-          GHCJS.DOM.JSFFI.Generated.Geolocation-          GHCJS.DOM.JSFFI.Generated.Geoposition-          GHCJS.DOM.JSFFI.Generated.HTMLAllCollection-          GHCJS.DOM.JSFFI.Generated.HTMLAnchorElement-          GHCJS.DOM.JSFFI.Generated.HTMLAppletElement-          GHCJS.DOM.JSFFI.Generated.HTMLAreaElement-          GHCJS.DOM.JSFFI.Generated.HTMLBRElement-          GHCJS.DOM.JSFFI.Generated.HTMLBaseElement-          GHCJS.DOM.JSFFI.Generated.HTMLBaseFontElement-          GHCJS.DOM.JSFFI.Generated.HTMLBodyElement-          GHCJS.DOM.JSFFI.Generated.HTMLButtonElement-          GHCJS.DOM.JSFFI.Generated.HTMLCanvasElement-          GHCJS.DOM.JSFFI.Generated.HTMLCollection-          GHCJS.DOM.JSFFI.Generated.HTMLDListElement-          GHCJS.DOM.JSFFI.Generated.HTMLDataListElement-          GHCJS.DOM.JSFFI.Generated.HTMLDetailsElement-          GHCJS.DOM.JSFFI.Generated.HTMLDirectoryElement-          GHCJS.DOM.JSFFI.Generated.HTMLDivElement-          GHCJS.DOM.JSFFI.Generated.HTMLDocument-          GHCJS.DOM.JSFFI.Generated.HTMLElement-          GHCJS.DOM.JSFFI.Generated.HTMLEmbedElement-          GHCJS.DOM.JSFFI.Generated.HTMLFieldSetElement-          GHCJS.DOM.JSFFI.Generated.HTMLFontElement-          GHCJS.DOM.JSFFI.Generated.HTMLFormControlsCollection-          GHCJS.DOM.JSFFI.Generated.HTMLFormElement-          GHCJS.DOM.JSFFI.Generated.HTMLFrameElement-          GHCJS.DOM.JSFFI.Generated.HTMLFrameSetElement-          GHCJS.DOM.JSFFI.Generated.HTMLHRElement-          GHCJS.DOM.JSFFI.Generated.HTMLHeadElement-          GHCJS.DOM.JSFFI.Generated.HTMLHeadingElement-          GHCJS.DOM.JSFFI.Generated.HTMLHtmlElement-          GHCJS.DOM.JSFFI.Generated.HTMLIFrameElement-          GHCJS.DOM.JSFFI.Generated.HTMLImageElement-          GHCJS.DOM.JSFFI.Generated.HTMLInputElement-          GHCJS.DOM.JSFFI.Generated.HTMLKeygenElement-          GHCJS.DOM.JSFFI.Generated.HTMLLIElement-          GHCJS.DOM.JSFFI.Generated.HTMLLabelElement-          GHCJS.DOM.JSFFI.Generated.HTMLLegendElement-          GHCJS.DOM.JSFFI.Generated.HTMLLinkElement-          GHCJS.DOM.JSFFI.Generated.HTMLMapElement-          GHCJS.DOM.JSFFI.Generated.HTMLMarqueeElement-          GHCJS.DOM.JSFFI.Generated.HTMLMediaElement-          GHCJS.DOM.JSFFI.Generated.HTMLMenuElement-          GHCJS.DOM.JSFFI.Generated.HTMLMetaElement-          GHCJS.DOM.JSFFI.Generated.HTMLMeterElement-          GHCJS.DOM.JSFFI.Generated.HTMLModElement-          GHCJS.DOM.JSFFI.Generated.HTMLOListElement-          GHCJS.DOM.JSFFI.Generated.HTMLObjectElement-          GHCJS.DOM.JSFFI.Generated.HTMLOptGroupElement-          GHCJS.DOM.JSFFI.Generated.HTMLOptionElement-          GHCJS.DOM.JSFFI.Generated.HTMLOptionsCollection-          GHCJS.DOM.JSFFI.Generated.HTMLOutputElement-          GHCJS.DOM.JSFFI.Generated.HTMLParagraphElement-          GHCJS.DOM.JSFFI.Generated.HTMLParamElement-          GHCJS.DOM.JSFFI.Generated.HTMLPreElement-          GHCJS.DOM.JSFFI.Generated.HTMLProgressElement-          GHCJS.DOM.JSFFI.Generated.HTMLQuoteElement-          GHCJS.DOM.JSFFI.Generated.HTMLScriptElement-          GHCJS.DOM.JSFFI.Generated.HTMLSelectElement-          GHCJS.DOM.JSFFI.Generated.HTMLSourceElement-          GHCJS.DOM.JSFFI.Generated.HTMLStyleElement-          GHCJS.DOM.JSFFI.Generated.HTMLTableCaptionElement-          GHCJS.DOM.JSFFI.Generated.HTMLTableCellElement-          GHCJS.DOM.JSFFI.Generated.HTMLTableColElement-          GHCJS.DOM.JSFFI.Generated.HTMLTableElement-          GHCJS.DOM.JSFFI.Generated.HTMLTableRowElement-          GHCJS.DOM.JSFFI.Generated.HTMLTableSectionElement-          GHCJS.DOM.JSFFI.Generated.HTMLTemplateElement-          GHCJS.DOM.JSFFI.Generated.HTMLTextAreaElement-          GHCJS.DOM.JSFFI.Generated.HTMLTitleElement-          GHCJS.DOM.JSFFI.Generated.HTMLTrackElement-          GHCJS.DOM.JSFFI.Generated.HTMLUListElement-          GHCJS.DOM.JSFFI.Generated.HTMLVideoElement-          GHCJS.DOM.JSFFI.Generated.HashChangeEvent-          GHCJS.DOM.JSFFI.Generated.History-          GHCJS.DOM.JSFFI.Generated.IDBCursor-          GHCJS.DOM.JSFFI.Generated.IDBCursorWithValue-          GHCJS.DOM.JSFFI.Generated.IDBDatabase-          GHCJS.DOM.JSFFI.Generated.IDBFactory-          GHCJS.DOM.JSFFI.Generated.IDBIndex-          GHCJS.DOM.JSFFI.Generated.IDBKeyRange-          GHCJS.DOM.JSFFI.Generated.IDBObjectStore-          GHCJS.DOM.JSFFI.Generated.IDBOpenDBRequest-          GHCJS.DOM.JSFFI.Generated.IDBRequest-          GHCJS.DOM.JSFFI.Generated.IDBTransaction-          GHCJS.DOM.JSFFI.Generated.IDBVersionChangeEvent-          GHCJS.DOM.JSFFI.Generated.ImageData-          GHCJS.DOM.JSFFI.Generated.InspectorFrontendHost-          GHCJS.DOM.JSFFI.Generated.InternalSettings-          GHCJS.DOM.JSFFI.Generated.Internals-          GHCJS.DOM.JSFFI.Generated.KeyboardEvent-          GHCJS.DOM.JSFFI.Generated.Location-          GHCJS.DOM.JSFFI.Generated.MallocStatistics-          GHCJS.DOM.JSFFI.Generated.MediaController-          GHCJS.DOM.JSFFI.Generated.MediaControlsHost-          GHCJS.DOM.JSFFI.Generated.MediaElementAudioSourceNode-          GHCJS.DOM.JSFFI.Generated.MediaError-          GHCJS.DOM.JSFFI.Generated.MediaKeyError-          GHCJS.DOM.JSFFI.Generated.MediaKeyEvent-          GHCJS.DOM.JSFFI.Generated.MediaKeyMessageEvent-          GHCJS.DOM.JSFFI.Generated.MediaKeyNeededEvent-          GHCJS.DOM.JSFFI.Generated.MediaKeySession-          GHCJS.DOM.JSFFI.Generated.MediaKeys-          GHCJS.DOM.JSFFI.Generated.MediaList-          GHCJS.DOM.JSFFI.Generated.MediaQueryList-          GHCJS.DOM.JSFFI.Generated.MediaQueryListListener-          GHCJS.DOM.JSFFI.Generated.MediaSource-          GHCJS.DOM.JSFFI.Generated.MediaSourceStates-          GHCJS.DOM.JSFFI.Generated.MediaStream-          GHCJS.DOM.JSFFI.Generated.MediaStreamAudioDestinationNode-          GHCJS.DOM.JSFFI.Generated.MediaStreamAudioSourceNode-          GHCJS.DOM.JSFFI.Generated.MediaStreamEvent-          GHCJS.DOM.JSFFI.Generated.MediaStreamTrack-          GHCJS.DOM.JSFFI.Generated.MediaStreamTrackEvent-          GHCJS.DOM.JSFFI.Generated.MediaStreamTrackSourcesCallback-          GHCJS.DOM.JSFFI.Generated.MediaTrackConstraints-          GHCJS.DOM.JSFFI.Generated.MemoryInfo-          GHCJS.DOM.JSFFI.Generated.MessageChannel-          GHCJS.DOM.JSFFI.Generated.MessageEvent-          GHCJS.DOM.JSFFI.Generated.MessagePort-          GHCJS.DOM.JSFFI.Generated.MouseEvent-          GHCJS.DOM.JSFFI.Generated.MutationEvent-          GHCJS.DOM.JSFFI.Generated.MutationObserver-          GHCJS.DOM.JSFFI.Generated.MutationRecord-          GHCJS.DOM.JSFFI.Generated.NamedNodeMap-          GHCJS.DOM.JSFFI.Generated.Navigator-          GHCJS.DOM.JSFFI.Generated.NavigatorUserMediaError-          GHCJS.DOM.JSFFI.Generated.NavigatorUserMediaErrorCallback-          GHCJS.DOM.JSFFI.Generated.NavigatorUserMediaSuccessCallback-          GHCJS.DOM.JSFFI.Generated.Node-          GHCJS.DOM.JSFFI.Generated.NodeFilter-          GHCJS.DOM.JSFFI.Generated.NodeIterator-          GHCJS.DOM.JSFFI.Generated.NodeList-          GHCJS.DOM.JSFFI.Generated.Notification-          GHCJS.DOM.JSFFI.Generated.NotificationCenter-          GHCJS.DOM.JSFFI.Generated.NotificationPermissionCallback-          GHCJS.DOM.JSFFI.Generated.OESStandardDerivatives-          GHCJS.DOM.JSFFI.Generated.OESTextureHalfFloat-          GHCJS.DOM.JSFFI.Generated.OESVertexArrayObject-          GHCJS.DOM.JSFFI.Generated.OfflineAudioCompletionEvent-          GHCJS.DOM.JSFFI.Generated.OfflineAudioContext-          GHCJS.DOM.JSFFI.Generated.OscillatorNode-          GHCJS.DOM.JSFFI.Generated.OverflowEvent-          GHCJS.DOM.JSFFI.Generated.PageTransitionEvent-          GHCJS.DOM.JSFFI.Generated.PannerNode-          GHCJS.DOM.JSFFI.Generated.Performance-          GHCJS.DOM.JSFFI.Generated.PerformanceEntry-          GHCJS.DOM.JSFFI.Generated.PerformanceEntryList-          GHCJS.DOM.JSFFI.Generated.PerformanceNavigation-          GHCJS.DOM.JSFFI.Generated.PerformanceResourceTiming-          GHCJS.DOM.JSFFI.Generated.PerformanceTiming-          GHCJS.DOM.JSFFI.Generated.PopStateEvent-          GHCJS.DOM.JSFFI.Generated.PositionCallback-          GHCJS.DOM.JSFFI.Generated.PositionError-          GHCJS.DOM.JSFFI.Generated.PositionErrorCallback-          GHCJS.DOM.JSFFI.Generated.ProcessingInstruction-          GHCJS.DOM.JSFFI.Generated.ProgressEvent-          GHCJS.DOM.JSFFI.Generated.QuickTimePluginReplacement-          GHCJS.DOM.JSFFI.Generated.RGBColor-          GHCJS.DOM.JSFFI.Generated.RTCConfiguration-          GHCJS.DOM.JSFFI.Generated.RTCDTMFSender-          GHCJS.DOM.JSFFI.Generated.RTCDTMFToneChangeEvent-          GHCJS.DOM.JSFFI.Generated.RTCDataChannel-          GHCJS.DOM.JSFFI.Generated.RTCDataChannelEvent-          GHCJS.DOM.JSFFI.Generated.RTCIceCandidate-          GHCJS.DOM.JSFFI.Generated.RTCIceCandidateEvent-          GHCJS.DOM.JSFFI.Generated.RTCIceServer-          GHCJS.DOM.JSFFI.Generated.RTCPeerConnection-          GHCJS.DOM.JSFFI.Generated.RTCPeerConnectionErrorCallback-          GHCJS.DOM.JSFFI.Generated.RTCSessionDescription-          GHCJS.DOM.JSFFI.Generated.RTCSessionDescriptionCallback-          GHCJS.DOM.JSFFI.Generated.RTCStatsCallback-          GHCJS.DOM.JSFFI.Generated.RTCStatsReport-          GHCJS.DOM.JSFFI.Generated.RTCStatsResponse-          GHCJS.DOM.JSFFI.Generated.RadioNodeList-          GHCJS.DOM.JSFFI.Generated.Range-          GHCJS.DOM.JSFFI.Generated.ReadableStream-          GHCJS.DOM.JSFFI.Generated.Rect-          GHCJS.DOM.JSFFI.Generated.RequestAnimationFrameCallback-          GHCJS.DOM.JSFFI.Generated.SQLError-          GHCJS.DOM.JSFFI.Generated.SQLResultSet-          GHCJS.DOM.JSFFI.Generated.SQLResultSetRowList-          GHCJS.DOM.JSFFI.Generated.SQLStatementCallback-          GHCJS.DOM.JSFFI.Generated.SQLStatementErrorCallback-          GHCJS.DOM.JSFFI.Generated.SQLTransaction-          GHCJS.DOM.JSFFI.Generated.SQLTransactionCallback-          GHCJS.DOM.JSFFI.Generated.SQLTransactionErrorCallback-          GHCJS.DOM.JSFFI.Generated.SVGAElement-          GHCJS.DOM.JSFFI.Generated.SVGAltGlyphElement-          GHCJS.DOM.JSFFI.Generated.SVGAngle-          GHCJS.DOM.JSFFI.Generated.SVGAnimatedAngle-          GHCJS.DOM.JSFFI.Generated.SVGAnimatedBoolean-          GHCJS.DOM.JSFFI.Generated.SVGAnimatedEnumeration-          GHCJS.DOM.JSFFI.Generated.SVGAnimatedInteger-          GHCJS.DOM.JSFFI.Generated.SVGAnimatedLength-          GHCJS.DOM.JSFFI.Generated.SVGAnimatedLengthList-          GHCJS.DOM.JSFFI.Generated.SVGAnimatedNumber-          GHCJS.DOM.JSFFI.Generated.SVGAnimatedNumberList-          GHCJS.DOM.JSFFI.Generated.SVGAnimatedPreserveAspectRatio-          GHCJS.DOM.JSFFI.Generated.SVGAnimatedRect-          GHCJS.DOM.JSFFI.Generated.SVGAnimatedString-          GHCJS.DOM.JSFFI.Generated.SVGAnimatedTransformList-          GHCJS.DOM.JSFFI.Generated.SVGAnimationElement-          GHCJS.DOM.JSFFI.Generated.SVGCircleElement-          GHCJS.DOM.JSFFI.Generated.SVGClipPathElement-          GHCJS.DOM.JSFFI.Generated.SVGColor-          GHCJS.DOM.JSFFI.Generated.SVGComponentTransferFunctionElement-          GHCJS.DOM.JSFFI.Generated.SVGCursorElement-          GHCJS.DOM.JSFFI.Generated.SVGDocument-          GHCJS.DOM.JSFFI.Generated.SVGElement-          GHCJS.DOM.JSFFI.Generated.SVGEllipseElement-          GHCJS.DOM.JSFFI.Generated.SVGExternalResourcesRequired-          GHCJS.DOM.JSFFI.Generated.SVGFEBlendElement-          GHCJS.DOM.JSFFI.Generated.SVGFEColorMatrixElement-          GHCJS.DOM.JSFFI.Generated.SVGFEComponentTransferElement-          GHCJS.DOM.JSFFI.Generated.SVGFECompositeElement-          GHCJS.DOM.JSFFI.Generated.SVGFEConvolveMatrixElement-          GHCJS.DOM.JSFFI.Generated.SVGFEDiffuseLightingElement-          GHCJS.DOM.JSFFI.Generated.SVGFEDisplacementMapElement-          GHCJS.DOM.JSFFI.Generated.SVGFEDistantLightElement-          GHCJS.DOM.JSFFI.Generated.SVGFEDropShadowElement-          GHCJS.DOM.JSFFI.Generated.SVGFEGaussianBlurElement-          GHCJS.DOM.JSFFI.Generated.SVGFEImageElement-          GHCJS.DOM.JSFFI.Generated.SVGFEMergeNodeElement-          GHCJS.DOM.JSFFI.Generated.SVGFEMorphologyElement-          GHCJS.DOM.JSFFI.Generated.SVGFEOffsetElement-          GHCJS.DOM.JSFFI.Generated.SVGFEPointLightElement-          GHCJS.DOM.JSFFI.Generated.SVGFESpecularLightingElement-          GHCJS.DOM.JSFFI.Generated.SVGFESpotLightElement-          GHCJS.DOM.JSFFI.Generated.SVGFETileElement-          GHCJS.DOM.JSFFI.Generated.SVGFETurbulenceElement-          GHCJS.DOM.JSFFI.Generated.SVGFilterElement-          GHCJS.DOM.JSFFI.Generated.SVGFilterPrimitiveStandardAttributes-          GHCJS.DOM.JSFFI.Generated.SVGFitToViewBox-          GHCJS.DOM.JSFFI.Generated.SVGForeignObjectElement-          GHCJS.DOM.JSFFI.Generated.SVGGlyphRefElement-          GHCJS.DOM.JSFFI.Generated.SVGGradientElement-          GHCJS.DOM.JSFFI.Generated.SVGGraphicsElement-          GHCJS.DOM.JSFFI.Generated.SVGImageElement-          GHCJS.DOM.JSFFI.Generated.SVGLength-          GHCJS.DOM.JSFFI.Generated.SVGLengthList-          GHCJS.DOM.JSFFI.Generated.SVGLineElement-          GHCJS.DOM.JSFFI.Generated.SVGLinearGradientElement-          GHCJS.DOM.JSFFI.Generated.SVGMarkerElement-          GHCJS.DOM.JSFFI.Generated.SVGMaskElement-          GHCJS.DOM.JSFFI.Generated.SVGMatrix-          GHCJS.DOM.JSFFI.Generated.SVGNumber-          GHCJS.DOM.JSFFI.Generated.SVGNumberList-          GHCJS.DOM.JSFFI.Generated.SVGPaint-          GHCJS.DOM.JSFFI.Generated.SVGPathElement-          GHCJS.DOM.JSFFI.Generated.SVGPathSeg-          GHCJS.DOM.JSFFI.Generated.SVGPathSegArcAbs-          GHCJS.DOM.JSFFI.Generated.SVGPathSegArcRel-          GHCJS.DOM.JSFFI.Generated.SVGPathSegCurvetoCubicAbs-          GHCJS.DOM.JSFFI.Generated.SVGPathSegCurvetoCubicRel-          GHCJS.DOM.JSFFI.Generated.SVGPathSegCurvetoCubicSmoothAbs-          GHCJS.DOM.JSFFI.Generated.SVGPathSegCurvetoCubicSmoothRel-          GHCJS.DOM.JSFFI.Generated.SVGPathSegCurvetoQuadraticAbs-          GHCJS.DOM.JSFFI.Generated.SVGPathSegCurvetoQuadraticRel-          GHCJS.DOM.JSFFI.Generated.SVGPathSegCurvetoQuadraticSmoothAbs-          GHCJS.DOM.JSFFI.Generated.SVGPathSegCurvetoQuadraticSmoothRel-          GHCJS.DOM.JSFFI.Generated.SVGPathSegLinetoAbs-          GHCJS.DOM.JSFFI.Generated.SVGPathSegLinetoHorizontalAbs-          GHCJS.DOM.JSFFI.Generated.SVGPathSegLinetoHorizontalRel-          GHCJS.DOM.JSFFI.Generated.SVGPathSegLinetoRel-          GHCJS.DOM.JSFFI.Generated.SVGPathSegLinetoVerticalAbs-          GHCJS.DOM.JSFFI.Generated.SVGPathSegLinetoVerticalRel-          GHCJS.DOM.JSFFI.Generated.SVGPathSegList-          GHCJS.DOM.JSFFI.Generated.SVGPathSegMovetoAbs-          GHCJS.DOM.JSFFI.Generated.SVGPathSegMovetoRel-          GHCJS.DOM.JSFFI.Generated.SVGPatternElement-          GHCJS.DOM.JSFFI.Generated.SVGPoint-          GHCJS.DOM.JSFFI.Generated.SVGPointList-          GHCJS.DOM.JSFFI.Generated.SVGPolygonElement-          GHCJS.DOM.JSFFI.Generated.SVGPolylineElement-          GHCJS.DOM.JSFFI.Generated.SVGPreserveAspectRatio-          GHCJS.DOM.JSFFI.Generated.SVGRadialGradientElement-          GHCJS.DOM.JSFFI.Generated.SVGRect-          GHCJS.DOM.JSFFI.Generated.SVGRectElement-          GHCJS.DOM.JSFFI.Generated.SVGRenderingIntent-          GHCJS.DOM.JSFFI.Generated.SVGScriptElement-          GHCJS.DOM.JSFFI.Generated.SVGSVGElement-          GHCJS.DOM.JSFFI.Generated.SVGStopElement-          GHCJS.DOM.JSFFI.Generated.SVGStringList-          GHCJS.DOM.JSFFI.Generated.SVGStyleElement-          GHCJS.DOM.JSFFI.Generated.SVGTests-          GHCJS.DOM.JSFFI.Generated.SVGTextContentElement-          GHCJS.DOM.JSFFI.Generated.SVGTextPathElement-          GHCJS.DOM.JSFFI.Generated.SVGTextPositioningElement-          GHCJS.DOM.JSFFI.Generated.SVGTransform-          GHCJS.DOM.JSFFI.Generated.SVGTransformList-          GHCJS.DOM.JSFFI.Generated.SVGURIReference-          GHCJS.DOM.JSFFI.Generated.SVGUnitTypes-          GHCJS.DOM.JSFFI.Generated.SVGUseElement-          GHCJS.DOM.JSFFI.Generated.SVGViewElement-          GHCJS.DOM.JSFFI.Generated.SVGViewSpec-          GHCJS.DOM.JSFFI.Generated.SVGZoomAndPan-          GHCJS.DOM.JSFFI.Generated.SVGZoomEvent-          GHCJS.DOM.JSFFI.Generated.Screen-          GHCJS.DOM.JSFFI.Generated.ScriptProcessorNode-          GHCJS.DOM.JSFFI.Generated.ScriptProfile-          GHCJS.DOM.JSFFI.Generated.ScriptProfileNode-          GHCJS.DOM.JSFFI.Generated.SecurityPolicyViolationEvent-          GHCJS.DOM.JSFFI.Generated.SourceBuffer-          GHCJS.DOM.JSFFI.Generated.SourceBufferList-          GHCJS.DOM.JSFFI.Generated.SourceInfo-          GHCJS.DOM.JSFFI.Generated.SpeechSynthesis-          GHCJS.DOM.JSFFI.Generated.SpeechSynthesisEvent-          GHCJS.DOM.JSFFI.Generated.SpeechSynthesisUtterance-          GHCJS.DOM.JSFFI.Generated.SpeechSynthesisVoice-          GHCJS.DOM.JSFFI.Generated.Storage-          GHCJS.DOM.JSFFI.Generated.StorageErrorCallback-          GHCJS.DOM.JSFFI.Generated.StorageEvent-          GHCJS.DOM.JSFFI.Generated.StorageInfo-          GHCJS.DOM.JSFFI.Generated.StorageQuota-          GHCJS.DOM.JSFFI.Generated.StorageQuotaCallback-          GHCJS.DOM.JSFFI.Generated.StorageUsageCallback-          GHCJS.DOM.JSFFI.Generated.StringCallback-          GHCJS.DOM.JSFFI.Generated.StyleMedia-          GHCJS.DOM.JSFFI.Generated.StyleSheet-          GHCJS.DOM.JSFFI.Generated.StyleSheetList-          GHCJS.DOM.JSFFI.Generated.SubtleCrypto-          GHCJS.DOM.JSFFI.Generated.Text-          GHCJS.DOM.JSFFI.Generated.TextEvent-          GHCJS.DOM.JSFFI.Generated.TextMetrics-          GHCJS.DOM.JSFFI.Generated.TextTrack-          GHCJS.DOM.JSFFI.Generated.TextTrackCue-          GHCJS.DOM.JSFFI.Generated.TextTrackCueList-          GHCJS.DOM.JSFFI.Generated.TextTrackList-          GHCJS.DOM.JSFFI.Generated.TimeRanges-          GHCJS.DOM.JSFFI.Generated.Touch-          GHCJS.DOM.JSFFI.Generated.TouchEvent-          GHCJS.DOM.JSFFI.Generated.TouchList-          GHCJS.DOM.JSFFI.Generated.TrackEvent-          GHCJS.DOM.JSFFI.Generated.TransitionEvent-          GHCJS.DOM.JSFFI.Generated.TreeWalker-          GHCJS.DOM.JSFFI.Generated.TypeConversions-          GHCJS.DOM.JSFFI.Generated.UIEvent-          GHCJS.DOM.JSFFI.Generated.UIRequestEvent-          GHCJS.DOM.JSFFI.Generated.URLUtils-          GHCJS.DOM.JSFFI.Generated.UserMessageHandler-          GHCJS.DOM.JSFFI.Generated.VTTCue-          GHCJS.DOM.JSFFI.Generated.VTTRegion-          GHCJS.DOM.JSFFI.Generated.VTTRegionList-          GHCJS.DOM.JSFFI.Generated.ValidityState-          GHCJS.DOM.JSFFI.Generated.VideoPlaybackQuality-          GHCJS.DOM.JSFFI.Generated.VideoStreamTrack-          GHCJS.DOM.JSFFI.Generated.VideoTrack-          GHCJS.DOM.JSFFI.Generated.VideoTrackList-          GHCJS.DOM.JSFFI.Generated.VoidCallback-          GHCJS.DOM.JSFFI.Generated.WaveShaperNode-          GHCJS.DOM.JSFFI.Generated.WebGL2RenderingContext-          GHCJS.DOM.JSFFI.Generated.WebGLActiveInfo-          GHCJS.DOM.JSFFI.Generated.WebGLCompressedTextureATC-          GHCJS.DOM.JSFFI.Generated.WebGLCompressedTexturePVRTC-          GHCJS.DOM.JSFFI.Generated.WebGLCompressedTextureS3TC-          GHCJS.DOM.JSFFI.Generated.WebGLContextAttributes-          GHCJS.DOM.JSFFI.Generated.WebGLContextEvent-          GHCJS.DOM.JSFFI.Generated.WebGLDebugRendererInfo-          GHCJS.DOM.JSFFI.Generated.WebGLDebugShaders-          GHCJS.DOM.JSFFI.Generated.WebGLDepthTexture-          GHCJS.DOM.JSFFI.Generated.WebGLDrawBuffers-          GHCJS.DOM.JSFFI.Generated.WebGLLoseContext-          GHCJS.DOM.JSFFI.Generated.WebGLRenderingContextBase-          GHCJS.DOM.JSFFI.Generated.WebGLShaderPrecisionFormat-          GHCJS.DOM.JSFFI.Generated.WebKitAnimationEvent-          GHCJS.DOM.JSFFI.Generated.WebKitCSSFilterValue-          GHCJS.DOM.JSFFI.Generated.WebKitCSSMatrix-          GHCJS.DOM.JSFFI.Generated.WebKitCSSRegionRule-          GHCJS.DOM.JSFFI.Generated.WebKitCSSTransformValue-          GHCJS.DOM.JSFFI.Generated.WebKitCSSViewportRule-          GHCJS.DOM.JSFFI.Generated.WebKitNamedFlow-          GHCJS.DOM.JSFFI.Generated.WebKitNamespace-          GHCJS.DOM.JSFFI.Generated.WebKitPlaybackTargetAvailabilityEvent-          GHCJS.DOM.JSFFI.Generated.WebKitPoint-          GHCJS.DOM.JSFFI.Generated.WebKitTransitionEvent-          GHCJS.DOM.JSFFI.Generated.WebSocket-          GHCJS.DOM.JSFFI.Generated.WheelEvent-          GHCJS.DOM.JSFFI.Generated.WindowBase64-          GHCJS.DOM.JSFFI.Generated.WindowTimers-          GHCJS.DOM.JSFFI.Generated.Worker-          GHCJS.DOM.JSFFI.Generated.WorkerGlobalScope-          GHCJS.DOM.JSFFI.Generated.WorkerLocation-          GHCJS.DOM.JSFFI.Generated.WorkerNavigator-          GHCJS.DOM.JSFFI.Generated.XMLHttpRequest-          GHCJS.DOM.JSFFI.Generated.XMLHttpRequestProgressEvent-          GHCJS.DOM.JSFFI.Generated.XMLHttpRequestUpload-          GHCJS.DOM.JSFFI.Generated.XMLSerializer-          GHCJS.DOM.JSFFI.Generated.XPathEvaluator-          GHCJS.DOM.JSFFI.Generated.XPathExpression-          GHCJS.DOM.JSFFI.Generated.XPathNSResolver-          GHCJS.DOM.JSFFI.Generated.XPathResult-          GHCJS.DOM.JSFFI.Generated.XSLTProcessor--    if !impl(ghcjs) || flag(webkit)-        cpp-options: -DUSE_WEBKIT-        build-depends: glib >=0.13.0.0 && <0.14,-                       transformers >=0.3.0.0 && <0.6-        if flag(gtk3)-            build-depends: gtk3 >=0.13.0.0 && <0.15, webkitgtk3 >=0.14.0.0 && <0.15-        else-            build-depends: gtk >=0.13.0.0 && <0.14, webkit >=0.14.0.0 && <0.15-        c-sources:      cbits/ghcjs_stubs.c--    if flag(old-webkit)-        cpp-options: -DUSE_OLD_WEBKIT--    hs-source-dirs: src-    exposed: True-    buildable: True-    js-sources: jsbits/xhr.js-+cabal-version: 3.6+name: ghcjs-dom+version: 0.9.9.2+build-type: Simple+license: MIT+license-file: LICENSE+maintainer: Hamish Mackenzie <Hamish.K.Mackenzie@googlemail.com>+synopsis: DOM library that supports both GHCJS and GHC+description:+    Documentent Object Model (DOM) functions that work with+    GHCJS, but can also be used with GHC and a Browser.+category: Web+author: Hamish Mackenzie++tested-with:+  GHC == 8.8.1 || == 8.6.5 ||  == 8.4.4 || == 8.2.2 || == 8.0.2 || == 7.10.3,+  GHCJS == 8.4 || == 8.2++source-repository head+  type:         git+  location:     https://github.com/ghcjs/ghcjs-dom+  subdir:       ghcjs-dom++flag jsffi+    description:+        Use JavaScriptFFI extension for GHCJS JavaScript output+    manual: True++flag debug+    description:+        Enable debug features+    default: False+    manual: True++library+    build-depends: base <5,+                   containers >=0.5.7.1 && <0.8,+                   transformers >=0.2 && <0.7,+                   text >= 0.11.0.6 && < 2.2++    default-language: Haskell2010++    hs-source-dirs: src++    exposed-modules:+        GHCJS.DOM.Debug+        GHCJS.DOM.Debug.Internal+        GHCJS.DOM.Document++    if flag(debug)+        cpp-options: -DGHCJS_DOM_DEBUG++    if flag(jsffi) && (impl(ghcjs <9) || (impl(ghc >=9.6.4) && arch(javascript)))+      if impl(ghcjs <9)+        build-depends:+            ghcjs-dom-jsffi >=0.9.9.0+      else+        build-depends:+            ghcjs-dom-javascript >=0.9.9.2+    else+        build-depends:+            ghcjs-dom-jsaddle >=0.9.9.0++    reexported-modules: GHCJS.DOM,+                        GHCJS.DOM.Types,+                        GHCJS.DOM.EventM,+                        GHCJS.DOM.EventTargetClosures,+    -- (cd src/JSDOM/Generated && for a in *.hs; do echo "                        GHCJS.DOM.${a%.*},"; done | pbcopy)+                        GHCJS.DOM.ANGLEInstancedArrays,+                        GHCJS.DOM.AbstractWorker,+                        GHCJS.DOM.AnalyserNode,+                        GHCJS.DOM.Animatable,+                        GHCJS.DOM.Animation,+                        GHCJS.DOM.AnimationEvent,+                        GHCJS.DOM.ApplePayError,+                        GHCJS.DOM.ApplePayPaymentAuthorizedEvent,+                        GHCJS.DOM.ApplePayPaymentMethodSelectedEvent,+                        GHCJS.DOM.ApplePaySession,+                        GHCJS.DOM.ApplePayShippingContactSelectedEvent,+                        GHCJS.DOM.ApplePayShippingMethodSelectedEvent,+                        GHCJS.DOM.ApplePayValidateMerchantEvent,+                        GHCJS.DOM.ApplicationCache,+                        GHCJS.DOM.Attr,+                        GHCJS.DOM.AudioBuffer,+                        GHCJS.DOM.AudioBufferCallback,+                        GHCJS.DOM.AudioBufferSourceNode,+                        GHCJS.DOM.AudioContext,+                        GHCJS.DOM.AudioDestinationNode,+                        GHCJS.DOM.AudioListener,+                        GHCJS.DOM.AudioNode,+                        GHCJS.DOM.AudioParam,+                        GHCJS.DOM.AudioProcessingEvent,+                        GHCJS.DOM.AudioTrack,+                        GHCJS.DOM.AudioTrackList,+                        GHCJS.DOM.AutocompleteErrorEvent,+                        GHCJS.DOM.BarProp,+                        GHCJS.DOM.BasicCredential,+                        GHCJS.DOM.BeforeLoadEvent,+                        GHCJS.DOM.BeforeUnloadEvent,+                        GHCJS.DOM.BiquadFilterNode,+                        GHCJS.DOM.Blob,+                        GHCJS.DOM.BlobCallback,+                        GHCJS.DOM.Body,+                        GHCJS.DOM.ByteLengthQueuingStrategy,+                        GHCJS.DOM.CSS,+                        GHCJS.DOM.CSSFontFaceLoadEvent,+                        GHCJS.DOM.CSSFontFaceRule,+                        GHCJS.DOM.CSSImportRule,+                        GHCJS.DOM.CSSKeyframeRule,+                        GHCJS.DOM.CSSKeyframesRule,+                        GHCJS.DOM.CSSMediaRule,+                        GHCJS.DOM.CSSNamespaceRule,+                        GHCJS.DOM.CSSPageRule,+                        GHCJS.DOM.CSSPrimitiveValue,+                        GHCJS.DOM.CSSRule,+                        GHCJS.DOM.CSSRuleList,+                        GHCJS.DOM.CSSStyleDeclaration,+                        GHCJS.DOM.CSSStyleRule,+                        GHCJS.DOM.CSSStyleSheet,+                        GHCJS.DOM.CSSSupportsRule,+                        GHCJS.DOM.CSSValue,+                        GHCJS.DOM.CSSValueList,+                        GHCJS.DOM.CanvasCaptureMediaStreamTrack,+                        GHCJS.DOM.CanvasGradient,+                        GHCJS.DOM.CanvasPath,+                        GHCJS.DOM.CanvasRenderingContext2D,+                        GHCJS.DOM.CharacterData,+                        GHCJS.DOM.ChildNode,+                        GHCJS.DOM.ClipboardEvent,+                        GHCJS.DOM.CloseEvent,+                        GHCJS.DOM.CommandLineAPIHost,+                        GHCJS.DOM.Comment,+                        GHCJS.DOM.CompositionEvent,+                        GHCJS.DOM.ConvolverNode,+                        GHCJS.DOM.Coordinates,+                        GHCJS.DOM.CountQueuingStrategy,+                        GHCJS.DOM.Counter,+                        GHCJS.DOM.Crypto,+                        GHCJS.DOM.CryptoKey,+                        GHCJS.DOM.CustomElementRegistry,+                        GHCJS.DOM.CustomEvent,+                        GHCJS.DOM.DOMError,+                        GHCJS.DOM.DOMException,+                        GHCJS.DOM.DOMImplementation,+                        GHCJS.DOM.DOMNamedFlowCollection,+                        GHCJS.DOM.DOMParser,+                        GHCJS.DOM.DOMPoint,+                        GHCJS.DOM.DOMPointReadOnly,+                        GHCJS.DOM.DOMRect,+                        GHCJS.DOM.DOMRectReadOnly,+                        GHCJS.DOM.DOMStringList,+                        GHCJS.DOM.DOMStringMap,+                        GHCJS.DOM.DOMTokenList,+                        GHCJS.DOM.DataCue,+                        GHCJS.DOM.DataTransfer,+                        GHCJS.DOM.DataTransferItem,+                        GHCJS.DOM.DataTransferItemList,+                        GHCJS.DOM.Database,+                        GHCJS.DOM.DatabaseCallback,+                        GHCJS.DOM.DedicatedWorkerGlobalScope,+                        GHCJS.DOM.DelayNode,+                        GHCJS.DOM.DeviceMotionEvent,+                        GHCJS.DOM.DeviceOrientationEvent,+                        GHCJS.DOM.DeviceProximityEvent,+                        GHCJS.DOM.DocumentAndElementEventHandlers,+                        GHCJS.DOM.DocumentFragment,+                        GHCJS.DOM.DocumentOrShadowRoot,+                        GHCJS.DOM.DocumentTimeline,+                        GHCJS.DOM.DocumentType,+                        GHCJS.DOM.DynamicsCompressorNode,+                        GHCJS.DOM.EXTBlendMinMax,+                        GHCJS.DOM.EXTTextureFilterAnisotropic,+                        GHCJS.DOM.EXTsRGB,+                        GHCJS.DOM.Element,+                        GHCJS.DOM.ElementCSSInlineStyle,+                        GHCJS.DOM.Enums,+                        GHCJS.DOM.ErrorEvent,+                        GHCJS.DOM.Event,+                        GHCJS.DOM.EventListener,+                        GHCJS.DOM.EventSource,+                        GHCJS.DOM.EventTarget,+                        GHCJS.DOM.File,+                        GHCJS.DOM.FileError,+                        GHCJS.DOM.FileException,+                        GHCJS.DOM.FileList,+                        GHCJS.DOM.FileReader,+                        GHCJS.DOM.FileReaderSync,+                        GHCJS.DOM.FocusEvent,+                        GHCJS.DOM.FontFace,+                        GHCJS.DOM.FontFaceSet,+                        GHCJS.DOM.FormData,+                        GHCJS.DOM.GainNode,+                        GHCJS.DOM.Gamepad,+                        GHCJS.DOM.GamepadButton,+                        GHCJS.DOM.GamepadEvent,+                        GHCJS.DOM.Geolocation,+                        GHCJS.DOM.Geoposition,+                        GHCJS.DOM.GlobalCrypto,+                        GHCJS.DOM.GlobalEventHandlers,+                        GHCJS.DOM.GlobalPerformance,+                        GHCJS.DOM.HTMLAllCollection,+                        GHCJS.DOM.HTMLAnchorElement,+                        GHCJS.DOM.HTMLAppletElement,+                        GHCJS.DOM.HTMLAreaElement,+                        GHCJS.DOM.HTMLAttachmentElement,+                        GHCJS.DOM.HTMLBRElement,+                        GHCJS.DOM.HTMLBaseElement,+                        GHCJS.DOM.HTMLBodyElement,+                        GHCJS.DOM.HTMLButtonElement,+                        GHCJS.DOM.HTMLCanvasElement,+                        GHCJS.DOM.HTMLCollection,+                        GHCJS.DOM.HTMLDListElement,+                        GHCJS.DOM.HTMLDataElement,+                        GHCJS.DOM.HTMLDataListElement,+                        GHCJS.DOM.HTMLDetailsElement,+                        GHCJS.DOM.HTMLDirectoryElement,+                        GHCJS.DOM.HTMLDivElement,+                        GHCJS.DOM.HTMLDocument,+                        GHCJS.DOM.HTMLElement,+                        GHCJS.DOM.HTMLEmbedElement,+                        GHCJS.DOM.HTMLFieldSetElement,+                        GHCJS.DOM.HTMLFontElement,+                        GHCJS.DOM.HTMLFormControlsCollection,+                        GHCJS.DOM.HTMLFormElement,+                        GHCJS.DOM.HTMLFrameElement,+                        GHCJS.DOM.HTMLFrameSetElement,+                        GHCJS.DOM.HTMLHRElement,+                        GHCJS.DOM.HTMLHeadElement,+                        GHCJS.DOM.HTMLHeadingElement,+                        GHCJS.DOM.HTMLHtmlElement,+                        GHCJS.DOM.HTMLHyperlinkElementUtils,+                        GHCJS.DOM.HTMLIFrameElement,+                        GHCJS.DOM.HTMLImageElement,+                        GHCJS.DOM.HTMLInputElement,+                        GHCJS.DOM.HTMLKeygenElement,+                        GHCJS.DOM.HTMLLIElement,+                        GHCJS.DOM.HTMLLabelElement,+                        GHCJS.DOM.HTMLLegendElement,+                        GHCJS.DOM.HTMLLinkElement,+                        GHCJS.DOM.HTMLMapElement,+                        GHCJS.DOM.HTMLMarqueeElement,+                        GHCJS.DOM.HTMLMediaElement,+                        GHCJS.DOM.HTMLMenuElement,+                        GHCJS.DOM.HTMLMetaElement,+                        GHCJS.DOM.HTMLMeterElement,+                        GHCJS.DOM.HTMLModElement,+                        GHCJS.DOM.HTMLOListElement,+                        GHCJS.DOM.HTMLObjectElement,+                        GHCJS.DOM.HTMLOptGroupElement,+                        GHCJS.DOM.HTMLOptionElement,+                        GHCJS.DOM.HTMLOptionsCollection,+                        GHCJS.DOM.HTMLOutputElement,+                        GHCJS.DOM.HTMLParagraphElement,+                        GHCJS.DOM.HTMLParamElement,+                        GHCJS.DOM.HTMLPreElement,+                        GHCJS.DOM.HTMLProgressElement,+                        GHCJS.DOM.HTMLQuoteElement,+                        GHCJS.DOM.HTMLScriptElement,+                        GHCJS.DOM.HTMLSelectElement,+                        GHCJS.DOM.HTMLSlotElement,+                        GHCJS.DOM.HTMLSourceElement,+                        GHCJS.DOM.HTMLStyleElement,+                        GHCJS.DOM.HTMLTableCaptionElement,+                        GHCJS.DOM.HTMLTableCellElement,+                        GHCJS.DOM.HTMLTableColElement,+                        GHCJS.DOM.HTMLTableElement,+                        GHCJS.DOM.HTMLTableRowElement,+                        GHCJS.DOM.HTMLTableSectionElement,+                        GHCJS.DOM.HTMLTemplateElement,+                        GHCJS.DOM.HTMLTextAreaElement,+                        GHCJS.DOM.HTMLTimeElement,+                        GHCJS.DOM.HTMLTitleElement,+                        GHCJS.DOM.HTMLTrackElement,+                        GHCJS.DOM.HTMLUListElement,+                        GHCJS.DOM.HTMLVideoElement,+                        GHCJS.DOM.HashChangeEvent,+                        GHCJS.DOM.Headers,+                        GHCJS.DOM.History,+                        GHCJS.DOM.IDBCursor,+                        GHCJS.DOM.IDBCursorWithValue,+                        GHCJS.DOM.IDBDatabase,+                        GHCJS.DOM.IDBFactory,+                        GHCJS.DOM.IDBIndex,+                        GHCJS.DOM.IDBKeyRange,+                        GHCJS.DOM.IDBObjectStore,+                        GHCJS.DOM.IDBOpenDBRequest,+                        GHCJS.DOM.IDBRequest,+                        GHCJS.DOM.IDBTransaction,+                        GHCJS.DOM.IDBVersionChangeEvent,+                        GHCJS.DOM.ImageData,+                        GHCJS.DOM.InputEvent,+                        GHCJS.DOM.InspectorFrontendHost,+                        GHCJS.DOM.IntersectionObserver,+                        GHCJS.DOM.IntersectionObserverCallback,+                        GHCJS.DOM.IntersectionObserverEntry,+                        GHCJS.DOM.KeyboardEvent,+                        GHCJS.DOM.KeyframeEffect,+                        GHCJS.DOM.Location,+                        GHCJS.DOM.MediaController,+                        GHCJS.DOM.MediaControlsHost,+                        GHCJS.DOM.MediaDeviceInfo,+                        GHCJS.DOM.MediaDevices,+                        GHCJS.DOM.MediaElementAudioSourceNode,+                        GHCJS.DOM.MediaEncryptedEvent,+                        GHCJS.DOM.MediaError,+                        GHCJS.DOM.MediaKeyMessageEvent,+                        GHCJS.DOM.MediaKeySession,+                        GHCJS.DOM.MediaKeyStatusMap,+                        GHCJS.DOM.MediaKeySystemAccess,+                        GHCJS.DOM.MediaKeys,+                        GHCJS.DOM.MediaList,+                        GHCJS.DOM.MediaQueryList,+                        GHCJS.DOM.MediaQueryListListener,+                        GHCJS.DOM.MediaRemoteControls,+                        GHCJS.DOM.MediaSession,+                        GHCJS.DOM.MediaSource,+                        GHCJS.DOM.MediaStream,+                        GHCJS.DOM.MediaStreamAudioDestinationNode,+                        GHCJS.DOM.MediaStreamAudioSourceNode,+                        GHCJS.DOM.MediaStreamEvent,+                        GHCJS.DOM.MediaStreamTrack,+                        GHCJS.DOM.MediaStreamTrackEvent,+                        GHCJS.DOM.MessageChannel,+                        GHCJS.DOM.MessageEvent,+                        GHCJS.DOM.MessagePort,+                        GHCJS.DOM.MimeType,+                        GHCJS.DOM.MimeTypeArray,+                        GHCJS.DOM.MouseEvent,+                        GHCJS.DOM.MutationEvent,+                        GHCJS.DOM.MutationObserver,+                        GHCJS.DOM.MutationRecord,+                        GHCJS.DOM.NamedNodeMap,+                        GHCJS.DOM.Navigator,+                        GHCJS.DOM.NavigatorConcurrentHardware,+                        GHCJS.DOM.NavigatorID,+                        GHCJS.DOM.NavigatorLanguage,+                        GHCJS.DOM.NavigatorOnLine,+                        GHCJS.DOM.NavigatorUserMediaError,+                        GHCJS.DOM.NavigatorUserMediaErrorCallback,+                        GHCJS.DOM.NavigatorUserMediaSuccessCallback,+                        GHCJS.DOM.Node,+                        GHCJS.DOM.NodeFilter,+                        GHCJS.DOM.NodeIterator,+                        GHCJS.DOM.NodeList,+                        GHCJS.DOM.NonDocumentTypeChildNode,+                        GHCJS.DOM.NonElementParentNode,+                        GHCJS.DOM.Notification,+                        GHCJS.DOM.NotificationPermissionCallback,+                        GHCJS.DOM.OESStandardDerivatives,+                        GHCJS.DOM.OESTextureHalfFloat,+                        GHCJS.DOM.OESVertexArrayObject,+                        GHCJS.DOM.OfflineAudioCompletionEvent,+                        GHCJS.DOM.OfflineAudioContext,+                        GHCJS.DOM.OscillatorNode,+                        GHCJS.DOM.OverconstrainedError,+                        GHCJS.DOM.OverconstrainedErrorEvent,+                        GHCJS.DOM.OverflowEvent,+                        GHCJS.DOM.PageTransitionEvent,+                        GHCJS.DOM.PannerNode,+                        GHCJS.DOM.ParentNode,+                        GHCJS.DOM.PasswordCredential,+                        GHCJS.DOM.Path2D,+                        GHCJS.DOM.Performance,+                        GHCJS.DOM.PerformanceEntry,+                        GHCJS.DOM.PerformanceNavigation,+                        GHCJS.DOM.PerformanceObserver,+                        GHCJS.DOM.PerformanceObserverCallback,+                        GHCJS.DOM.PerformanceObserverEntryList,+                        GHCJS.DOM.PerformanceResourceTiming,+                        GHCJS.DOM.PerformanceTiming,+                        GHCJS.DOM.Plugin,+                        GHCJS.DOM.PluginArray,+                        GHCJS.DOM.PopStateEvent,+                        GHCJS.DOM.PositionCallback,+                        GHCJS.DOM.PositionError,+                        GHCJS.DOM.PositionErrorCallback,+                        GHCJS.DOM.ProcessingInstruction,+                        GHCJS.DOM.ProgressEvent,+                        GHCJS.DOM.PromiseRejectionEvent,+                        GHCJS.DOM.QuickTimePluginReplacement,+                        GHCJS.DOM.RGBColor,+                        GHCJS.DOM.RTCDTMFSender,+                        GHCJS.DOM.RTCDTMFToneChangeEvent,+                        GHCJS.DOM.RTCDataChannel,+                        GHCJS.DOM.RTCDataChannelEvent,+                        GHCJS.DOM.RTCIceCandidate,+                        GHCJS.DOM.RTCIceCandidateEvent,+                        GHCJS.DOM.RTCIceTransport,+                        GHCJS.DOM.RTCPeerConnection,+                        GHCJS.DOM.RTCPeerConnectionIceEvent,+                        GHCJS.DOM.RTCRtpReceiver,+                        GHCJS.DOM.RTCRtpSender,+                        GHCJS.DOM.RTCRtpTransceiver,+                        GHCJS.DOM.RTCSessionDescription,+                        GHCJS.DOM.RTCTrackEvent,+                        GHCJS.DOM.RadioNodeList,+                        GHCJS.DOM.Range,+                        GHCJS.DOM.ReadableByteStreamController,+                        GHCJS.DOM.ReadableStream,+                        GHCJS.DOM.ReadableStreamBYOBReader,+                        GHCJS.DOM.ReadableStreamBYOBRequest,+                        GHCJS.DOM.ReadableStreamDefaultController,+                        GHCJS.DOM.ReadableStreamDefaultReader,+                        GHCJS.DOM.ReadableStreamSource,+                        GHCJS.DOM.Rect,+                        GHCJS.DOM.Request,+                        GHCJS.DOM.RequestAnimationFrameCallback,+                        GHCJS.DOM.Response,+                        GHCJS.DOM.SQLError,+                        GHCJS.DOM.SQLException,+                        GHCJS.DOM.SQLResultSet,+                        GHCJS.DOM.SQLResultSetRowList,+                        GHCJS.DOM.SQLStatementCallback,+                        GHCJS.DOM.SQLStatementErrorCallback,+                        GHCJS.DOM.SQLTransaction,+                        GHCJS.DOM.SQLTransactionCallback,+                        GHCJS.DOM.SQLTransactionErrorCallback,+                        GHCJS.DOM.SVGAElement,+                        GHCJS.DOM.SVGAltGlyphElement,+                        GHCJS.DOM.SVGAngle,+                        GHCJS.DOM.SVGAnimatedAngle,+                        GHCJS.DOM.SVGAnimatedBoolean,+                        GHCJS.DOM.SVGAnimatedEnumeration,+                        GHCJS.DOM.SVGAnimatedInteger,+                        GHCJS.DOM.SVGAnimatedLength,+                        GHCJS.DOM.SVGAnimatedLengthList,+                        GHCJS.DOM.SVGAnimatedNumber,+                        GHCJS.DOM.SVGAnimatedNumberList,+                        GHCJS.DOM.SVGAnimatedPreserveAspectRatio,+                        GHCJS.DOM.SVGAnimatedRect,+                        GHCJS.DOM.SVGAnimatedString,+                        GHCJS.DOM.SVGAnimatedTransformList,+                        GHCJS.DOM.SVGAnimationElement,+                        GHCJS.DOM.SVGCircleElement,+                        GHCJS.DOM.SVGClipPathElement,+                        GHCJS.DOM.SVGComponentTransferFunctionElement,+                        GHCJS.DOM.SVGCursorElement,+                        GHCJS.DOM.SVGElement,+                        GHCJS.DOM.SVGEllipseElement,+                        GHCJS.DOM.SVGException,+                        GHCJS.DOM.SVGExternalResourcesRequired,+                        GHCJS.DOM.SVGFEBlendElement,+                        GHCJS.DOM.SVGFEColorMatrixElement,+                        GHCJS.DOM.SVGFEComponentTransferElement,+                        GHCJS.DOM.SVGFECompositeElement,+                        GHCJS.DOM.SVGFEConvolveMatrixElement,+                        GHCJS.DOM.SVGFEDiffuseLightingElement,+                        GHCJS.DOM.SVGFEDisplacementMapElement,+                        GHCJS.DOM.SVGFEDistantLightElement,+                        GHCJS.DOM.SVGFEDropShadowElement,+                        GHCJS.DOM.SVGFEGaussianBlurElement,+                        GHCJS.DOM.SVGFEImageElement,+                        GHCJS.DOM.SVGFEMergeNodeElement,+                        GHCJS.DOM.SVGFEMorphologyElement,+                        GHCJS.DOM.SVGFEOffsetElement,+                        GHCJS.DOM.SVGFEPointLightElement,+                        GHCJS.DOM.SVGFESpecularLightingElement,+                        GHCJS.DOM.SVGFESpotLightElement,+                        GHCJS.DOM.SVGFETileElement,+                        GHCJS.DOM.SVGFETurbulenceElement,+                        GHCJS.DOM.SVGFilterElement,+                        GHCJS.DOM.SVGFilterPrimitiveStandardAttributes,+                        GHCJS.DOM.SVGFitToViewBox,+                        GHCJS.DOM.SVGForeignObjectElement,+                        GHCJS.DOM.SVGGlyphRefElement,+                        GHCJS.DOM.SVGGradientElement,+                        GHCJS.DOM.SVGGraphicsElement,+                        GHCJS.DOM.SVGImageElement,+                        GHCJS.DOM.SVGLength,+                        GHCJS.DOM.SVGLengthList,+                        GHCJS.DOM.SVGLineElement,+                        GHCJS.DOM.SVGLinearGradientElement,+                        GHCJS.DOM.SVGMarkerElement,+                        GHCJS.DOM.SVGMaskElement,+                        GHCJS.DOM.SVGMatrix,+                        GHCJS.DOM.SVGNumber,+                        GHCJS.DOM.SVGNumberList,+                        GHCJS.DOM.SVGPathElement,+                        GHCJS.DOM.SVGPathSeg,+                        GHCJS.DOM.SVGPathSegArcAbs,+                        GHCJS.DOM.SVGPathSegArcRel,+                        GHCJS.DOM.SVGPathSegCurvetoCubicAbs,+                        GHCJS.DOM.SVGPathSegCurvetoCubicRel,+                        GHCJS.DOM.SVGPathSegCurvetoCubicSmoothAbs,+                        GHCJS.DOM.SVGPathSegCurvetoCubicSmoothRel,+                        GHCJS.DOM.SVGPathSegCurvetoQuadraticAbs,+                        GHCJS.DOM.SVGPathSegCurvetoQuadraticRel,+                        GHCJS.DOM.SVGPathSegCurvetoQuadraticSmoothAbs,+                        GHCJS.DOM.SVGPathSegCurvetoQuadraticSmoothRel,+                        GHCJS.DOM.SVGPathSegLinetoAbs,+                        GHCJS.DOM.SVGPathSegLinetoHorizontalAbs,+                        GHCJS.DOM.SVGPathSegLinetoHorizontalRel,+                        GHCJS.DOM.SVGPathSegLinetoRel,+                        GHCJS.DOM.SVGPathSegLinetoVerticalAbs,+                        GHCJS.DOM.SVGPathSegLinetoVerticalRel,+                        GHCJS.DOM.SVGPathSegList,+                        GHCJS.DOM.SVGPathSegMovetoAbs,+                        GHCJS.DOM.SVGPathSegMovetoRel,+                        GHCJS.DOM.SVGPatternElement,+                        GHCJS.DOM.SVGPoint,+                        GHCJS.DOM.SVGPointList,+                        GHCJS.DOM.SVGPolygonElement,+                        GHCJS.DOM.SVGPolylineElement,+                        GHCJS.DOM.SVGPreserveAspectRatio,+                        GHCJS.DOM.SVGRadialGradientElement,+                        GHCJS.DOM.SVGRect,+                        GHCJS.DOM.SVGRectElement,+                        GHCJS.DOM.SVGRenderingIntent,+                        GHCJS.DOM.SVGSVGElement,+                        GHCJS.DOM.SVGScriptElement,+                        GHCJS.DOM.SVGStopElement,+                        GHCJS.DOM.SVGStringList,+                        GHCJS.DOM.SVGStyleElement,+                        GHCJS.DOM.SVGTests,+                        GHCJS.DOM.SVGTextContentElement,+                        GHCJS.DOM.SVGTextPathElement,+                        GHCJS.DOM.SVGTextPositioningElement,+                        GHCJS.DOM.SVGTransform,+                        GHCJS.DOM.SVGTransformList,+                        GHCJS.DOM.SVGURIReference,+                        GHCJS.DOM.SVGUnitTypes,+                        GHCJS.DOM.SVGUseElement,+                        GHCJS.DOM.SVGViewElement,+                        GHCJS.DOM.SVGViewSpec,+                        GHCJS.DOM.SVGZoomAndPan,+                        GHCJS.DOM.SVGZoomEvent,+                        GHCJS.DOM.Screen,+                        GHCJS.DOM.ScriptProcessorNode,+                        GHCJS.DOM.SecurityPolicyViolationEvent,+                        GHCJS.DOM.Selection,+                        GHCJS.DOM.ShadowRoot,+                        GHCJS.DOM.SiteBoundCredential,+                        GHCJS.DOM.Slotable,+                        GHCJS.DOM.SourceBuffer,+                        GHCJS.DOM.SourceBufferList,+                        GHCJS.DOM.SpeechSynthesis,+                        GHCJS.DOM.SpeechSynthesisEvent,+                        GHCJS.DOM.SpeechSynthesisUtterance,+                        GHCJS.DOM.SpeechSynthesisVoice,+                        GHCJS.DOM.StaticRange,+                        GHCJS.DOM.Storage,+                        GHCJS.DOM.StorageErrorCallback,+                        GHCJS.DOM.StorageEvent,+                        GHCJS.DOM.StorageInfo,+                        GHCJS.DOM.StorageQuota,+                        GHCJS.DOM.StorageQuotaCallback,+                        GHCJS.DOM.StorageUsageCallback,+                        GHCJS.DOM.StringCallback,+                        GHCJS.DOM.StyleMedia,+                        GHCJS.DOM.StyleSheet,+                        GHCJS.DOM.StyleSheetList,+                        GHCJS.DOM.SubtleCrypto,+                        GHCJS.DOM.Text,+                        GHCJS.DOM.TextDecoder,+                        GHCJS.DOM.TextEncoder,+                        GHCJS.DOM.TextEvent,+                        GHCJS.DOM.TextMetrics,+                        GHCJS.DOM.TextTrack,+                        GHCJS.DOM.TextTrackCue,+                        GHCJS.DOM.TextTrackCueList,+                        GHCJS.DOM.TextTrackList,+                        GHCJS.DOM.TimeRanges,+                        GHCJS.DOM.Touch,+                        GHCJS.DOM.TouchEvent,+                        GHCJS.DOM.TouchList,+                        GHCJS.DOM.TrackEvent,+                        GHCJS.DOM.TransitionEvent,+                        GHCJS.DOM.TreeWalker,+                        GHCJS.DOM.UIEvent,+                        GHCJS.DOM.URL,+                        GHCJS.DOM.URLSearchParams,+                        GHCJS.DOM.UserMessageHandler,+                        GHCJS.DOM.VTTCue,+                        GHCJS.DOM.VTTRegion,+                        GHCJS.DOM.VTTRegionList,+                        GHCJS.DOM.ValidityState,+                        GHCJS.DOM.VideoPlaybackQuality,+                        GHCJS.DOM.VideoTrack,+                        GHCJS.DOM.VideoTrackList,+                        GHCJS.DOM.VoidCallback,+                        GHCJS.DOM.WaveShaperNode,+                        GHCJS.DOM.WebGL2RenderingContext,+                        GHCJS.DOM.WebGLActiveInfo,+                        GHCJS.DOM.WebGLCompressedTextureATC,+                        GHCJS.DOM.WebGLCompressedTexturePVRTC,+                        GHCJS.DOM.WebGLCompressedTextureS3TC,+                        GHCJS.DOM.WebGLContextEvent,+                        GHCJS.DOM.WebGLDebugRendererInfo,+                        GHCJS.DOM.WebGLDebugShaders,+                        GHCJS.DOM.WebGLDepthTexture,+                        GHCJS.DOM.WebGLDrawBuffers,+                        GHCJS.DOM.WebGLLoseContext,+                        GHCJS.DOM.WebGLRenderingContextBase,+                        GHCJS.DOM.WebGLShaderPrecisionFormat,+                        GHCJS.DOM.WebGPUBuffer,+                        GHCJS.DOM.WebGPUCommandBuffer,+                        GHCJS.DOM.WebGPUCommandQueue,+                        GHCJS.DOM.WebGPUComputeCommandEncoder,+                        GHCJS.DOM.WebGPUDepthStencilDescriptor,+                        GHCJS.DOM.WebGPUDepthStencilState,+                        GHCJS.DOM.WebGPUDrawable,+                        GHCJS.DOM.WebGPUFunction,+                        GHCJS.DOM.WebGPULibrary,+                        GHCJS.DOM.WebGPURenderCommandEncoder,+                        GHCJS.DOM.WebGPURenderPassAttachmentDescriptor,+                        GHCJS.DOM.WebGPURenderPassColorAttachmentDescriptor,+                        GHCJS.DOM.WebGPURenderPassDepthAttachmentDescriptor,+                        GHCJS.DOM.WebGPURenderPassDescriptor,+                        GHCJS.DOM.WebGPURenderPipelineColorAttachmentDescriptor,+                        GHCJS.DOM.WebGPURenderPipelineDescriptor,+                        GHCJS.DOM.WebGPURenderPipelineState,+                        GHCJS.DOM.WebGPURenderingContext,+                        GHCJS.DOM.WebGPUTexture,+                        GHCJS.DOM.WebGPUTextureDescriptor,+                        GHCJS.DOM.WebKitAnimationEvent,+                        GHCJS.DOM.WebKitCSSMatrix,+                        GHCJS.DOM.WebKitCSSRegionRule,+                        GHCJS.DOM.WebKitCSSViewportRule,+                        GHCJS.DOM.WebKitMediaKeyError,+                        GHCJS.DOM.WebKitMediaKeyMessageEvent,+                        GHCJS.DOM.WebKitMediaKeyNeededEvent,+                        GHCJS.DOM.WebKitMediaKeySession,+                        GHCJS.DOM.WebKitMediaKeys,+                        GHCJS.DOM.WebKitNamedFlow,+                        GHCJS.DOM.WebKitNamespace,+                        GHCJS.DOM.WebKitPlaybackTargetAvailabilityEvent,+                        GHCJS.DOM.WebKitPoint,+                        GHCJS.DOM.WebKitSubtleCrypto,+                        GHCJS.DOM.WebKitTransitionEvent,+                        GHCJS.DOM.WebSocket,+                        GHCJS.DOM.WheelEvent,+                        GHCJS.DOM.Window,+                        GHCJS.DOM.WindowEventHandlers,+                        GHCJS.DOM.WindowOrWorkerGlobalScope,+                        GHCJS.DOM.Worker,+                        GHCJS.DOM.WorkerGlobalScope,+                        GHCJS.DOM.WorkerLocation,+                        GHCJS.DOM.WorkerNavigator,+                        GHCJS.DOM.WritableStream,+                        GHCJS.DOM.XMLHttpRequest,+                        GHCJS.DOM.XMLHttpRequestEventTarget,+                        GHCJS.DOM.XMLHttpRequestProgressEvent,+                        GHCJS.DOM.XMLSerializer,+                        GHCJS.DOM.XPathEvaluator,+                        GHCJS.DOM.XPathException,+                        GHCJS.DOM.XPathExpression,+                        GHCJS.DOM.XPathNSResolver,+                        GHCJS.DOM.XPathResult,+                        GHCJS.DOM.XSLTProcessor

− jsbits/xhr.js

@@ -1,25 +0,0 @@-function h$dom$sendXHR(xhr, d, cont) {-    var clear;-    var error = function () {-        clear(); cont(2);-    };-    var abort = function () {-        clear(); cont(1);-    };-    var load = function () {-        clear(); cont(0);-    };-    clear = function () {-        xhr.removeEventListener('error', error);-        xhr.removeEventListener('abort', abort);-        xhr.removeEventListener('load', load);-    }-    xhr.addEventListener('error', error);-    xhr.addEventListener('abort', abort);-    xhr.addEventListener('load', load);-    if(d) {-	xhr.send(d);-    } else {-	xhr.send();-    }-}

− src/GHCJS/DOM.hs

@@ -1,167 +0,0 @@-{-# LANGUAGE CPP, ForeignFunctionInterface, OverloadedStrings #-}-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-{-# LANGUAGE JavaScriptFFI #-}-#endif-module GHCJS.DOM (-  currentWindow-, currentDocument-, WebView(..)-, webViewGetDomDocument-, runWebGUI-, enableInspector-, postGUISync-, postGUIAsync-) where--import qualified Data.Text as T-import Data.Monoid ((<>))-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.Types (JSVal(..))-import Control.Applicative ((<$>))-#else-import Graphics.UI.Gtk.WebKit.WebView-       (webViewSetWebSettings, webViewGetWebSettings, loadStarted,-        webViewLoadUri, loadFinished, webViewNew, webViewGetDomDocument,-        webViewGetInspector)-import Graphics.UI.Gtk.WebKit.WebInspector-       (showWindow, inspectWebView)-import Graphics.UI.Gtk-       (timeoutAddFull, widgetShowAll, mainQuit, objectDestroy,-        WindowPosition(..), containerAdd, scrolledWindowNew,-        windowSetPosition, windowSetDefaultSize, windowNew, mainGUI,-        initGUI, postGUISync, postGUIAsync)-import System.Glib.Signals (on)-import System.Glib.Attributes (get, AttrOp(..), set)-import System.Glib.FFI (maybeNull)-import System.Glib.MainLoop (priorityLow)-import Graphics.UI.Gtk.WebKit.WebSettings-       (webSettingsMonospaceFontFamily, webSettingsUserAgent,-        webSettingsEnableDeveloperExtras)-import Control.Monad.IO.Class (liftIO)-#endif--import GHCJS.DOM.Types-import GHCJS.DOM.Window (getNavigator, getDocument)-import GHCJS.DOM.Navigator (getUserAgent)-import Foreign (ForeignPtr, nullPtr, Ptr)-import Control.Monad (unless, forever, liftM)-import Control.Concurrent-       (yield, threadDelay, takeMVar, newEmptyMVar)-import System.Environment (getArgs)-import Data.List (isSuffixOf)--#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-postGUIAsync :: IO () -> IO ()-postGUIAsync = id--postGUISync :: IO a -> IO a-postGUISync = id--#ifdef ghcjs_HOST_OS-foreign import javascript unsafe "$r = window"-  ghcjs_currentWindow :: IO (Nullable Window)-foreign import javascript unsafe "$r = document"-  ghcjs_currentDocument :: IO (Nullable Document)-#else-ghcjs_currentWindow :: IO (Nullable Window)-ghcjs_currentWindow = undefined-ghcjs_currentDocument :: IO (Nullable Document)-ghcjs_currentDocument = undefined-#endif--currentWindow :: IO (Maybe Window)-currentWindow = nullableToMaybe <$> ghcjs_currentWindow-currentDocument :: IO (Maybe Document)-currentDocument = nullableToMaybe <$> ghcjs_currentDocument--type WebView = Window-castToWebView = id--webViewGetDomDocument :: Window -> IO (Maybe Document)-webViewGetDomDocument = getDocument-#else-foreign import ccall safe "ghcjs_currentWindow"-  ghcjs_currentWindow :: IO (Ptr Window)--currentWindow :: IO (Maybe Window)-currentWindow = maybeNull (makeNewGObject mkWindow) ghcjs_currentWindow--foreign import ccall unsafe "ghcjs_currentDocument"-  ghcjs_currentDocument :: IO (Ptr Document)--currentDocument :: IO (Maybe Document)-currentDocument = maybeNull (makeNewGObject mkDocument) ghcjs_currentDocument-#endif--runWebGUI :: (WebView -> IO ()) -> IO ()-runWebGUI = runWebGUI' "GHCJS"--runWebGUI' :: T.Text -> (WebView -> IO ()) -> IO ()-runWebGUI' userAgentKey main = do-  -- Are we in a java script inside some kind of browser-  mbWindow <- currentWindow-  case mbWindow of-    Just window -> do-      -- Check if we are running in javascript inside the the native version-      Just n <- getNavigator window-      agent <- getUserAgent n-      unless ((" " <> userAgentKey) `T.isSuffixOf` agent) $ main (castToWebView window)-    Nothing -> do-      makeDefaultWebView userAgentKey main--makeDefaultWebView :: T.Text -> (WebView -> IO ()) -> IO ()-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-makeDefaultWebView _ _ = error "Unsupported makeDefaultWebView"-#else-makeDefaultWebView userAgentKey main = do-  initGUI-  window <- windowNew-  timeoutAddFull (yield >> return True) priorityLow 10-  windowSetDefaultSize window 900 600-  windowSetPosition window WinPosCenter-  scrollWin <- scrolledWindowNew Nothing Nothing-  webView <- webViewNew-  settings <- webViewGetWebSettings webView-  userAgent <- settings `get` webSettingsUserAgent-  settings `set` [webSettingsUserAgent := userAgent <> " " <> userAgentKey]-  webViewSetWebSettings webView settings-  window `containerAdd` scrollWin-  scrollWin `containerAdd` webView-  on window objectDestroy . liftIO $ mainQuit-  widgetShowAll window-  webView `on` loadFinished $ \frame -> do-    main webView-  args <- getArgs-  case args of-    uri:_ -> webViewLoadUri webView (T.pack uri)-    []    -> do-      main webView-  mainGUI-#endif--enableInspector :: WebView -> IO ()-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-enableInspector _ = return ()-#else-enableInspector webView = do-  settings <- webViewGetWebSettings webView-  settings `set` [webSettingsEnableDeveloperExtras := True]-  webViewSetWebSettings webView settings-  inspector <- webViewGetInspector webView-  window <- windowNew-  windowSetDefaultSize window 900 300-  scrollWin <- scrolledWindowNew Nothing Nothing-  inspector `on` inspectWebView $ \view -> do-    inspectorView <- webViewNew-    settings <- webViewGetWebSettings inspectorView-    settings `set` [webSettingsMonospaceFontFamily := ("Consolas" :: String)]-    webViewSetWebSettings inspectorView settings-    scrollWin `containerAdd` inspectorView-    window `containerAdd` scrollWin-    widgetShowAll window-    return inspectorView-  inspector `on` showWindow $ do-    widgetShowAll window-    return True-  return ()-#endif

− src/GHCJS/DOM/ANGLEInstancedArrays.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.ANGLEInstancedArrays (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.ANGLEInstancedArrays-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.ANGLEInstancedArrays-#else-#endif

− src/GHCJS/DOM/AbstractView.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.AbstractView (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.AbstractView-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.AbstractView-#else-#endif

− src/GHCJS/DOM/AbstractWorker.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.AbstractWorker (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.AbstractWorker-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.AbstractWorker-#else-#endif

− src/GHCJS/DOM/AllAudioCapabilities.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.AllAudioCapabilities (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.AllAudioCapabilities-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.AllAudioCapabilities-#else-#endif

− src/GHCJS/DOM/AllVideoCapabilities.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.AllVideoCapabilities (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.AllVideoCapabilities-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.AllVideoCapabilities-#else-#endif

− src/GHCJS/DOM/AnalyserNode.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.AnalyserNode (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.AnalyserNode-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.AnalyserNode-#else-#endif

− src/GHCJS/DOM/AnimationEvent.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.AnimationEvent (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.AnimationEvent-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.AnimationEvent-#else-#endif

− src/GHCJS/DOM/ApplicationCache.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.ApplicationCache (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.ApplicationCache-#else-  module Graphics.UI.Gtk.WebKit.DOM.ApplicationCache-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.ApplicationCache-#else-import Graphics.UI.Gtk.WebKit.DOM.ApplicationCache-#endif

− src/GHCJS/DOM/Attr.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.Attr (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.Attr-#else-  module Graphics.UI.Gtk.WebKit.DOM.Attr-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.Attr-#else-import Graphics.UI.Gtk.WebKit.DOM.Attr-#endif

− src/GHCJS/DOM/AudioBuffer.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.AudioBuffer (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.AudioBuffer-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.AudioBuffer-#else-#endif

− src/GHCJS/DOM/AudioBufferCallback.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.AudioBufferCallback (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.AudioBufferCallback-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.AudioBufferCallback-#else-#endif

− src/GHCJS/DOM/AudioBufferSourceNode.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.AudioBufferSourceNode (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.AudioBufferSourceNode-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.AudioBufferSourceNode-#else-#endif

− src/GHCJS/DOM/AudioContext.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.AudioContext (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.AudioContext-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.AudioContext-#else-#endif

− src/GHCJS/DOM/AudioDestinationNode.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.AudioDestinationNode (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.AudioDestinationNode-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.AudioDestinationNode-#else-#endif

− src/GHCJS/DOM/AudioListener.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.AudioListener (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.AudioListener-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.AudioListener-#else-#endif

− src/GHCJS/DOM/AudioNode.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.AudioNode (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.AudioNode-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.AudioNode-#else-#endif

− src/GHCJS/DOM/AudioParam.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.AudioParam (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.AudioParam-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.AudioParam-#else-#endif

− src/GHCJS/DOM/AudioProcessingEvent.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.AudioProcessingEvent (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.AudioProcessingEvent-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.AudioProcessingEvent-#else-#endif

− src/GHCJS/DOM/AudioStreamTrack.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.AudioStreamTrack (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.AudioStreamTrack-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.AudioStreamTrack-#else-#endif

− src/GHCJS/DOM/AudioTrack.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.AudioTrack (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.AudioTrack-#else-  module Graphics.UI.Gtk.WebKit.DOM.AudioTrack-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.AudioTrack-#else-import Graphics.UI.Gtk.WebKit.DOM.AudioTrack-#endif

− src/GHCJS/DOM/AudioTrackList.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.AudioTrackList (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.AudioTrackList-#else-  module Graphics.UI.Gtk.WebKit.DOM.AudioTrackList-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.AudioTrackList-#else-import Graphics.UI.Gtk.WebKit.DOM.AudioTrackList-#endif

− src/GHCJS/DOM/AutocompleteErrorEvent.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.AutocompleteErrorEvent (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.AutocompleteErrorEvent-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.AutocompleteErrorEvent-#else-#endif

− src/GHCJS/DOM/BarProp.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.BarProp (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.BarProp-#else-  module Graphics.UI.Gtk.WebKit.DOM.BarProp-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.BarProp-#else-import Graphics.UI.Gtk.WebKit.DOM.BarProp-#endif

− src/GHCJS/DOM/BatteryManager.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.BatteryManager (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.BatteryManager-#else-  module Graphics.UI.Gtk.WebKit.DOM.BatteryManager-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.BatteryManager-#else-import Graphics.UI.Gtk.WebKit.DOM.BatteryManager-#endif

− src/GHCJS/DOM/BeforeLoadEvent.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.BeforeLoadEvent (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.BeforeLoadEvent-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.BeforeLoadEvent-#else-#endif

− src/GHCJS/DOM/BeforeUnloadEvent.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.BeforeUnloadEvent (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.BeforeUnloadEvent-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.BeforeUnloadEvent-#else-#endif

− src/GHCJS/DOM/BiquadFilterNode.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.BiquadFilterNode (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.BiquadFilterNode-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.BiquadFilterNode-#else-#endif

− src/GHCJS/DOM/Blob.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.Blob (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.Blob-#else-  module Graphics.UI.Gtk.WebKit.DOM.Blob-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.Blob-#else-import Graphics.UI.Gtk.WebKit.DOM.Blob-#endif

− src/GHCJS/DOM/CSS.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CSS (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CSS-#else-  module Graphics.UI.Gtk.WebKit.DOM.CSS-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CSS-#else-import Graphics.UI.Gtk.WebKit.DOM.CSS-#endif

− src/GHCJS/DOM/CSSCharsetRule.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CSSCharsetRule (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CSSCharsetRule-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CSSCharsetRule-#else-#endif

− src/GHCJS/DOM/CSSFontFaceLoadEvent.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CSSFontFaceLoadEvent (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CSSFontFaceLoadEvent-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CSSFontFaceLoadEvent-#else-#endif

− src/GHCJS/DOM/CSSFontFaceRule.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CSSFontFaceRule (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CSSFontFaceRule-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CSSFontFaceRule-#else-#endif

− src/GHCJS/DOM/CSSImportRule.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CSSImportRule (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CSSImportRule-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CSSImportRule-#else-#endif

− src/GHCJS/DOM/CSSKeyframeRule.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CSSKeyframeRule (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CSSKeyframeRule-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CSSKeyframeRule-#else-#endif

− src/GHCJS/DOM/CSSKeyframesRule.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CSSKeyframesRule (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CSSKeyframesRule-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CSSKeyframesRule-#else-#endif

− src/GHCJS/DOM/CSSMediaRule.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CSSMediaRule (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CSSMediaRule-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CSSMediaRule-#else-#endif

− src/GHCJS/DOM/CSSPageRule.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CSSPageRule (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CSSPageRule-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CSSPageRule-#else-#endif

− src/GHCJS/DOM/CSSPrimitiveValue.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CSSPrimitiveValue (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CSSPrimitiveValue-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CSSPrimitiveValue-#else-#endif

− src/GHCJS/DOM/CSSRule.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CSSRule (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CSSRule-#else-  module Graphics.UI.Gtk.WebKit.DOM.CSSRule-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CSSRule-#else-import Graphics.UI.Gtk.WebKit.DOM.CSSRule-#endif

− src/GHCJS/DOM/CSSRuleList.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CSSRuleList (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CSSRuleList-#else-  module Graphics.UI.Gtk.WebKit.DOM.CSSRuleList-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CSSRuleList-#else-import Graphics.UI.Gtk.WebKit.DOM.CSSRuleList-#endif

− src/GHCJS/DOM/CSSStyleDeclaration.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CSSStyleDeclaration (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CSSStyleDeclaration-#else-  module Graphics.UI.Gtk.WebKit.DOM.CSSStyleDeclaration-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CSSStyleDeclaration-#else-import Graphics.UI.Gtk.WebKit.DOM.CSSStyleDeclaration-#endif

− src/GHCJS/DOM/CSSStyleRule.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CSSStyleRule (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CSSStyleRule-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CSSStyleRule-#else-#endif

− src/GHCJS/DOM/CSSStyleSheet.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CSSStyleSheet (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CSSStyleSheet-#else-  module Graphics.UI.Gtk.WebKit.DOM.CSSStyleSheet-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CSSStyleSheet-#else-import Graphics.UI.Gtk.WebKit.DOM.CSSStyleSheet-#endif

− src/GHCJS/DOM/CSSSupportsRule.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CSSSupportsRule (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CSSSupportsRule-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CSSSupportsRule-#else-#endif

− src/GHCJS/DOM/CSSValue.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CSSValue (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CSSValue-#else-  module Graphics.UI.Gtk.WebKit.DOM.CSSValue-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CSSValue-#else-import Graphics.UI.Gtk.WebKit.DOM.CSSValue-#endif

− src/GHCJS/DOM/CSSValueList.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CSSValueList (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CSSValueList-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CSSValueList-#else-#endif

− src/GHCJS/DOM/CanvasGradient.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CanvasGradient (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CanvasGradient-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CanvasGradient-#else-#endif

− src/GHCJS/DOM/CanvasRenderingContext.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CanvasRenderingContext (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CanvasRenderingContext-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CanvasRenderingContext-#else-#endif

− src/GHCJS/DOM/CanvasRenderingContext2D.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CanvasRenderingContext2D (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CanvasRenderingContext2D-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CanvasRenderingContext2D-#else-#endif

− src/GHCJS/DOM/CapabilityRange.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CapabilityRange (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CapabilityRange-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CapabilityRange-#else-#endif

− src/GHCJS/DOM/CharacterData.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CharacterData (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CharacterData-#else-  module Graphics.UI.Gtk.WebKit.DOM.CharacterData-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CharacterData-#else-import Graphics.UI.Gtk.WebKit.DOM.CharacterData-#endif

− src/GHCJS/DOM/ChildNode.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.ChildNode (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.ChildNode-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.ChildNode-#else-#endif

− src/GHCJS/DOM/ClientRect.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.ClientRect (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.ClientRect-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.ClientRect-#else-#endif

− src/GHCJS/DOM/ClientRectList.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.ClientRectList (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.ClientRectList-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.ClientRectList-#else-#endif

− src/GHCJS/DOM/CloseEvent.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CloseEvent (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CloseEvent-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CloseEvent-#else-#endif

− src/GHCJS/DOM/CommandLineAPIHost.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CommandLineAPIHost (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CommandLineAPIHost-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CommandLineAPIHost-#else-#endif

− src/GHCJS/DOM/Comment.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.Comment (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.Comment-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.Comment-#else-#endif

− src/GHCJS/DOM/CompositionEvent.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CompositionEvent (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CompositionEvent-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CompositionEvent-#else-#endif

− src/GHCJS/DOM/ConvolverNode.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.ConvolverNode (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.ConvolverNode-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.ConvolverNode-#else-#endif

− src/GHCJS/DOM/Coordinates.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.Coordinates (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.Coordinates-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.Coordinates-#else-#endif

− src/GHCJS/DOM/Counter.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.Counter (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.Counter-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.Counter-#else-#endif

− src/GHCJS/DOM/Crypto.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.Crypto (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.Crypto-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.Crypto-#else-#endif

− src/GHCJS/DOM/CryptoKey.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CryptoKey (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CryptoKey-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CryptoKey-#else-#endif

− src/GHCJS/DOM/CryptoKeyPair.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CryptoKeyPair (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CryptoKeyPair-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CryptoKeyPair-#else-#endif

− src/GHCJS/DOM/CustomEvent.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.CustomEvent (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.CustomEvent-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.CustomEvent-#else-#endif

− src/GHCJS/DOM/DOMError.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.DOMError (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.DOMError-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.DOMError-#else-#endif

− src/GHCJS/DOM/DOMImplementation.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.DOMImplementation (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.DOMImplementation-#else-  module Graphics.UI.Gtk.WebKit.DOM.DOMImplementation-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.DOMImplementation-#else-import Graphics.UI.Gtk.WebKit.DOM.DOMImplementation-#endif

− src/GHCJS/DOM/DOMNamedFlowCollection.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.DOMNamedFlowCollection (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.DOMNamedFlowCollection-#else-  module Graphics.UI.Gtk.WebKit.DOM.DOMNamedFlowCollection-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.DOMNamedFlowCollection-#else-import Graphics.UI.Gtk.WebKit.DOM.DOMNamedFlowCollection-#endif

− src/GHCJS/DOM/DOMParser.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.DOMParser (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.DOMParser-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.DOMParser-#else-#endif

− src/GHCJS/DOM/DOMSettableTokenList.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.DOMSettableTokenList (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.DOMSettableTokenList-#else-  module Graphics.UI.Gtk.WebKit.DOM.DOMSettableTokenList-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.DOMSettableTokenList-#else-import Graphics.UI.Gtk.WebKit.DOM.DOMSettableTokenList-#endif

− src/GHCJS/DOM/DOMStringList.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.DOMStringList (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.DOMStringList-#else-  module Graphics.UI.Gtk.WebKit.DOM.DOMStringList-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.DOMStringList-#else-import Graphics.UI.Gtk.WebKit.DOM.DOMStringList-#endif

− src/GHCJS/DOM/DOMTokenList.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.DOMTokenList (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.DOMTokenList-#else-  module Graphics.UI.Gtk.WebKit.DOM.DOMTokenList-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.DOMTokenList-#else-import Graphics.UI.Gtk.WebKit.DOM.DOMTokenList-#endif

− src/GHCJS/DOM/DataCue.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.DataCue (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.DataCue-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.DataCue-#else-#endif

− src/GHCJS/DOM/DataTransfer.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.DataTransfer (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.DataTransfer-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.DataTransfer-#else-#endif

− src/GHCJS/DOM/DataTransferItem.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.DataTransferItem (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.DataTransferItem-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.DataTransferItem-#else-#endif

− src/GHCJS/DOM/DataTransferItemList.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.DataTransferItemList (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.DataTransferItemList-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.DataTransferItemList-#else-#endif

− src/GHCJS/DOM/Database.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.Database (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Database-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Database-#else-#endif

− src/GHCJS/DOM/DatabaseCallback.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.DatabaseCallback (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.DatabaseCallback-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.DatabaseCallback-#else-#endif

+ src/GHCJS/DOM/Debug.hs view

@@ -0,0 +1,179 @@+{-# LANGUAGE ConstraintKinds #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE ScopedTypeVariables #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+module GHCJS.DOM.Debug (+    DomHasCallStack+  , debugEnabled+  , getElementStack+  , addDebugMenu+  , addDebugMenu'+) where++import Control.Arrow (Arrow(..))+import Control.Monad.IO.Class (MonadIO(..))++import Data.Char (toLower)+import Data.Foldable (forM_)+import Data.Monoid ((<>))++import System.IO (stderr, hPutStrLn)++import GHC.Stack+       (srcLocStartLine, srcLocFile, SrcLoc(..), HasCallStack)+import GHC.Exts (Constraint)++import GHCJS.DOM (currentDocumentUnchecked)+import GHCJS.DOM.Types+       (HTMLDivElement(..), HTMLStyleElement(..), uncheckedCastTo,+        HTMLUListElement(..), MouseEvent(..), Document(..), Element(..),+        HTMLAnchorElement(..), MonadJSM, JSM, liftJSM, JSString)+import GHCJS.DOM.Debug.Internal (DomHasCallStack, getElementStack, debugEnabled)+import GHCJS.DOM.Document+       (createTextNode, getBodyUnchecked,+        getElementsByTagName, createElement)+import GHCJS.DOM.DocumentOrShadowRoot (elementFromPoint)+import GHCJS.DOM.Element+       (getTagName, setAttribute, getAttribute, setInnerHTML)+import GHCJS.DOM.EventM+       (addListener, uiPageXY, mouseClientXY, mouseShiftKey, target,+        newListener, on, preventDefault)+import GHCJS.DOM.EventTargetClosures (SaferEventListener(..))+import GHCJS.DOM.GlobalEventHandlers (click, contextMenu)+import GHCJS.DOM.HTMLCollection (itemUnchecked)+import GHCJS.DOM.HTMLStyleElement (setType)+import GHCJS.DOM.Node (getParentElement, appendChild_)+import GHCJS.DOM.NonElementParentNode (getElementById)++addDebugMenu :: MonadJSM m => m (JSM ())+addDebugMenu = addDebugMenu' (const Nothing)++addDebugMenu' :: MonadJSM m => (SrcLoc -> Maybe String) -> m (JSM ())+addDebugMenu' getSourceLink = liftJSM $ do+    let menuId = "ghcjs-dom-debug" :: JSString+    doc <- currentDocumentUnchecked+    style <- uncheckedCastTo HTMLStyleElement <$> createElement doc ("style" :: JSString)+    setType style ("text/css" :: JSString)+    setInnerHTML style $ mconcat [+        "#", menuId, ", #", menuId, " ul ul{"+      , "  display: block;"+      , "  position: absolute;"+      , "  box-shadow: 0 4px 8px 0 rgba(0, 0, 0, 0.2), 0 6px 20px 0 rgba(0, 0, 0, 0.19);"+      , "  padding: 2px;"+      , "  z-index:1000;"+      , "  margin: 0;"+      , "  list-style-type: none;"+      , "  list-style: none;"+      , "  background-color:#fff;"+      , "  color:#000;"+      , "}\n"+      , "#", menuId, " ul{"+      , "  list-style-type: none;"+      , "  margin: 0;"+      , "  padding: 2px;"+      , "  cursor: pointer;"+      , "}\n"+      , "#", menuId, " li{"+      , "  white-space: nowrap;"+      , "}\n"+      , "#", menuId, " ul ul{"+      , "  display: none;"+      , "}\n"+      , "#", menuId, ">li:hover{"+      , "  background-color:#ddd;"+      , "}\n"+      , "#", menuId, " li:hover ul{"+      , "  display: inline-block;"+      , "  position: absolute;"+      , "  z-index:1001;"+      , "}\n"+      ]+    getElementsByTagName doc ("head" :: JSString) >>= (`itemUnchecked` 0) >>= (`appendChild_` style)+    body <- getBodyUnchecked doc+    clickListener <- newListener $ do+        target >>= \case+            Just (t :: HTMLAnchorElement) ->+                getAttribute t ("hs-srcloc" :: JSString)+                    >>= mapM_ (liftIO . hPutStrLn stderr . ("OPEN " <>))+            Nothing -> return ()+        getElementById doc menuId >>= mapM_+            (\e -> setAttribute e ("style" :: JSString) ("display: none;" :: JSString))+    on doc contextMenu $ mouseShiftKey >>= \case+        True -> ((fromIntegral *** fromIntegral) <$> mouseClientXY) >>= uncurry (elementFromPoint doc) >>= \case+            Just e ->  do+                preventDefault+                menu <- getElementById doc menuId >>= \case+                    Just menu -> setInnerHTML menu ("" :: JSString) >> return (uncheckedCastTo HTMLDivElement menu)+                    Nothing -> do+                        menu <- uncheckedCastTo HTMLDivElement <$> createElement doc ("div" :: JSString)+                        setAttribute menu ("id" :: JSString) menuId+                        appendChild_ body menu+                        return menu++                if debugEnabled+                    then do+                        ul <- uncheckedCastTo HTMLUListElement <$> createElement doc ("ul" :: JSString)+                        appendChild_ menu ul+                        addMenu doc clickListener ul e+                    else do+                        a <- uncheckedCastTo HTMLAnchorElement <$> createElement doc ("a" :: JSString)+                        appendChild_ menu a+                        createTextNode doc ("The ghcjs-dom debug cabal flag is switched off" :: JSString)+                            >>= appendChild_ a+                        setAttribute a ("href" :: JSString)+                            ("https://github.com/ghcjs/ghcjs-dom/blob/master/README.md#debug" :: JSString)+                        setAttribute a ("target" :: JSString) ("_blank" :: JSString)+                        liftJSM $ addListener a click clickListener False++                (pageX, pageY) <- uiPageXY+                setAttribute menu ("style" :: JSString) ("display: block; left: " <> show pageX <> "px; top:" <> show pageY <> "px;" )+            Nothing -> return ()+        False -> return ()++  where+    addMenu :: MonadJSM m => Document -> SaferEventListener HTMLAnchorElement MouseEvent -> HTMLUListElement -> Element -> m ()+    addMenu doc clickListener parentMenu = loop+      where+        loop e = do+            getElementStack e >>= mapM_ (addElementMenu doc clickListener parentMenu e)+            getParentElement e >>= mapM_ loop++    addElementMenu+        :: MonadJSM m+        => Document+        -> SaferEventListener HTMLAnchorElement MouseEvent+        -> HTMLUListElement+        -> Element+        -> [(String, SrcLoc)]+        -> m ()+    addElementMenu doc clickListener parentMenu e cs = do+        tagName <- map toLower <$> getTagName e+        parentLi <- createElement doc ("li" :: JSString)+        appendChild_ parentMenu parentLi+        createTextNode doc tagName >>= appendChild_ parentLi+        ul <- createElement doc ("ul" :: JSString)+        appendChild_ parentLi ul+        forM_ (reverse cs) $ \(f, loc) -> do+            li <- createElement doc ("li" :: JSString)+            appendChild_ ul li+            a <- uncheckedCastTo HTMLAnchorElement <$> createElement doc ("a" :: JSString)+            appendChild_ li a+            createTextNode doc (f <> " " <> srcLocFile loc <> ":" <> show (srcLocStartLine loc))+                >>= appendChild_ a+            forM_ (getSourceLink loc) $ \link -> do+                setAttribute a ("href" :: JSString) link+                setAttribute a ("target" :: JSString) ("_blank" :: JSString)+            setAttribute a ("hs-srcloc" :: JSString) $ prettySrcLoc loc+            liftJSM $ addListener a click clickListener False++    prettySrcLoc :: SrcLoc -> String+    prettySrcLoc SrcLoc {..} = mconcat+        [ srcLocFile          , ":("+        , show srcLocStartLine, ","+        , show srcLocStartCol , ")-("+        , show srcLocEndLine  , ","+        , show srcLocEndCol   , ") in "+        , srcLocPackage, ":", srcLocModule+        ]+

+ src/GHCJS/DOM/Debug/Internal.hs view

@@ -0,0 +1,71 @@+{-# LANGUAGE CPP #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE ConstraintKinds #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE KindSignatures #-}+module GHCJS.DOM.Debug.Internal (+    DomHasCallStack+  , debugEnabled+  , cachedStacks+  , cacheStack+  , lookupStack+  , getElementStack+) where++import Control.Monad (void)+import Control.Monad.IO.Class (MonadIO, liftIO)+import Data.Map (Map)+import qualified Data.Map as M (insert, size, lookup)+import Data.IORef (atomicModifyIORef', IORef, newIORef, readIORef)+import GHC.Stack+       (SrcLoc, CallStack, callStack, getCallStack, HasCallStack)+import GHC.Exts (Constraint)+import System.IO.Unsafe (unsafePerformIO)+import Text.Read (readMaybe)++import GHCJS.DOM.Types (Element(..), MonadDOM, ToJSString, JSString)+import GHCJS.DOM.Element (setAttribute, getAttribute)++#ifdef GHCJS_DOM_DEBUG++type DomHasCallStack = (HasCallStack :: Constraint)+debugEnabled :: Bool+debugEnabled = True++#else++type DomHasCallStack = (() :: Constraint)++debugEnabled :: Bool+debugEnabled = False++#endif++cachedStacks :: IORef (Map String Int, Map Int [(String, SrcLoc)])+cachedStacks = unsafePerformIO $ newIORef (mempty, mempty)+{-# NOINLINE cachedStacks #-}++lookupStack :: MonadIO m => Int -> m (Maybe [(String, SrcLoc)])+lookupStack n = do+    (_, intToStack) <- liftIO $ readIORef cachedStacks+    return $ M.lookup n intToStack++getElementStack :: MonadDOM m => Element -> m (Maybe [(String, SrcLoc)])+getElementStack e =+    getAttribute e ("hs-creator" :: JSString) >>= \case+        Just a -> case readMaybe a of+            Just n -> lookupStack n+            Nothing -> return Nothing+        Nothing -> return Nothing++cacheStack :: MonadIO m => [(String, SrcLoc)] -> m Int+cacheStack cs = do+    let csString = show cs+    liftIO $ atomicModifyIORef' cachedStacks $ \(stackToInt, intToStack) ->+        case M.lookup csString stackToInt of+            Just n -> ((stackToInt, intToStack), n)+            Nothing ->+                let n = M.size stackToInt in+                ((M.insert csString n stackToInt, M.insert n cs intToStack), n)++

− src/GHCJS/DOM/DedicatedWorkerGlobalScope.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.DedicatedWorkerGlobalScope (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.DedicatedWorkerGlobalScope-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.DedicatedWorkerGlobalScope-#else-#endif

− src/GHCJS/DOM/DelayNode.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.DelayNode (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.DelayNode-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.DelayNode-#else-#endif

− src/GHCJS/DOM/DeviceMotionEvent.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.DeviceMotionEvent (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.DeviceMotionEvent-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.DeviceMotionEvent-#else-#endif

− src/GHCJS/DOM/DeviceOrientationEvent.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.DeviceOrientationEvent (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.DeviceOrientationEvent-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.DeviceOrientationEvent-#else-#endif

− src/GHCJS/DOM/DeviceProximityEvent.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.DeviceProximityEvent (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.DeviceProximityEvent-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.DeviceProximityEvent-#else-#endif

src/GHCJS/DOM/Document.hs view

@@ -1,13 +1,102 @@ {-# LANGUAGE CPP #-}+{-# LANGUAGE PackageImports #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE ConstraintKinds #-} module GHCJS.DOM.Document (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.Document+    module Export+  , createElement+  , createElement_+  , createElementNS+  , createElementNS_+) where++#ifdef GHCJS_DOM_DEBUG++import Control.Monad (void)+import Control.Monad.IO.Class (MonadIO, liftIO)+import Data.IORef (atomicModifyIORef', IORef, newIORef, readIORef)+import GHC.Stack+       (SrcLoc, CallStack, callStack, getCallStack, HasCallStack)+import System.IO.Unsafe (unsafePerformIO)+import Text.Read (readMaybe)++import GHCJS.DOM.Types (Element(..), MonadDOM, ToJSString, JSString)+import GHCJS.DOM.Debug.Internal (cacheStack)+import GHCJS.DOM.Element (setAttribute, getAttribute)+#ifdef  MIN_VERSION_ghcjs_dom_javascript+import qualified "ghcjs-dom-javascript" GHCJS.DOM.Document as Raw (createElement, createElement_, createElementNS, createElementNS_)+import "ghcjs-dom-javascript" GHCJS.DOM.Document as Export hiding (createElement, createElement_, createElementNS, createElementNS_) #else-  module Graphics.UI.Gtk.WebKit.DOM.Document+#ifdef  MIN_VERSION_ghcjs_dom_jsffi+import qualified "ghcjs-dom-jsffi" GHCJS.DOM.Document as Raw (createElement, createElement_, createElementNS, createElementNS_)+import "ghcjs-dom-jsffi" GHCJS.DOM.Document as Export hiding (createElement, createElement_, createElementNS, createElementNS_)+#else+#if __GLASGOW_HASKELL__ >= 900+import qualified "ghcjs-dom-jsaddle" GHCJS.DOM.Document as Raw (createElement, createElement_, createElementNS, createElementNS_)+import "ghcjs-dom-jsaddle" GHCJS.DOM.Document as Export hiding (createElement, createElement_, createElementNS, createElementNS_)+#else+import qualified "jsaddle-dom" GHCJS.DOM.Document as Raw (createElement, createElement_, createElementNS, createElementNS_)+import "jsaddle-dom" GHCJS.DOM.Document as Export hiding (createElement, createElement_, createElementNS, createElementNS_) #endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.Document+#endif+#endif+++createElement+    :: (MonadDOM m, IsDocument doc, ToJSString localName, HasCallStack)+    => doc+    -> localName+    -> m Element+createElement doc localName = do+    e <- Raw.createElement doc localName+    let cs = getCallStack callStack+    setAttribute e ("hs-creator"::JSString) . show =<< cacheStack cs+    return e++createElement_+    :: (MonadDOM m, IsDocument doc, ToJSString localName, HasCallStack)+    => doc+    -> localName+    -> m ()+createElement_ doc localName = void $ createElement doc localName++createElementNS+    :: (MonadDOM m, IsDocument doc, ToJSString namespaceURI, ToJSString qualifiedName, HasCallStack)+    => doc+    -> Maybe namespaceURI+    -> qualifiedName+    -> m Element+createElementNS doc namespaceURI qualifiedName = do+    e <- Raw.createElementNS doc namespaceURI qualifiedName+    setAttribute e ("haskell-stack"::JSString) . show =<< cacheStack (getCallStack callStack)+    return e++createElementNS_+    :: (MonadDOM m, IsDocument doc, ToJSString namespaceURI, ToJSString qualifiedName, HasCallStack)+    => doc+    -> Maybe namespaceURI+    -> qualifiedName+    -> m ()+createElementNS_ doc namespaceURI qualifiedName = void $ createElementNS doc namespaceURI qualifiedName+ #else-import Graphics.UI.Gtk.WebKit.DOM.Document++#ifdef MIN_VERSION_ghcjs_dom_javascript+import "ghcjs-dom-javascript" GHCJS.DOM.Document (createElement, createElement_, createElementNS, createElementNS_)+import "ghcjs-dom-javascript" GHCJS.DOM.Document as Export hiding (createElement, createElement_, createElementNS, createElementNS_)+#else+#ifdef MIN_VERSION_ghcjs_dom_jsffi+import "ghcjs-dom-jsffi" GHCJS.DOM.Document (createElement, createElement_, createElementNS, createElementNS_)+import "ghcjs-dom-jsffi" GHCJS.DOM.Document as Export hiding (createElement, createElement_, createElementNS, createElementNS_)+#else+#if __GLASGOW_HASKELL__ >= 900+import "ghcjs-dom-jsaddle" GHCJS.DOM.Document (createElement, createElement_, createElementNS, createElementNS_)+import "ghcjs-dom-jsaddle" GHCJS.DOM.Document as Export hiding (createElement, createElement_, createElementNS, createElementNS_)+#else+import "jsaddle-dom" GHCJS.DOM.Document (createElement, createElement_, createElementNS, createElementNS_)+import "jsaddle-dom" GHCJS.DOM.Document as Export hiding (createElement, createElement_, createElementNS, createElementNS_)+#endif+#endif+#endif+ #endif

− src/GHCJS/DOM/DocumentFragment.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.DocumentFragment (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.DocumentFragment-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.DocumentFragment-#else-#endif

− src/GHCJS/DOM/DocumentType.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.DocumentType (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.DocumentType-#else-  module Graphics.UI.Gtk.WebKit.DOM.DocumentType-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.DocumentType-#else-import Graphics.UI.Gtk.WebKit.DOM.DocumentType-#endif

− src/GHCJS/DOM/DynamicsCompressorNode.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.DynamicsCompressorNode (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.DynamicsCompressorNode-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.DynamicsCompressorNode-#else-#endif

− src/GHCJS/DOM/EXTBlendMinMax.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.EXTBlendMinMax (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.EXTBlendMinMax-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.EXTBlendMinMax-#else-#endif

− src/GHCJS/DOM/EXTTextureFilterAnisotropic.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.EXTTextureFilterAnisotropic (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.EXTTextureFilterAnisotropic-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.EXTTextureFilterAnisotropic-#else-#endif

− src/GHCJS/DOM/EXTsRGB.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.EXTsRGB (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.EXTsRGB-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.EXTsRGB-#else-#endif

− src/GHCJS/DOM/Element.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.Element (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.Element-#else-  module Graphics.UI.Gtk.WebKit.DOM.Element-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.Element-#else-import Graphics.UI.Gtk.WebKit.DOM.Element-#endif

− src/GHCJS/DOM/Entity.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.Entity (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.Entity-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.Entity-#else-#endif

− src/GHCJS/DOM/Enums.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.Enums (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.Enums-#else-  module Graphics.UI.Gtk.WebKit.DOM.Enums-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.Enums-#else-import Graphics.UI.Gtk.WebKit.DOM.Enums-#endif

− src/GHCJS/DOM/ErrorEvent.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.ErrorEvent (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.ErrorEvent-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.ErrorEvent-#else-#endif

− src/GHCJS/DOM/Event.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.Event (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.Event-#else-  module Graphics.UI.Gtk.WebKit.DOM.Event-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.Event-#else-import Graphics.UI.Gtk.WebKit.DOM.Event-#endif

− src/GHCJS/DOM/EventListener.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.EventListener (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.EventListener-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.EventListener-#else-#endif

− src/GHCJS/DOM/EventM.hs

@@ -1,297 +0,0 @@-{-# LANGUAGE ConstraintKinds #-}-module GHCJS.DOM.EventM-(-  EventM(..)-, SaferEventListener(..)-, EventName-, newListener-, newListenerSync-, newListenerAsync-, addListener-, removeListener-, releaseListener-, on-, event-, eventTarget-, target-, eventCurrentTarget-, eventPhase-, bubbles-, cancelable-, timeStamp-, stopPropagation-, preventDefault-, defaultPrevented-, stopImmediatePropagation-, srcElement-, getCancelBubble-, cancelBubble-, getReturnValue-, returnValue-, uiView-, uiDetail-, uiKeyCode-, uiCharCode-, uiLayerX-, uiLayerY-, uiLayerXY-, uiPageX-, uiPageY-, uiPageXY-, uiWhich-, mouseScreenX-, mouseScreenY-, mouseScreenXY-, mouseClientX-, mouseClientY-, mouseClientXY-, mouseMovementX-, mouseMovementY-, mouseMovementXY-, mouseCtrlKey-, mouseShiftKey-, mouseAltKey-, mouseMetaKey-, mouseButton-, mouseRelatedTarget-, mouseOffsetX-, mouseOffsetY-, mouseOffsetXY-, mouseX-, mouseY-, mouseXY-, mouseFromElement-, mouseToElement-)-where-import           Control.Applicative ((<$>))-import           Control.Monad.Trans.Reader (ReaderT, ask, runReaderT)-import           Control.Monad.IO.Class (MonadIO(..))-import           GHCJS.DOM.Types-import qualified GHCJS.DOM.Event as Event-import qualified GHCJS.DOM.UIEvent as UIEvent-import qualified GHCJS.DOM.MouseEvent as MouseEvent-import           GHCJS.DOM.EventTarget-import           GHCJS.DOM.EventTargetClosures-import           Data.Word (Word)-import           Data.Foldable (forM_)--type EventM t e = ReaderT e IO--newListener :: (IsEvent e) => EventM t e () -> IO (SaferEventListener t e)-newListener f = SaferEventListener <$> eventListenerNew (runReaderT f)--newListenerSync :: (IsEvent e) => EventM t e () -> IO (SaferEventListener t e)-newListenerSync f = SaferEventListener <$> eventListenerNewSync (runReaderT f)--newListenerAsync :: (IsEvent e) => EventM t e () -> IO (SaferEventListener t e)-newListenerAsync f = SaferEventListener <$> eventListenerNewAsync (runReaderT f)--addListener :: (IsEventTarget t, IsEvent e) => t -> EventName t e -> SaferEventListener t e -> Bool -> IO ()-addListener target (EventName eventName) (SaferEventListener l) useCapture =-    addEventListener target eventName (Just l) useCapture--removeListener :: (IsEventTarget t, IsEvent e) => t -> EventName t e -> SaferEventListener t e -> Bool -> IO ()-removeListener target (EventName eventName) (SaferEventListener l) useCapture =-    removeEventListener target eventName (Just l) useCapture--releaseListener :: (IsEventTarget t, IsEvent e) => SaferEventListener t e -> IO ()-releaseListener (SaferEventListener l) = eventListenerRelease l--on :: (IsEventTarget t, IsEvent e) => t -> EventName t e -> EventM t e () -> IO (IO ())-on target eventName callback = do-    l <- newListener callback-    addListener target eventName l False-    return (removeListener target eventName l False >> releaseListener l)--onThese :: (IsEventTarget t, IsEvent e) => [(t, EventName t e)] -> EventM t e () -> IO (IO ())-onThese targetsAndEventNames callback = do-    l <- newListener callback-    forM_ targetsAndEventNames $ \(target, eventName) ->-        addListener target eventName l False-    return (do-        forM_ targetsAndEventNames (\(target, eventName) ->-            removeListener target eventName l False)-        releaseListener l)--event :: EventM t e e-event = ask--eventTarget :: IsEvent e => EventM t e (Maybe EventTarget)-eventTarget = event >>= Event.getTarget--target :: (IsEvent e, IsGObject t) => EventM t e (Maybe t)-target = (fmap (unsafeCastGObject . toGObject)) <$> eventTarget--eventCurrentTarget :: IsEvent e => EventM t e (Maybe EventTarget)-eventCurrentTarget = event >>= Event.getCurrentTarget--eventPhase :: IsEvent e => EventM t e Word-eventPhase = event >>= Event.getEventPhase--bubbles :: IsEvent e => EventM t e Bool-bubbles = event >>= Event.getBubbles--cancelable :: IsEvent e => EventM t e Bool-cancelable = event >>= Event.getCancelable--timeStamp :: IsEvent e => EventM t e Word-timeStamp = event >>= Event.getTimeStamp--stopPropagation :: IsEvent e => EventM t e ()-stopPropagation = event >>= Event.stopPropagation--preventDefault :: IsEvent e => EventM t e ()-preventDefault = event >>= Event.preventDefault--defaultPrevented :: IsEvent e => EventM t e Bool-defaultPrevented = event >>= Event.getDefaultPrevented--stopImmediatePropagation :: IsEvent e => EventM t e ()-stopImmediatePropagation = event >>= Event.stopImmediatePropagation--srcElement :: IsEvent e => EventM t e (Maybe EventTarget)-srcElement = event >>= Event.getSrcElement--getCancelBubble :: IsEvent e => EventM t e Bool-getCancelBubble = event >>= Event.getCancelBubble--cancelBubble :: IsEvent e => Bool -> EventM t e ()-cancelBubble f = event >>= flip Event.setCancelBubble f--getReturnValue :: IsEvent e => EventM t e Bool-getReturnValue = event >>= Event.getReturnValue--returnValue :: IsEvent e => Bool -> EventM t e ()-returnValue f = event >>= flip Event.setReturnValue f--uiView :: IsUIEvent e => EventM t e (Maybe Window)-uiView = event >>= UIEvent.getView--uiDetail :: IsUIEvent e => EventM t e Int-uiDetail = event >>= UIEvent.getDetail--uiKeyCode :: IsUIEvent e => EventM t e Int-uiKeyCode = event >>= UIEvent.getKeyCode--uiCharCode :: IsUIEvent e => EventM t e Int-uiCharCode = event >>= UIEvent.getCharCode--uiLayerX :: IsUIEvent e => EventM t e Int-uiLayerX = event >>= UIEvent.getLayerX--uiLayerY :: IsUIEvent e => EventM t e Int-uiLayerY = event >>= UIEvent.getLayerY--uiLayerXY :: IsUIEvent e => EventM t e (Int, Int)-uiLayerXY = do-    e <- event-    x <- UIEvent.getLayerX e-    y <- UIEvent.getLayerY e-    return (x, y)--uiPageX :: IsUIEvent e => EventM t e Int-uiPageX = event >>= UIEvent.getPageX--uiPageY :: IsUIEvent e => EventM t e Int-uiPageY = event >>= UIEvent.getPageY--uiPageXY :: IsUIEvent e => EventM t e (Int, Int)-uiPageXY = do-    e <- event-    x <- UIEvent.getPageX e-    y <- UIEvent.getPageY e-    return (x, y)--uiWhich :: IsUIEvent e => EventM t e Int-uiWhich = event >>= UIEvent.getWhich--mouseScreenX :: IsMouseEvent e => EventM t e Int-mouseScreenX = event >>= MouseEvent.getScreenX--mouseScreenY :: IsMouseEvent e => EventM t e Int-mouseScreenY = event >>= MouseEvent.getScreenY--mouseScreenXY :: IsMouseEvent e => EventM t e (Int, Int)-mouseScreenXY = do-    e <- event-    x <- MouseEvent.getScreenX e-    y <- MouseEvent.getScreenY e-    return (x, y)--mouseClientX :: IsMouseEvent e => EventM t e Int-mouseClientX = event >>= MouseEvent.getClientX--mouseClientY :: IsMouseEvent e => EventM t e Int-mouseClientY = event >>= MouseEvent.getClientY--mouseClientXY :: IsMouseEvent e => EventM t e (Int, Int)-mouseClientXY = do-    e <- event-    x <- MouseEvent.getClientX e-    y <- MouseEvent.getClientY e-    return (x, y)--mouseMovementX :: IsMouseEvent e => EventM t e Int-mouseMovementX = event >>= MouseEvent.getMovementX--mouseMovementY :: IsMouseEvent e => EventM t e Int-mouseMovementY = event >>= MouseEvent.getMovementY--mouseMovementXY :: IsMouseEvent e => EventM t e (Int, Int)-mouseMovementXY = do-    e <- event-    x <- MouseEvent.getMovementX e-    y <- MouseEvent.getMovementY e-    return (x, y)--mouseCtrlKey :: IsMouseEvent e => EventM t e Bool-mouseCtrlKey = event >>= MouseEvent.getCtrlKey--mouseShiftKey :: IsMouseEvent e => EventM t e Bool-mouseShiftKey = event >>= MouseEvent.getShiftKey--mouseAltKey :: IsMouseEvent e => EventM t e Bool-mouseAltKey = event >>= MouseEvent.getAltKey--mouseMetaKey :: IsMouseEvent e => EventM t e Bool-mouseMetaKey = event >>= MouseEvent.getMetaKey--mouseButton :: IsMouseEvent e => EventM t e Word-mouseButton = event >>= MouseEvent.getButton--mouseRelatedTarget :: IsMouseEvent e => EventM t e (Maybe EventTarget)-mouseRelatedTarget = event >>= MouseEvent.getRelatedTarget--mouseOffsetX :: IsMouseEvent e => EventM t e Int-mouseOffsetX = event >>= MouseEvent.getOffsetX--mouseOffsetY :: IsMouseEvent e => EventM t e Int-mouseOffsetY = event >>= MouseEvent.getOffsetY--mouseOffsetXY :: IsMouseEvent e => EventM t e (Int, Int)-mouseOffsetXY = do-    e <- event-    x <- MouseEvent.getOffsetX e-    y <- MouseEvent.getOffsetY e-    return (x, y)--mouseX :: IsMouseEvent e => EventM t e Int-mouseX = event >>= MouseEvent.getX--mouseY :: IsMouseEvent e => EventM t e Int-mouseY = event >>= MouseEvent.getY--mouseXY :: IsMouseEvent e => EventM t e (Int, Int)-mouseXY = do-    e <- event-    x <- MouseEvent.getX e-    y <- MouseEvent.getY e-    return (x, y)--mouseFromElement :: IsMouseEvent e => EventM t e (Maybe Node)-mouseFromElement = event >>= MouseEvent.getFromElement--mouseToElement :: IsMouseEvent e => EventM t e (Maybe Node)-mouseToElement = event >>= MouseEvent.getToElement-

− src/GHCJS/DOM/EventSource.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.EventSource (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.EventSource-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.EventSource-#else-#endif

− src/GHCJS/DOM/EventTarget.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.EventTarget (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.EventTarget-#else-  module Graphics.UI.Gtk.WebKit.DOM.EventTarget-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.EventTarget-#else-import Graphics.UI.Gtk.WebKit.DOM.EventTarget-#endif

− src/GHCJS/DOM/EventTargetClosures.hs

@@ -1,46 +0,0 @@-{-# LANGUAGE CPP #-}-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-{-# LANGUAGE JavaScriptFFI, ForeignFunctionInterface #-}-module GHCJS.DOM.EventTargetClosures-       (EventName(..), SaferEventListener(..), unsafeEventName, eventListenerNew, eventListenerNewSync, eventListenerNewAsync, eventListenerRelease) where--import Control.Applicative ((<$>))-import GHCJS.Types-import GHCJS.Foreign.Callback.Internal-import GHCJS.Foreign.Callback-import GHCJS.Marshal.Pure-import GHCJS.DOM.Types-import GHCJS.Foreign.Callback.Internal--newtype EventName t e = EventName DOMString-newtype SaferEventListener t e = SaferEventListener EventListener--instance PToJSVal (SaferEventListener t e) where-    pToJSVal (SaferEventListener l) = pToJSVal l-    {-# INLINE pToJSVal #-}--instance PFromJSVal (SaferEventListener t e) where-    pFromJSVal = SaferEventListener . pFromJSVal-    {-# INLINE pFromJSVal #-}--unsafeEventName :: DOMString -> EventName t e-unsafeEventName = EventName--eventListenerNew :: IsEvent event => (event -> IO ()) -> IO EventListener-eventListenerNew callback = (EventListener . jsval) <$> syncCallback1 ContinueAsync (callback . unsafeCastGObject . GObject)--eventListenerNewSync :: IsEvent event => (event -> IO ()) -> IO EventListener-eventListenerNewSync callback = (EventListener . jsval) <$> syncCallback1 ThrowWouldBlock (callback . unsafeCastGObject . GObject)--eventListenerNewAsync :: IsEvent event => (event -> IO ()) -> IO EventListener-eventListenerNewAsync callback = (EventListener . jsval) <$> asyncCallback1 (callback . unsafeCastGObject . GObject)--eventListenerRelease :: EventListener -> IO ()-eventListenerRelease (EventListener ref) = releaseCallback (Callback ref)--#else-module GHCJS.DOM.EventTargetClosures (-  module Graphics.UI.Gtk.WebKit.DOM.EventTargetClosures-  ) where-import Graphics.UI.Gtk.WebKit.DOM.EventTargetClosures-#endif

− src/GHCJS/DOM/File.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.File (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.File-#else-  module Graphics.UI.Gtk.WebKit.DOM.File-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.File-#else-import Graphics.UI.Gtk.WebKit.DOM.File-#endif

− src/GHCJS/DOM/FileError.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.FileError (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.FileError-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.FileError-#else-#endif

− src/GHCJS/DOM/FileList.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.FileList (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.FileList-#else-  module Graphics.UI.Gtk.WebKit.DOM.FileList-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.FileList-#else-import Graphics.UI.Gtk.WebKit.DOM.FileList-#endif

− src/GHCJS/DOM/FileReader.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.FileReader (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.FileReader-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.FileReader-#else-#endif

− src/GHCJS/DOM/FileReaderSync.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.FileReaderSync (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.FileReaderSync-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.FileReaderSync-#else-#endif

− src/GHCJS/DOM/FocusEvent.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.FocusEvent (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.FocusEvent-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.FocusEvent-#else-#endif

− src/GHCJS/DOM/FontLoader.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.FontLoader (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.FontLoader-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.FontLoader-#else-#endif

− src/GHCJS/DOM/FormData.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.FormData (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.FormData-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.FormData-#else-#endif

− src/GHCJS/DOM/GainNode.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.GainNode (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.GainNode-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.GainNode-#else-#endif

− src/GHCJS/DOM/Gamepad.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.Gamepad (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.Gamepad-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.Gamepad-#else-#endif

− src/GHCJS/DOM/GamepadButton.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.GamepadButton (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.GamepadButton-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.GamepadButton-#else-#endif

− src/GHCJS/DOM/GamepadEvent.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.GamepadEvent (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.GamepadEvent-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.GamepadEvent-#else-#endif

− src/GHCJS/DOM/Geolocation.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.Geolocation (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Geolocation-#else-  module Graphics.UI.Gtk.WebKit.DOM.Geolocation-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Geolocation-#else-import Graphics.UI.Gtk.WebKit.DOM.Geolocation-#endif

− src/GHCJS/DOM/Geoposition.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.Geoposition (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.Geoposition-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.Geoposition-#else-#endif

− src/GHCJS/DOM/HTMLAllCollection.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLAllCollection (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLAllCollection-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLAllCollection-#else-#endif

− src/GHCJS/DOM/HTMLAnchorElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLAnchorElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLAnchorElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLAnchorElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLAnchorElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLAnchorElement-#endif

− src/GHCJS/DOM/HTMLAppletElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLAppletElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLAppletElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLAppletElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLAppletElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLAppletElement-#endif

− src/GHCJS/DOM/HTMLAreaElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLAreaElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLAreaElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLAreaElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLAreaElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLAreaElement-#endif

− src/GHCJS/DOM/HTMLBRElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLBRElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLBRElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLBRElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLBRElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLBRElement-#endif

− src/GHCJS/DOM/HTMLBaseElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLBaseElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLBaseElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLBaseElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLBaseElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLBaseElement-#endif

− src/GHCJS/DOM/HTMLBaseFontElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLBaseFontElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLBaseFontElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLBaseFontElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLBaseFontElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLBaseFontElement-#endif

− src/GHCJS/DOM/HTMLBodyElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLBodyElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLBodyElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLBodyElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLBodyElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLBodyElement-#endif

− src/GHCJS/DOM/HTMLButtonElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLButtonElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLButtonElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLButtonElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLButtonElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLButtonElement-#endif

− src/GHCJS/DOM/HTMLCanvasElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLCanvasElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLCanvasElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLCanvasElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLCanvasElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLCanvasElement-#endif

− src/GHCJS/DOM/HTMLCollection.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLCollection (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLCollection-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLCollection-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLCollection-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLCollection-#endif

− src/GHCJS/DOM/HTMLDListElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLDListElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLDListElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLDListElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLDListElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLDListElement-#endif

− src/GHCJS/DOM/HTMLDataListElement.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLDataListElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLDataListElement-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLDataListElement-#else-#endif

− src/GHCJS/DOM/HTMLDetailsElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLDetailsElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLDetailsElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLDetailsElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLDetailsElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLDetailsElement-#endif

− src/GHCJS/DOM/HTMLDirectoryElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLDirectoryElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLDirectoryElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLDirectoryElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLDirectoryElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLDirectoryElement-#endif

− src/GHCJS/DOM/HTMLDivElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLDivElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLDivElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLDivElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLDivElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLDivElement-#endif

− src/GHCJS/DOM/HTMLDocument.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLDocument (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLDocument-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLDocument-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLDocument-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLDocument-#endif

− src/GHCJS/DOM/HTMLElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLElement-#endif

− src/GHCJS/DOM/HTMLEmbedElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLEmbedElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLEmbedElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLEmbedElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLEmbedElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLEmbedElement-#endif

− src/GHCJS/DOM/HTMLFieldSetElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLFieldSetElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLFieldSetElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLFieldSetElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLFieldSetElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLFieldSetElement-#endif

− src/GHCJS/DOM/HTMLFontElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLFontElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLFontElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLFontElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLFontElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLFontElement-#endif

− src/GHCJS/DOM/HTMLFormControlsCollection.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLFormControlsCollection (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLFormControlsCollection-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLFormControlsCollection-#else-#endif

− src/GHCJS/DOM/HTMLFormElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLFormElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLFormElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLFormElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLFormElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLFormElement-#endif

− src/GHCJS/DOM/HTMLFrameElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLFrameElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLFrameElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLFrameElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLFrameElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLFrameElement-#endif

− src/GHCJS/DOM/HTMLFrameSetElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLFrameSetElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLFrameSetElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLFrameSetElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLFrameSetElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLFrameSetElement-#endif

− src/GHCJS/DOM/HTMLHRElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLHRElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLHRElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLHRElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLHRElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLHRElement-#endif

− src/GHCJS/DOM/HTMLHeadElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLHeadElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLHeadElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLHeadElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLHeadElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLHeadElement-#endif

− src/GHCJS/DOM/HTMLHeadingElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLHeadingElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLHeadingElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLHeadingElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLHeadingElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLHeadingElement-#endif

− src/GHCJS/DOM/HTMLHtmlElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLHtmlElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLHtmlElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLHtmlElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLHtmlElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLHtmlElement-#endif

− src/GHCJS/DOM/HTMLIFrameElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLIFrameElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLIFrameElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLIFrameElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLIFrameElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLIFrameElement-#endif

− src/GHCJS/DOM/HTMLImageElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLImageElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLImageElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLImageElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLImageElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLImageElement-#endif

− src/GHCJS/DOM/HTMLInputElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLInputElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLInputElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLInputElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLInputElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLInputElement-#endif

− src/GHCJS/DOM/HTMLKeygenElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLKeygenElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLKeygenElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLKeygenElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLKeygenElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLKeygenElement-#endif

− src/GHCJS/DOM/HTMLLIElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLLIElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLLIElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLLIElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLLIElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLLIElement-#endif

− src/GHCJS/DOM/HTMLLabelElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLLabelElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLLabelElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLLabelElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLLabelElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLLabelElement-#endif

− src/GHCJS/DOM/HTMLLegendElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLLegendElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLLegendElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLLegendElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLLegendElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLLegendElement-#endif

− src/GHCJS/DOM/HTMLLinkElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLLinkElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLLinkElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLLinkElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLLinkElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLLinkElement-#endif

− src/GHCJS/DOM/HTMLMapElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLMapElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLMapElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLMapElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLMapElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLMapElement-#endif

− src/GHCJS/DOM/HTMLMarqueeElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLMarqueeElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLMarqueeElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLMarqueeElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLMarqueeElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLMarqueeElement-#endif

− src/GHCJS/DOM/HTMLMediaElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLMediaElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLMediaElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLMediaElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLMediaElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLMediaElement-#endif

− src/GHCJS/DOM/HTMLMenuElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLMenuElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLMenuElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLMenuElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLMenuElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLMenuElement-#endif

− src/GHCJS/DOM/HTMLMetaElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLMetaElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLMetaElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLMetaElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLMetaElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLMetaElement-#endif

− src/GHCJS/DOM/HTMLMeterElement.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLMeterElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLMeterElement-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLMeterElement-#else-#endif

− src/GHCJS/DOM/HTMLModElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLModElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLModElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLModElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLModElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLModElement-#endif

− src/GHCJS/DOM/HTMLOListElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLOListElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLOListElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLOListElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLOListElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLOListElement-#endif

− src/GHCJS/DOM/HTMLObjectElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLObjectElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLObjectElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLObjectElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLObjectElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLObjectElement-#endif

− src/GHCJS/DOM/HTMLOptGroupElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLOptGroupElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLOptGroupElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLOptGroupElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLOptGroupElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLOptGroupElement-#endif

− src/GHCJS/DOM/HTMLOptionElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLOptionElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLOptionElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLOptionElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLOptionElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLOptionElement-#endif

− src/GHCJS/DOM/HTMLOptionsCollection.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLOptionsCollection (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLOptionsCollection-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLOptionsCollection-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLOptionsCollection-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLOptionsCollection-#endif

− src/GHCJS/DOM/HTMLOutputElement.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLOutputElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLOutputElement-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLOutputElement-#else-#endif

− src/GHCJS/DOM/HTMLParagraphElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLParagraphElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLParagraphElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLParagraphElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLParagraphElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLParagraphElement-#endif

− src/GHCJS/DOM/HTMLParamElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLParamElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLParamElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLParamElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLParamElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLParamElement-#endif

− src/GHCJS/DOM/HTMLPreElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLPreElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLPreElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLPreElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLPreElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLPreElement-#endif

− src/GHCJS/DOM/HTMLProgressElement.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLProgressElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLProgressElement-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLProgressElement-#else-#endif

− src/GHCJS/DOM/HTMLQuoteElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLQuoteElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLQuoteElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLQuoteElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLQuoteElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLQuoteElement-#endif

− src/GHCJS/DOM/HTMLScriptElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLScriptElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLScriptElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLScriptElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLScriptElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLScriptElement-#endif

− src/GHCJS/DOM/HTMLSelectElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLSelectElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLSelectElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLSelectElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLSelectElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLSelectElement-#endif

− src/GHCJS/DOM/HTMLSourceElement.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLSourceElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLSourceElement-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLSourceElement-#else-#endif

− src/GHCJS/DOM/HTMLStyleElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLStyleElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLStyleElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLStyleElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLStyleElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLStyleElement-#endif

− src/GHCJS/DOM/HTMLTableCaptionElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLTableCaptionElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLTableCaptionElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLTableCaptionElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLTableCaptionElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLTableCaptionElement-#endif

− src/GHCJS/DOM/HTMLTableCellElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLTableCellElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLTableCellElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLTableCellElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLTableCellElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLTableCellElement-#endif

− src/GHCJS/DOM/HTMLTableColElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLTableColElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLTableColElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLTableColElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLTableColElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLTableColElement-#endif

− src/GHCJS/DOM/HTMLTableElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLTableElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLTableElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLTableElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLTableElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLTableElement-#endif

− src/GHCJS/DOM/HTMLTableRowElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLTableRowElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLTableRowElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLTableRowElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLTableRowElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLTableRowElement-#endif

− src/GHCJS/DOM/HTMLTableSectionElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLTableSectionElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLTableSectionElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLTableSectionElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLTableSectionElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLTableSectionElement-#endif

− src/GHCJS/DOM/HTMLTemplateElement.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLTemplateElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLTemplateElement-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLTemplateElement-#else-#endif

− src/GHCJS/DOM/HTMLTextAreaElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLTextAreaElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLTextAreaElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLTextAreaElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLTextAreaElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLTextAreaElement-#endif

− src/GHCJS/DOM/HTMLTitleElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLTitleElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLTitleElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLTitleElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLTitleElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLTitleElement-#endif

− src/GHCJS/DOM/HTMLTrackElement.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLTrackElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLTrackElement-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLTrackElement-#else-#endif

− src/GHCJS/DOM/HTMLUListElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLUListElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLUListElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLUListElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLUListElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLUListElement-#endif

− src/GHCJS/DOM/HTMLVideoElement.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HTMLVideoElement (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HTMLVideoElement-#else-  module Graphics.UI.Gtk.WebKit.DOM.HTMLVideoElement-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HTMLVideoElement-#else-import Graphics.UI.Gtk.WebKit.DOM.HTMLVideoElement-#endif

− src/GHCJS/DOM/HashChangeEvent.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.HashChangeEvent (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.HashChangeEvent-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.HashChangeEvent-#else-#endif

− src/GHCJS/DOM/History.hs

@@ -1,13 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.History (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.History-#else-  module Graphics.UI.Gtk.WebKit.DOM.History-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.History-#else-import Graphics.UI.Gtk.WebKit.DOM.History-#endif

− src/GHCJS/DOM/IDBCursor.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.IDBCursor (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.IDBCursor-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.IDBCursor-#else-#endif

− src/GHCJS/DOM/IDBCursorWithValue.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.IDBCursorWithValue (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.IDBCursorWithValue-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.IDBCursorWithValue-#else-#endif

− src/GHCJS/DOM/IDBDatabase.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.IDBDatabase (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.IDBDatabase-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.IDBDatabase-#else-#endif

− src/GHCJS/DOM/IDBFactory.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.IDBFactory (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.IDBFactory-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.IDBFactory-#else-#endif

− src/GHCJS/DOM/IDBIndex.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.IDBIndex (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.IDBIndex-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.IDBIndex-#else-#endif

− src/GHCJS/DOM/IDBKeyRange.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.IDBKeyRange (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.IDBKeyRange-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.IDBKeyRange-#else-#endif

− src/GHCJS/DOM/IDBObjectStore.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.IDBObjectStore (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.IDBObjectStore-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.IDBObjectStore-#else-#endif

− src/GHCJS/DOM/IDBOpenDBRequest.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.IDBOpenDBRequest (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.IDBOpenDBRequest-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.IDBOpenDBRequest-#else-#endif

− src/GHCJS/DOM/IDBRequest.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.IDBRequest (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.IDBRequest-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.IDBRequest-#else-#endif

− src/GHCJS/DOM/IDBTransaction.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.IDBTransaction (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.IDBTransaction-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.IDBTransaction-#else-#endif

− src/GHCJS/DOM/IDBVersionChangeEvent.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.IDBVersionChangeEvent (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.IDBVersionChangeEvent-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.IDBVersionChangeEvent-#else-#endif

− src/GHCJS/DOM/ImageData.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.ImageData (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.ImageData-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.ImageData-#else-#endif

− src/GHCJS/DOM/InspectorFrontendHost.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.InspectorFrontendHost (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.InspectorFrontendHost-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.InspectorFrontendHost-#else-#endif

− src/GHCJS/DOM/InternalSettings.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.InternalSettings (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.InternalSettings-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.InternalSettings-#else-#endif

− src/GHCJS/DOM/Internals.hs

@@ -1,11 +0,0 @@-{-# LANGUAGE CPP #-}-module GHCJS.DOM.Internals (-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-  module GHCJS.DOM.JSFFI.Generated.Internals-#else-#endif-  ) where-#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)-import GHCJS.DOM.JSFFI.Generated.Internals-#else-#endif

− src/GHCJS/DOM/JSFFI/AudioContext.hs

@@ -1,35 +0,0 @@-{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.AudioContext (-    module Generated-  , DecodeAudioError(..)-  , js_decodeAudioData-  , decodeAudioData-) where--import Control.Exception (Exception(..), throwIO)-import Control.Monad.IO.Class (MonadIO(..))--import GHCJS.Types (JSVal)-import GHCJS.Foreign (jsNull)-import GHCJS.Marshal (fromJSVal, fromJSValUnchecked)-import GHCJS.Foreign.Callback (releaseCallback)-import GHCJS.DOM.Types--import GHCJS.DOM.JSFFI.Generated.AudioContext as Generated hiding (js_decodeAudioData, decodeAudioData)--data DecodeAudioError = DecodeAudioError deriving (Show, Eq)--instance Exception DecodeAudioError--foreign import javascript interruptible-        "$1[\"decodeAudioData\"]($2, $c, function() { $c(null); });" js_decodeAudioData ::-        AudioContext -> ArrayBuffer -> IO (Nullable AudioBuffer)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.decodeAudioData Mozilla AudioContext.decodeAudioData documentation>-decodeAudioData :: (MonadIO m, IsAudioContext self, IsArrayBuffer audioData) =>-                   self -> audioData -> m AudioBuffer-decodeAudioData self audioData = liftIO $ nullableToMaybe <$> js_decodeAudioData-        (toAudioContext self)-        (toArrayBuffer audioData)-            >>= maybe (throwIO DecodeAudioError) return-

− src/GHCJS/DOM/JSFFI/DOMError.hs

@@ -1,20 +0,0 @@-{-# LANGUAGE RecordWildCards #-}-module GHCJS.DOM.JSFFI.DOMError (-    module Generated-  , DOMErrorException(..)-  , throwDOMErrorException-) where--import Control.Exception (Exception, throwIO)-import Control.Monad.IO.Class (MonadIO(..))--import GHCJS.DOM.JSFFI.Generated.DOMError as Generated--data DOMErrorException = DOMErrorException { domErrorName :: String } deriving (Show, Eq)--instance Exception DOMErrorException--throwDOMErrorException :: MonadIO m => DOMError -> m a-throwDOMErrorException error = do-    domErrorName <- getName error-    liftIO $ throwIO DOMErrorException{..}

− src/GHCJS/DOM/JSFFI/Database.hs

@@ -1,75 +0,0 @@-{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Database (-    module Generated-  , js_changeVersion-  , changeVersion'-  , changeVersion-  , js_transaction-  , transaction'-  , transaction-  , js_readTransaction-  , readTransaction'-  , readTransaction-) where--import Data.Maybe (fromJust, maybe)--import Control.Monad.IO.Class (MonadIO(..))-import Control.Exception (Exception, bracket)--import GHCJS.Types (JSVal, JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (OnBlocked(..))-import GHCJS.Marshal (fromJSVal)-import GHCJS.Marshal.Pure (pToJSVal)-import GHCJS.Foreign.Callback (releaseCallback)-import GHCJS.DOM.Types--import GHCJS.DOM.JSFFI.SQLError (throwSQLException)-import GHCJS.DOM.JSFFI.Generated.SQLTransactionCallback (newSQLTransactionCallbackSync)-import GHCJS.DOM.JSFFI.Generated.Database as Generated hiding (js_changeVersion, changeVersion, js_transaction, transaction, js_readTransaction, readTransaction)--withSQLTransactionCallback :: (SQLTransaction -> IO ()) -> (SQLTransactionCallback -> IO a) -> IO a-withSQLTransactionCallback f = bracket (newSQLTransactionCallbackSync (f . fromJust)) (\(SQLTransactionCallback c) -> releaseCallback c)--foreign import javascript interruptible-        "$1[\"changeVersion\"]($2, $3, $4, $c, function() { $c(null); });"-        js_changeVersion :: Database -> JSString -> JSString -> Nullable SQLTransactionCallback -> IO (Nullable SQLError)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Database.changeVersion Mozilla Database.changeVersion documentation>-changeVersion' :: (MonadIO m, ToJSString oldVersion, ToJSString newVersion) =>-                  Database -> oldVersion -> newVersion -> Maybe (SQLTransaction -> IO ()) -> m (Maybe SQLError)-changeVersion' self oldVersion newVersion Nothing = liftIO $ nullableToMaybe <$>-    js_changeVersion self (toJSString oldVersion) (toJSString newVersion) (Nullable jsNull)-changeVersion' self oldVersion newVersion (Just callback) = liftIO $ nullableToMaybe <$>-    withSQLTransactionCallback callback-        (js_changeVersion self (toJSString oldVersion) (toJSString newVersion) . Nullable . pToJSVal)--changeVersion :: (MonadIO m, ToJSString oldVersion, ToJSString newVersion) =>-                 Database -> oldVersion -> newVersion -> Maybe (SQLTransaction -> IO ()) -> m ()-changeVersion self oldVersion newVersion callback =-    changeVersion' self oldVersion newVersion callback >>= maybe (return ()) throwSQLException--foreign import javascript interruptible "$1[\"transaction\"]($2, $c, function() { $c(null); });"-        js_transaction :: Database -> SQLTransactionCallback -> IO (Nullable SQLError)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Database.transaction Mozilla Database.transaction documentation>-transaction' :: (MonadIO m) => Database -> (SQLTransaction -> IO ()) -> m (Maybe SQLError)-transaction' self callback = liftIO $ nullableToMaybe <$>-    withSQLTransactionCallback callback-        (js_transaction self)--transaction :: (MonadIO m) => Database -> (SQLTransaction -> IO ()) -> m ()-transaction self callback = transaction' self callback >>= maybe (return ()) throwSQLException--foreign import javascript interruptible-        "$1[\"readTransaction\"]($2, $c, function() { $c(null); });"-        js_readTransaction :: Database -> SQLTransactionCallback -> IO (Nullable SQLError)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Database.readTransaction Mozilla Database.readTransaction documentation>-readTransaction' :: (MonadIO m) => Database -> (SQLTransaction -> IO ()) -> m (Maybe SQLError)-readTransaction' self callback = liftIO $ nullableToMaybe <$>-      withSQLTransactionCallback callback (js_readTransaction self)--readTransaction :: (MonadIO m) => Database -> (SQLTransaction -> IO ()) -> m ()-readTransaction self callback = readTransaction' self callback >>= maybe (return ()) throwSQLException

− src/GHCJS/DOM/JSFFI/Generated/ANGLEInstancedArrays.hs

@@ -1,63 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.ANGLEInstancedArrays-       (js_drawArraysInstancedANGLE, drawArraysInstancedANGLE,-        js_drawElementsInstancedANGLE, drawElementsInstancedANGLE,-        js_vertexAttribDivisorANGLE, vertexAttribDivisorANGLE,-        pattern VERTEX_ATTRIB_ARRAY_DIVISOR_ANGLE, ANGLEInstancedArrays,-        castToANGLEInstancedArrays, gTypeANGLEInstancedArrays)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe-        "$1[\"drawArraysInstancedANGLE\"]($2,\n$3, $4, $5)"-        js_drawArraysInstancedANGLE ::-        ANGLEInstancedArrays -> Word -> Int -> Int -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/ANGLEInstancedArrays.drawArraysInstancedANGLE Mozilla ANGLEInstancedArrays.drawArraysInstancedANGLE documentation> -drawArraysInstancedANGLE ::-                         (MonadIO m) =>-                           ANGLEInstancedArrays -> Word -> Int -> Int -> Int -> m ()-drawArraysInstancedANGLE self mode first count primcount-  = liftIO-      (js_drawArraysInstancedANGLE (self) mode first count primcount)- -foreign import javascript unsafe-        "$1[\"drawElementsInstancedANGLE\"]($2,\n$3, $4, $5, $6)"-        js_drawElementsInstancedANGLE ::-        ANGLEInstancedArrays ->-          Word -> Int -> Word -> Double -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/ANGLEInstancedArrays.drawElementsInstancedANGLE Mozilla ANGLEInstancedArrays.drawElementsInstancedANGLE documentation> -drawElementsInstancedANGLE ::-                           (MonadIO m) =>-                             ANGLEInstancedArrays -> Word -> Int -> Word -> Int64 -> Int -> m ()-drawElementsInstancedANGLE self mode count type' offset primcount-  = liftIO-      (js_drawElementsInstancedANGLE (self) mode count type'-         (fromIntegral offset)-         primcount)- -foreign import javascript unsafe-        "$1[\"vertexAttribDivisorANGLE\"]($2,\n$3)"-        js_vertexAttribDivisorANGLE ::-        ANGLEInstancedArrays -> Word -> Word -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/ANGLEInstancedArrays.vertexAttribDivisorANGLE Mozilla ANGLEInstancedArrays.vertexAttribDivisorANGLE documentation> -vertexAttribDivisorANGLE ::-                         (MonadIO m) => ANGLEInstancedArrays -> Word -> Word -> m ()-vertexAttribDivisorANGLE self index divisor-  = liftIO (js_vertexAttribDivisorANGLE (self) index divisor)-pattern VERTEX_ATTRIB_ARRAY_DIVISOR_ANGLE = 35070

− src/GHCJS/DOM/JSFFI/Generated/AbstractView.hs

@@ -1,36 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.AbstractView-       (js_getDocument, getDocument, js_getStyleMedia, getStyleMedia,-        AbstractView, castToAbstractView, gTypeAbstractView)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"document\"]" js_getDocument-        :: AbstractView -> IO (Nullable Document)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AbstractView.document Mozilla AbstractView.document documentation> -getDocument :: (MonadIO m) => AbstractView -> m (Maybe Document)-getDocument self-  = liftIO (nullableToMaybe <$> (js_getDocument (self)))- -foreign import javascript unsafe "$1[\"styleMedia\"]"-        js_getStyleMedia :: AbstractView -> IO (Nullable StyleMedia)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AbstractView.styleMedia Mozilla AbstractView.styleMedia documentation> -getStyleMedia ::-              (MonadIO m) => AbstractView -> m (Maybe StyleMedia)-getStyleMedia self-  = liftIO (nullableToMaybe <$> (js_getStyleMedia (self)))

− src/GHCJS/DOM/JSFFI/Generated/AbstractWorker.hs

@@ -1,22 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.AbstractWorker-       (error, AbstractWorker, castToAbstractWorker, gTypeAbstractWorker)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums---- | <https://developer.mozilla.org/en-US/docs/Web/API/AbstractWorker.onerror Mozilla AbstractWorker.onerror documentation> -error :: EventName AbstractWorker UIEvent-error = unsafeEventName (toJSString "error")

− src/GHCJS/DOM/JSFFI/Generated/AllAudioCapabilities.hs

@@ -1,38 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.AllAudioCapabilities-       (js_getSourceId, getSourceId, js_getVolume, getVolume,-        AllAudioCapabilities, castToAllAudioCapabilities,-        gTypeAllAudioCapabilities)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"sourceId\"]" js_getSourceId-        :: AllAudioCapabilities -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/AllAudioCapabilities.sourceId Mozilla AllAudioCapabilities.sourceId documentation> -getSourceId ::-            (MonadIO m, FromJSString result) =>-              AllAudioCapabilities -> m [result]-getSourceId self-  = liftIO ((js_getSourceId (self)) >>= fromJSValUnchecked)- -foreign import javascript unsafe "$1[\"volume\"]" js_getVolume ::-        AllAudioCapabilities -> IO (Nullable CapabilityRange)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AllAudioCapabilities.volume Mozilla AllAudioCapabilities.volume documentation> -getVolume ::-          (MonadIO m) => AllAudioCapabilities -> m (Maybe CapabilityRange)-getVolume self = liftIO (nullableToMaybe <$> (js_getVolume (self)))

− src/GHCJS/DOM/JSFFI/Generated/AllVideoCapabilities.hs

@@ -1,88 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.AllVideoCapabilities-       (js_getSourceType, getSourceType, js_getSourceId, getSourceId,-        js_getWidth, getWidth, js_getHeight, getHeight, js_getFrameRate,-        getFrameRate, js_getAspectRatio, getAspectRatio, js_getFacingMode,-        getFacingMode, AllVideoCapabilities, castToAllVideoCapabilities,-        gTypeAllVideoCapabilities)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"sourceType\"]"-        js_getSourceType :: AllVideoCapabilities -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/AllVideoCapabilities.sourceType Mozilla AllVideoCapabilities.sourceType documentation> -getSourceType ::-              (MonadIO m, FromJSString result) =>-                AllVideoCapabilities -> m [result]-getSourceType self-  = liftIO ((js_getSourceType (self)) >>= fromJSValUnchecked)- -foreign import javascript unsafe "$1[\"sourceId\"]" js_getSourceId-        :: AllVideoCapabilities -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/AllVideoCapabilities.sourceId Mozilla AllVideoCapabilities.sourceId documentation> -getSourceId ::-            (MonadIO m, FromJSString result) =>-              AllVideoCapabilities -> m [result]-getSourceId self-  = liftIO ((js_getSourceId (self)) >>= fromJSValUnchecked)- -foreign import javascript unsafe "$1[\"width\"]" js_getWidth ::-        AllVideoCapabilities -> IO (Nullable CapabilityRange)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AllVideoCapabilities.width Mozilla AllVideoCapabilities.width documentation> -getWidth ::-         (MonadIO m) => AllVideoCapabilities -> m (Maybe CapabilityRange)-getWidth self = liftIO (nullableToMaybe <$> (js_getWidth (self)))- -foreign import javascript unsafe "$1[\"height\"]" js_getHeight ::-        AllVideoCapabilities -> IO (Nullable CapabilityRange)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AllVideoCapabilities.height Mozilla AllVideoCapabilities.height documentation> -getHeight ::-          (MonadIO m) => AllVideoCapabilities -> m (Maybe CapabilityRange)-getHeight self = liftIO (nullableToMaybe <$> (js_getHeight (self)))- -foreign import javascript unsafe "$1[\"frameRate\"]"-        js_getFrameRate ::-        AllVideoCapabilities -> IO (Nullable CapabilityRange)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AllVideoCapabilities.frameRate Mozilla AllVideoCapabilities.frameRate documentation> -getFrameRate ::-             (MonadIO m) => AllVideoCapabilities -> m (Maybe CapabilityRange)-getFrameRate self-  = liftIO (nullableToMaybe <$> (js_getFrameRate (self)))- -foreign import javascript unsafe "$1[\"aspectRatio\"]"-        js_getAspectRatio ::-        AllVideoCapabilities -> IO (Nullable CapabilityRange)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AllVideoCapabilities.aspectRatio Mozilla AllVideoCapabilities.aspectRatio documentation> -getAspectRatio ::-               (MonadIO m) => AllVideoCapabilities -> m (Maybe CapabilityRange)-getAspectRatio self-  = liftIO (nullableToMaybe <$> (js_getAspectRatio (self)))- -foreign import javascript unsafe "$1[\"facingMode\"]"-        js_getFacingMode :: AllVideoCapabilities -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/AllVideoCapabilities.facingMode Mozilla AllVideoCapabilities.facingMode documentation> -getFacingMode ::-              (MonadIO m, FromJSString result) =>-                AllVideoCapabilities -> m [result]-getFacingMode self-  = liftIO ((js_getFacingMode (self)) >>= fromJSValUnchecked)

− src/GHCJS/DOM/JSFFI/Generated/AnalyserNode.hs

@@ -1,133 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.AnalyserNode-       (js_getFloatFrequencyData, getFloatFrequencyData,-        js_getByteFrequencyData, getByteFrequencyData,-        js_getByteTimeDomainData, getByteTimeDomainData, js_setFftSize,-        setFftSize, js_getFftSize, getFftSize, js_getFrequencyBinCount,-        getFrequencyBinCount, js_setMinDecibels, setMinDecibels,-        js_getMinDecibels, getMinDecibels, js_setMaxDecibels,-        setMaxDecibels, js_getMaxDecibels, getMaxDecibels,-        js_setSmoothingTimeConstant, setSmoothingTimeConstant,-        js_getSmoothingTimeConstant, getSmoothingTimeConstant,-        AnalyserNode, castToAnalyserNode, gTypeAnalyserNode)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe-        "$1[\"getFloatFrequencyData\"]($2)" js_getFloatFrequencyData ::-        AnalyserNode -> Nullable Float32Array -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AnalyserNode.getFloatFrequencyData Mozilla AnalyserNode.getFloatFrequencyData documentation> -getFloatFrequencyData ::-                      (MonadIO m, IsFloat32Array array) =>-                        AnalyserNode -> Maybe array -> m ()-getFloatFrequencyData self array-  = liftIO-      (js_getFloatFrequencyData (self)-         (maybeToNullable (fmap toFloat32Array array)))- -foreign import javascript unsafe "$1[\"getByteFrequencyData\"]($2)"-        js_getByteFrequencyData ::-        AnalyserNode -> Nullable Uint8Array -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AnalyserNode.getByteFrequencyData Mozilla AnalyserNode.getByteFrequencyData documentation> -getByteFrequencyData ::-                     (MonadIO m, IsUint8Array array) =>-                       AnalyserNode -> Maybe array -> m ()-getByteFrequencyData self array-  = liftIO-      (js_getByteFrequencyData (self)-         (maybeToNullable (fmap toUint8Array array)))- -foreign import javascript unsafe-        "$1[\"getByteTimeDomainData\"]($2)" js_getByteTimeDomainData ::-        AnalyserNode -> Nullable Uint8Array -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AnalyserNode.getByteTimeDomainData Mozilla AnalyserNode.getByteTimeDomainData documentation> -getByteTimeDomainData ::-                      (MonadIO m, IsUint8Array array) =>-                        AnalyserNode -> Maybe array -> m ()-getByteTimeDomainData self array-  = liftIO-      (js_getByteTimeDomainData (self)-         (maybeToNullable (fmap toUint8Array array)))- -foreign import javascript unsafe "$1[\"fftSize\"] = $2;"-        js_setFftSize :: AnalyserNode -> Word -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AnalyserNode.fftSize Mozilla AnalyserNode.fftSize documentation> -setFftSize :: (MonadIO m) => AnalyserNode -> Word -> m ()-setFftSize self val = liftIO (js_setFftSize (self) val)- -foreign import javascript unsafe "$1[\"fftSize\"]" js_getFftSize ::-        AnalyserNode -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/AnalyserNode.fftSize Mozilla AnalyserNode.fftSize documentation> -getFftSize :: (MonadIO m) => AnalyserNode -> m Word-getFftSize self = liftIO (js_getFftSize (self))- -foreign import javascript unsafe "$1[\"frequencyBinCount\"]"-        js_getFrequencyBinCount :: AnalyserNode -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/AnalyserNode.frequencyBinCount Mozilla AnalyserNode.frequencyBinCount documentation> -getFrequencyBinCount :: (MonadIO m) => AnalyserNode -> m Word-getFrequencyBinCount self = liftIO (js_getFrequencyBinCount (self))- -foreign import javascript unsafe "$1[\"minDecibels\"] = $2;"-        js_setMinDecibels :: AnalyserNode -> Double -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AnalyserNode.minDecibels Mozilla AnalyserNode.minDecibels documentation> -setMinDecibels :: (MonadIO m) => AnalyserNode -> Double -> m ()-setMinDecibels self val = liftIO (js_setMinDecibels (self) val)- -foreign import javascript unsafe "$1[\"minDecibels\"]"-        js_getMinDecibels :: AnalyserNode -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/AnalyserNode.minDecibels Mozilla AnalyserNode.minDecibels documentation> -getMinDecibels :: (MonadIO m) => AnalyserNode -> m Double-getMinDecibels self = liftIO (js_getMinDecibels (self))- -foreign import javascript unsafe "$1[\"maxDecibels\"] = $2;"-        js_setMaxDecibels :: AnalyserNode -> Double -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AnalyserNode.maxDecibels Mozilla AnalyserNode.maxDecibels documentation> -setMaxDecibels :: (MonadIO m) => AnalyserNode -> Double -> m ()-setMaxDecibels self val = liftIO (js_setMaxDecibels (self) val)- -foreign import javascript unsafe "$1[\"maxDecibels\"]"-        js_getMaxDecibels :: AnalyserNode -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/AnalyserNode.maxDecibels Mozilla AnalyserNode.maxDecibels documentation> -getMaxDecibels :: (MonadIO m) => AnalyserNode -> m Double-getMaxDecibels self = liftIO (js_getMaxDecibels (self))- -foreign import javascript unsafe-        "$1[\"smoothingTimeConstant\"] = $2;" js_setSmoothingTimeConstant-        :: AnalyserNode -> Double -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AnalyserNode.smoothingTimeConstant Mozilla AnalyserNode.smoothingTimeConstant documentation> -setSmoothingTimeConstant ::-                         (MonadIO m) => AnalyserNode -> Double -> m ()-setSmoothingTimeConstant self val-  = liftIO (js_setSmoothingTimeConstant (self) val)- -foreign import javascript unsafe "$1[\"smoothingTimeConstant\"]"-        js_getSmoothingTimeConstant :: AnalyserNode -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/AnalyserNode.smoothingTimeConstant Mozilla AnalyserNode.smoothingTimeConstant documentation> -getSmoothingTimeConstant :: (MonadIO m) => AnalyserNode -> m Double-getSmoothingTimeConstant self-  = liftIO (js_getSmoothingTimeConstant (self))

− src/GHCJS/DOM/JSFFI/Generated/AnimationEvent.hs

@@ -1,36 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.AnimationEvent-       (js_getAnimationName, getAnimationName, js_getElapsedTime,-        getElapsedTime, AnimationEvent, castToAnimationEvent,-        gTypeAnimationEvent)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"animationName\"]"-        js_getAnimationName :: AnimationEvent -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/AnimationEvent.animationName Mozilla AnimationEvent.animationName documentation> -getAnimationName ::-                 (MonadIO m, FromJSString result) => AnimationEvent -> m result-getAnimationName self-  = liftIO (fromJSString <$> (js_getAnimationName (self)))- -foreign import javascript unsafe "$1[\"elapsedTime\"]"-        js_getElapsedTime :: AnimationEvent -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/AnimationEvent.elapsedTime Mozilla AnimationEvent.elapsedTime documentation> -getElapsedTime :: (MonadIO m) => AnimationEvent -> m Double-getElapsedTime self = liftIO (js_getElapsedTime (self))

− src/GHCJS/DOM/JSFFI/Generated/ApplicationCache.hs

@@ -1,89 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.ApplicationCache-       (js_update, update, js_swapCache, swapCache, js_abort, abort,-        pattern UNCACHED, pattern IDLE, pattern CHECKING,-        pattern DOWNLOADING, pattern UPDATEREADY, pattern OBSOLETE,-        js_getStatus, getStatus, checking, error, noUpdate, downloading,-        progress, updateReady, cached, obsolete, ApplicationCache,-        castToApplicationCache, gTypeApplicationCache)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"update\"]()" js_update ::-        ApplicationCache -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplicationCache.update Mozilla ApplicationCache.update documentation> -update :: (MonadIO m) => ApplicationCache -> m ()-update self = liftIO (js_update (self))- -foreign import javascript unsafe "$1[\"swapCache\"]()" js_swapCache-        :: ApplicationCache -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplicationCache.swapCache Mozilla ApplicationCache.swapCache documentation> -swapCache :: (MonadIO m) => ApplicationCache -> m ()-swapCache self = liftIO (js_swapCache (self))- -foreign import javascript unsafe "$1[\"abort\"]()" js_abort ::-        ApplicationCache -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplicationCache.abort Mozilla ApplicationCache.abort documentation> -abort :: (MonadIO m) => ApplicationCache -> m ()-abort self = liftIO (js_abort (self))-pattern UNCACHED = 0-pattern IDLE = 1-pattern CHECKING = 2-pattern DOWNLOADING = 3-pattern UPDATEREADY = 4-pattern OBSOLETE = 5- -foreign import javascript unsafe "$1[\"status\"]" js_getStatus ::-        ApplicationCache -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplicationCache.status Mozilla ApplicationCache.status documentation> -getStatus :: (MonadIO m) => ApplicationCache -> m Word-getStatus self = liftIO (js_getStatus (self))---- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplicationCache.onchecking Mozilla ApplicationCache.onchecking documentation> -checking :: EventName ApplicationCache Event-checking = unsafeEventName (toJSString "checking")---- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplicationCache.onerror Mozilla ApplicationCache.onerror documentation> -error :: EventName ApplicationCache UIEvent-error = unsafeEventName (toJSString "error")---- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplicationCache.onnoupdate Mozilla ApplicationCache.onnoupdate documentation> -noUpdate :: EventName ApplicationCache Event-noUpdate = unsafeEventName (toJSString "noupdate")---- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplicationCache.ondownloading Mozilla ApplicationCache.ondownloading documentation> -downloading :: EventName ApplicationCache Event-downloading = unsafeEventName (toJSString "downloading")---- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplicationCache.onprogress Mozilla ApplicationCache.onprogress documentation> -progress :: EventName ApplicationCache ProgressEvent-progress = unsafeEventName (toJSString "progress")---- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplicationCache.onupdateready Mozilla ApplicationCache.onupdateready documentation> -updateReady :: EventName ApplicationCache Event-updateReady = unsafeEventName (toJSString "updateready")---- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplicationCache.oncached Mozilla ApplicationCache.oncached documentation> -cached :: EventName ApplicationCache Event-cached = unsafeEventName (toJSString "cached")---- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplicationCache.onobsolete Mozilla ApplicationCache.onobsolete documentation> -obsolete :: EventName ApplicationCache Event-obsolete = unsafeEventName (toJSString "obsolete")

− src/GHCJS/DOM/JSFFI/Generated/Attr.hs

@@ -1,67 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.Attr-       (js_getName, getName, js_getSpecified, getSpecified, js_setValue,-        setValue, js_getValue, getValue, js_getOwnerElement,-        getOwnerElement, js_getIsId, getIsId, Attr, castToAttr, gTypeAttr)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"name\"]" js_getName ::-        Attr -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Attr.name Mozilla Attr.name documentation> -getName ::-        (MonadIO m, FromJSString result) => Attr -> m (Maybe result)-getName self = liftIO (fromMaybeJSString <$> (js_getName (self)))- -foreign import javascript unsafe "($1[\"specified\"] ? 1 : 0)"-        js_getSpecified :: Attr -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/Attr.specified Mozilla Attr.specified documentation> -getSpecified :: (MonadIO m) => Attr -> m Bool-getSpecified self = liftIO (js_getSpecified (self))- -foreign import javascript unsafe "$1[\"value\"] = $2;" js_setValue-        :: Attr -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Attr.value Mozilla Attr.value documentation> -setValue ::-         (MonadIO m, ToJSString val) => Attr -> Maybe val -> m ()-setValue self val-  = liftIO (js_setValue (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"value\"]" js_getValue ::-        Attr -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Attr.value Mozilla Attr.value documentation> -getValue ::-         (MonadIO m, FromJSString result) => Attr -> m (Maybe result)-getValue self = liftIO (fromMaybeJSString <$> (js_getValue (self)))- -foreign import javascript unsafe "$1[\"ownerElement\"]"-        js_getOwnerElement :: Attr -> IO (Nullable Element)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Attr.ownerElement Mozilla Attr.ownerElement documentation> -getOwnerElement :: (MonadIO m) => Attr -> m (Maybe Element)-getOwnerElement self-  = liftIO (nullableToMaybe <$> (js_getOwnerElement (self)))- -foreign import javascript unsafe "($1[\"isId\"] ? 1 : 0)"-        js_getIsId :: Attr -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/Attr.isId Mozilla Attr.isId documentation> -getIsId :: (MonadIO m) => Attr -> m Bool-getIsId self = liftIO (js_getIsId (self))

− src/GHCJS/DOM/JSFFI/Generated/AudioBuffer.hs

@@ -1,75 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.AudioBuffer-       (js_getChannelData, getChannelData, js_getLength, getLength,-        js_getDuration, getDuration, js_getSampleRate, getSampleRate,-        js_setGain, setGain, js_getGain, getGain, js_getNumberOfChannels,-        getNumberOfChannels, AudioBuffer, castToAudioBuffer,-        gTypeAudioBuffer)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"getChannelData\"]($2)"-        js_getChannelData ::-        AudioBuffer -> Word -> IO (Nullable Float32Array)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBuffer.getChannelData Mozilla AudioBuffer.getChannelData documentation> -getChannelData ::-               (MonadIO m) => AudioBuffer -> Word -> m (Maybe Float32Array)-getChannelData self channelIndex-  = liftIO-      (nullableToMaybe <$> (js_getChannelData (self) channelIndex))- -foreign import javascript unsafe "$1[\"length\"]" js_getLength ::-        AudioBuffer -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBuffer.length Mozilla AudioBuffer.length documentation> -getLength :: (MonadIO m) => AudioBuffer -> m Int-getLength self = liftIO (js_getLength (self))- -foreign import javascript unsafe "$1[\"duration\"]" js_getDuration-        :: AudioBuffer -> IO Float---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBuffer.duration Mozilla AudioBuffer.duration documentation> -getDuration :: (MonadIO m) => AudioBuffer -> m Float-getDuration self = liftIO (js_getDuration (self))- -foreign import javascript unsafe "$1[\"sampleRate\"]"-        js_getSampleRate :: AudioBuffer -> IO Float---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBuffer.sampleRate Mozilla AudioBuffer.sampleRate documentation> -getSampleRate :: (MonadIO m) => AudioBuffer -> m Float-getSampleRate self = liftIO (js_getSampleRate (self))- -foreign import javascript unsafe "$1[\"gain\"] = $2;" js_setGain ::-        AudioBuffer -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBuffer.gain Mozilla AudioBuffer.gain documentation> -setGain :: (MonadIO m) => AudioBuffer -> Float -> m ()-setGain self val = liftIO (js_setGain (self) val)- -foreign import javascript unsafe "$1[\"gain\"]" js_getGain ::-        AudioBuffer -> IO Float---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBuffer.gain Mozilla AudioBuffer.gain documentation> -getGain :: (MonadIO m) => AudioBuffer -> m Float-getGain self = liftIO (js_getGain (self))- -foreign import javascript unsafe "$1[\"numberOfChannels\"]"-        js_getNumberOfChannels :: AudioBuffer -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBuffer.numberOfChannels Mozilla AudioBuffer.numberOfChannels documentation> -getNumberOfChannels :: (MonadIO m) => AudioBuffer -> m Word-getNumberOfChannels self = liftIO (js_getNumberOfChannels (self))

− src/GHCJS/DOM/JSFFI/Generated/AudioBufferCallback.hs

@@ -1,55 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.AudioBufferCallback-       (newAudioBufferCallback, newAudioBufferCallbackSync,-        newAudioBufferCallbackAsync, AudioBufferCallback)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBufferCallback Mozilla AudioBufferCallback documentation> -newAudioBufferCallback ::-                       (MonadIO m) =>-                         (Maybe AudioBuffer -> IO ()) -> m AudioBufferCallback-newAudioBufferCallback callback-  = liftIO-      (AudioBufferCallback <$>-         syncCallback1 ThrowWouldBlock-           (\ audioBuffer ->-              fromJSValUnchecked audioBuffer >>=-                \ audioBuffer' -> callback audioBuffer'))---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBufferCallback Mozilla AudioBufferCallback documentation> -newAudioBufferCallbackSync ::-                           (MonadIO m) =>-                             (Maybe AudioBuffer -> IO ()) -> m AudioBufferCallback-newAudioBufferCallbackSync callback-  = liftIO-      (AudioBufferCallback <$>-         syncCallback1 ContinueAsync-           (\ audioBuffer ->-              fromJSValUnchecked audioBuffer >>=-                \ audioBuffer' -> callback audioBuffer'))---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBufferCallback Mozilla AudioBufferCallback documentation> -newAudioBufferCallbackAsync ::-                            (MonadIO m) =>-                              (Maybe AudioBuffer -> IO ()) -> m AudioBufferCallback-newAudioBufferCallbackAsync callback-  = liftIO-      (AudioBufferCallback <$>-         asyncCallback1-           (\ audioBuffer ->-              fromJSValUnchecked audioBuffer >>=-                \ audioBuffer' -> callback audioBuffer'))

− src/GHCJS/DOM/JSFFI/Generated/AudioBufferSourceNode.hs

@@ -1,180 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.AudioBufferSourceNode-       (js_start, start, js_stop, stop, js_noteOn, noteOn, js_noteGrainOn,-        noteGrainOn, js_noteOff, noteOff, pattern UNSCHEDULED_STATE,-        pattern SCHEDULED_STATE, pattern PLAYING_STATE,-        pattern FINISHED_STATE, js_setBuffer, setBuffer, js_getBuffer,-        getBuffer, js_getPlaybackState, getPlaybackState, js_getGain,-        getGain, js_getPlaybackRate, getPlaybackRate, js_setLoop, setLoop,-        js_getLoop, getLoop, js_setLoopStart, setLoopStart,-        js_getLoopStart, getLoopStart, js_setLoopEnd, setLoopEnd,-        js_getLoopEnd, getLoopEnd, js_setLooping, setLooping,-        js_getLooping, getLooping, ended, AudioBufferSourceNode,-        castToAudioBufferSourceNode, gTypeAudioBufferSourceNode)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"start\"]($2, $3, $4)"-        js_start ::-        AudioBufferSourceNode -> Double -> Double -> Double -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBufferSourceNode.start Mozilla AudioBufferSourceNode.start documentation> -start ::-      (MonadIO m) =>-        AudioBufferSourceNode -> Double -> Double -> Double -> m ()-start self when grainOffset grainDuration-  = liftIO (js_start (self) when grainOffset grainDuration)- -foreign import javascript unsafe "$1[\"stop\"]($2)" js_stop ::-        AudioBufferSourceNode -> Double -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBufferSourceNode.stop Mozilla AudioBufferSourceNode.stop documentation> -stop :: (MonadIO m) => AudioBufferSourceNode -> Double -> m ()-stop self when = liftIO (js_stop (self) when)- -foreign import javascript unsafe "$1[\"noteOn\"]($2)" js_noteOn ::-        AudioBufferSourceNode -> Double -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBufferSourceNode.noteOn Mozilla AudioBufferSourceNode.noteOn documentation> -noteOn :: (MonadIO m) => AudioBufferSourceNode -> Double -> m ()-noteOn self when = liftIO (js_noteOn (self) when)- -foreign import javascript unsafe "$1[\"noteGrainOn\"]($2, $3, $4)"-        js_noteGrainOn ::-        AudioBufferSourceNode -> Double -> Double -> Double -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBufferSourceNode.noteGrainOn Mozilla AudioBufferSourceNode.noteGrainOn documentation> -noteGrainOn ::-            (MonadIO m) =>-              AudioBufferSourceNode -> Double -> Double -> Double -> m ()-noteGrainOn self when grainOffset grainDuration-  = liftIO (js_noteGrainOn (self) when grainOffset grainDuration)- -foreign import javascript unsafe "$1[\"noteOff\"]($2)" js_noteOff-        :: AudioBufferSourceNode -> Double -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBufferSourceNode.noteOff Mozilla AudioBufferSourceNode.noteOff documentation> -noteOff :: (MonadIO m) => AudioBufferSourceNode -> Double -> m ()-noteOff self when = liftIO (js_noteOff (self) when)-pattern UNSCHEDULED_STATE = 0-pattern SCHEDULED_STATE = 1-pattern PLAYING_STATE = 2-pattern FINISHED_STATE = 3- -foreign import javascript unsafe "$1[\"buffer\"] = $2;"-        js_setBuffer ::-        AudioBufferSourceNode -> Nullable AudioBuffer -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBufferSourceNode.buffer Mozilla AudioBufferSourceNode.buffer documentation> -setBuffer ::-          (MonadIO m) => AudioBufferSourceNode -> Maybe AudioBuffer -> m ()-setBuffer self val-  = liftIO (js_setBuffer (self) (maybeToNullable val))- -foreign import javascript unsafe "$1[\"buffer\"]" js_getBuffer ::-        AudioBufferSourceNode -> IO (Nullable AudioBuffer)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBufferSourceNode.buffer Mozilla AudioBufferSourceNode.buffer documentation> -getBuffer ::-          (MonadIO m) => AudioBufferSourceNode -> m (Maybe AudioBuffer)-getBuffer self = liftIO (nullableToMaybe <$> (js_getBuffer (self)))- -foreign import javascript unsafe "$1[\"playbackState\"]"-        js_getPlaybackState :: AudioBufferSourceNode -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBufferSourceNode.playbackState Mozilla AudioBufferSourceNode.playbackState documentation> -getPlaybackState :: (MonadIO m) => AudioBufferSourceNode -> m Word-getPlaybackState self = liftIO (js_getPlaybackState (self))- -foreign import javascript unsafe "$1[\"gain\"]" js_getGain ::-        AudioBufferSourceNode -> IO (Nullable AudioParam)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBufferSourceNode.gain Mozilla AudioBufferSourceNode.gain documentation> -getGain ::-        (MonadIO m) => AudioBufferSourceNode -> m (Maybe AudioParam)-getGain self = liftIO (nullableToMaybe <$> (js_getGain (self)))- -foreign import javascript unsafe "$1[\"playbackRate\"]"-        js_getPlaybackRate ::-        AudioBufferSourceNode -> IO (Nullable AudioParam)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBufferSourceNode.playbackRate Mozilla AudioBufferSourceNode.playbackRate documentation> -getPlaybackRate ::-                (MonadIO m) => AudioBufferSourceNode -> m (Maybe AudioParam)-getPlaybackRate self-  = liftIO (nullableToMaybe <$> (js_getPlaybackRate (self)))- -foreign import javascript unsafe "$1[\"loop\"] = $2;" js_setLoop ::-        AudioBufferSourceNode -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBufferSourceNode.loop Mozilla AudioBufferSourceNode.loop documentation> -setLoop :: (MonadIO m) => AudioBufferSourceNode -> Bool -> m ()-setLoop self val = liftIO (js_setLoop (self) val)- -foreign import javascript unsafe "($1[\"loop\"] ? 1 : 0)"-        js_getLoop :: AudioBufferSourceNode -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBufferSourceNode.loop Mozilla AudioBufferSourceNode.loop documentation> -getLoop :: (MonadIO m) => AudioBufferSourceNode -> m Bool-getLoop self = liftIO (js_getLoop (self))- -foreign import javascript unsafe "$1[\"loopStart\"] = $2;"-        js_setLoopStart :: AudioBufferSourceNode -> Double -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBufferSourceNode.loopStart Mozilla AudioBufferSourceNode.loopStart documentation> -setLoopStart ::-             (MonadIO m) => AudioBufferSourceNode -> Double -> m ()-setLoopStart self val = liftIO (js_setLoopStart (self) val)- -foreign import javascript unsafe "$1[\"loopStart\"]"-        js_getLoopStart :: AudioBufferSourceNode -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBufferSourceNode.loopStart Mozilla AudioBufferSourceNode.loopStart documentation> -getLoopStart :: (MonadIO m) => AudioBufferSourceNode -> m Double-getLoopStart self = liftIO (js_getLoopStart (self))- -foreign import javascript unsafe "$1[\"loopEnd\"] = $2;"-        js_setLoopEnd :: AudioBufferSourceNode -> Double -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBufferSourceNode.loopEnd Mozilla AudioBufferSourceNode.loopEnd documentation> -setLoopEnd ::-           (MonadIO m) => AudioBufferSourceNode -> Double -> m ()-setLoopEnd self val = liftIO (js_setLoopEnd (self) val)- -foreign import javascript unsafe "$1[\"loopEnd\"]" js_getLoopEnd ::-        AudioBufferSourceNode -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBufferSourceNode.loopEnd Mozilla AudioBufferSourceNode.loopEnd documentation> -getLoopEnd :: (MonadIO m) => AudioBufferSourceNode -> m Double-getLoopEnd self = liftIO (js_getLoopEnd (self))- -foreign import javascript unsafe "$1[\"looping\"] = $2;"-        js_setLooping :: AudioBufferSourceNode -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBufferSourceNode.looping Mozilla AudioBufferSourceNode.looping documentation> -setLooping :: (MonadIO m) => AudioBufferSourceNode -> Bool -> m ()-setLooping self val = liftIO (js_setLooping (self) val)- -foreign import javascript unsafe "($1[\"looping\"] ? 1 : 0)"-        js_getLooping :: AudioBufferSourceNode -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBufferSourceNode.looping Mozilla AudioBufferSourceNode.looping documentation> -getLooping :: (MonadIO m) => AudioBufferSourceNode -> m Bool-getLooping self = liftIO (js_getLooping (self))---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBufferSourceNode.onended Mozilla AudioBufferSourceNode.onended documentation> -ended :: EventName AudioBufferSourceNode Event-ended = unsafeEventName (toJSString "ended")

− src/GHCJS/DOM/JSFFI/Generated/AudioContext.hs

@@ -1,424 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.AudioContext-       (js_newAudioContext, newAudioContext, js_createBuffer,-        createBuffer, js_createBufferFromArrayBuffer,-        createBufferFromArrayBuffer, js_decodeAudioData, decodeAudioData,-        js_createBufferSource, createBufferSource,-        js_createMediaElementSource, createMediaElementSource,-        js_createMediaStreamSource, createMediaStreamSource,-        js_createMediaStreamDestination, createMediaStreamDestination,-        js_createGain, createGain, js_createDelay, createDelay,-        js_createBiquadFilter, createBiquadFilter, js_createWaveShaper,-        createWaveShaper, js_createPanner, createPanner,-        js_createConvolver, createConvolver, js_createDynamicsCompressor,-        createDynamicsCompressor, js_createAnalyser, createAnalyser,-        js_createScriptProcessor, createScriptProcessor,-        js_createOscillator, createOscillator, js_createPeriodicWave,-        createPeriodicWave, js_createChannelSplitter,-        createChannelSplitter, js_createChannelMerger, createChannelMerger,-        js_startRendering, startRendering, js_createGainNode,-        createGainNode, js_createDelayNode, createDelayNode,-        js_createJavaScriptNode, createJavaScriptNode, js_getDestination,-        getDestination, js_getCurrentTime, getCurrentTime,-        js_getSampleRate, getSampleRate, js_getListener, getListener,-        js_getActiveSourceCount, getActiveSourceCount, complete,-        AudioContext, castToAudioContext, gTypeAudioContext,-        IsAudioContext, toAudioContext)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe-        "new (window[\"AudioContext\"]\n||\nwindow[\"webkitAudioContext\"])()"-        js_newAudioContext :: IO AudioContext---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext Mozilla AudioContext documentation> -newAudioContext :: (MonadIO m) => m AudioContext-newAudioContext = liftIO (js_newAudioContext)- -foreign import javascript unsafe "$1[\"createBuffer\"]($2, $3, $4)"-        js_createBuffer ::-        AudioContext -> Word -> Word -> Float -> IO (Nullable AudioBuffer)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.createBuffer Mozilla AudioContext.createBuffer documentation> -createBuffer ::-             (MonadIO m, IsAudioContext self) =>-               self -> Word -> Word -> Float -> m (Maybe AudioBuffer)-createBuffer self numberOfChannels numberOfFrames sampleRate-  = liftIO-      (nullableToMaybe <$>-         (js_createBuffer (toAudioContext self) numberOfChannels-            numberOfFrames-            sampleRate))- -foreign import javascript unsafe "$1[\"createBuffer\"]($2, $3)"-        js_createBufferFromArrayBuffer ::-        AudioContext ->-          Nullable ArrayBuffer -> Bool -> IO (Nullable AudioBuffer)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.createBuffer Mozilla AudioContext.createBuffer documentation> -createBufferFromArrayBuffer ::-                            (MonadIO m, IsAudioContext self, IsArrayBuffer buffer) =>-                              self -> Maybe buffer -> Bool -> m (Maybe AudioBuffer)-createBufferFromArrayBuffer self buffer mixToMono-  = liftIO-      (nullableToMaybe <$>-         (js_createBufferFromArrayBuffer (toAudioContext self)-            (maybeToNullable (fmap toArrayBuffer buffer))-            mixToMono))- -foreign import javascript unsafe-        "$1[\"decodeAudioData\"]($2, $3,\n$4)" js_decodeAudioData ::-        AudioContext ->-          Nullable ArrayBuffer ->-            Nullable AudioBufferCallback ->-              Nullable AudioBufferCallback -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.decodeAudioData Mozilla AudioContext.decodeAudioData documentation> -decodeAudioData ::-                (MonadIO m, IsAudioContext self, IsArrayBuffer audioData) =>-                  self ->-                    Maybe audioData ->-                      Maybe AudioBufferCallback -> Maybe AudioBufferCallback -> m ()-decodeAudioData self audioData successCallback errorCallback-  = liftIO-      (js_decodeAudioData (toAudioContext self)-         (maybeToNullable (fmap toArrayBuffer audioData))-         (maybeToNullable successCallback)-         (maybeToNullable errorCallback))- -foreign import javascript unsafe "$1[\"createBufferSource\"]()"-        js_createBufferSource ::-        AudioContext -> IO (Nullable AudioBufferSourceNode)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.createBufferSource Mozilla AudioContext.createBufferSource documentation> -createBufferSource ::-                   (MonadIO m, IsAudioContext self) =>-                     self -> m (Maybe AudioBufferSourceNode)-createBufferSource self-  = liftIO-      (nullableToMaybe <$> (js_createBufferSource (toAudioContext self)))- -foreign import javascript unsafe-        "$1[\"createMediaElementSource\"]($2)" js_createMediaElementSource-        ::-        AudioContext ->-          Nullable HTMLMediaElement ->-            IO (Nullable MediaElementAudioSourceNode)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.createMediaElementSource Mozilla AudioContext.createMediaElementSource documentation> -createMediaElementSource ::-                         (MonadIO m, IsAudioContext self,-                          IsHTMLMediaElement mediaElement) =>-                           self -> Maybe mediaElement -> m (Maybe MediaElementAudioSourceNode)-createMediaElementSource self mediaElement-  = liftIO-      (nullableToMaybe <$>-         (js_createMediaElementSource (toAudioContext self)-            (maybeToNullable (fmap toHTMLMediaElement mediaElement))))- -foreign import javascript unsafe-        "$1[\"createMediaStreamSource\"]($2)" js_createMediaStreamSource ::-        AudioContext ->-          Nullable MediaStream -> IO (Nullable MediaStreamAudioSourceNode)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.createMediaStreamSource Mozilla AudioContext.createMediaStreamSource documentation> -createMediaStreamSource ::-                        (MonadIO m, IsAudioContext self) =>-                          self -> Maybe MediaStream -> m (Maybe MediaStreamAudioSourceNode)-createMediaStreamSource self mediaStream-  = liftIO-      (nullableToMaybe <$>-         (js_createMediaStreamSource (toAudioContext self)-            (maybeToNullable mediaStream)))- -foreign import javascript unsafe-        "$1[\"createMediaStreamDestination\"]()"-        js_createMediaStreamDestination ::-        AudioContext -> IO (Nullable MediaStreamAudioDestinationNode)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.createMediaStreamDestination Mozilla AudioContext.createMediaStreamDestination documentation> -createMediaStreamDestination ::-                             (MonadIO m, IsAudioContext self) =>-                               self -> m (Maybe MediaStreamAudioDestinationNode)-createMediaStreamDestination self-  = liftIO-      (nullableToMaybe <$>-         (js_createMediaStreamDestination (toAudioContext self)))- -foreign import javascript unsafe "$1[\"createGain\"]()"-        js_createGain :: AudioContext -> IO (Nullable GainNode)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.createGain Mozilla AudioContext.createGain documentation> -createGain ::-           (MonadIO m, IsAudioContext self) => self -> m (Maybe GainNode)-createGain self-  = liftIO-      (nullableToMaybe <$> (js_createGain (toAudioContext self)))- -foreign import javascript unsafe "$1[\"createDelay\"]($2)"-        js_createDelay :: AudioContext -> Double -> IO (Nullable DelayNode)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.createDelay Mozilla AudioContext.createDelay documentation> -createDelay ::-            (MonadIO m, IsAudioContext self) =>-              self -> Double -> m (Maybe DelayNode)-createDelay self maxDelayTime-  = liftIO-      (nullableToMaybe <$>-         (js_createDelay (toAudioContext self) maxDelayTime))- -foreign import javascript unsafe "$1[\"createBiquadFilter\"]()"-        js_createBiquadFilter ::-        AudioContext -> IO (Nullable BiquadFilterNode)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.createBiquadFilter Mozilla AudioContext.createBiquadFilter documentation> -createBiquadFilter ::-                   (MonadIO m, IsAudioContext self) =>-                     self -> m (Maybe BiquadFilterNode)-createBiquadFilter self-  = liftIO-      (nullableToMaybe <$> (js_createBiquadFilter (toAudioContext self)))- -foreign import javascript unsafe "$1[\"createWaveShaper\"]()"-        js_createWaveShaper :: AudioContext -> IO (Nullable WaveShaperNode)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.createWaveShaper Mozilla AudioContext.createWaveShaper documentation> -createWaveShaper ::-                 (MonadIO m, IsAudioContext self) =>-                   self -> m (Maybe WaveShaperNode)-createWaveShaper self-  = liftIO-      (nullableToMaybe <$> (js_createWaveShaper (toAudioContext self)))- -foreign import javascript unsafe "$1[\"createPanner\"]()"-        js_createPanner :: AudioContext -> IO (Nullable PannerNode)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.createPanner Mozilla AudioContext.createPanner documentation> -createPanner ::-             (MonadIO m, IsAudioContext self) => self -> m (Maybe PannerNode)-createPanner self-  = liftIO-      (nullableToMaybe <$> (js_createPanner (toAudioContext self)))- -foreign import javascript unsafe "$1[\"createConvolver\"]()"-        js_createConvolver :: AudioContext -> IO (Nullable ConvolverNode)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.createConvolver Mozilla AudioContext.createConvolver documentation> -createConvolver ::-                (MonadIO m, IsAudioContext self) => self -> m (Maybe ConvolverNode)-createConvolver self-  = liftIO-      (nullableToMaybe <$> (js_createConvolver (toAudioContext self)))- -foreign import javascript unsafe-        "$1[\"createDynamicsCompressor\"]()" js_createDynamicsCompressor ::-        AudioContext -> IO (Nullable DynamicsCompressorNode)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.createDynamicsCompressor Mozilla AudioContext.createDynamicsCompressor documentation> -createDynamicsCompressor ::-                         (MonadIO m, IsAudioContext self) =>-                           self -> m (Maybe DynamicsCompressorNode)-createDynamicsCompressor self-  = liftIO-      (nullableToMaybe <$>-         (js_createDynamicsCompressor (toAudioContext self)))- -foreign import javascript unsafe "$1[\"createAnalyser\"]()"-        js_createAnalyser :: AudioContext -> IO (Nullable AnalyserNode)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.createAnalyser Mozilla AudioContext.createAnalyser documentation> -createAnalyser ::-               (MonadIO m, IsAudioContext self) => self -> m (Maybe AnalyserNode)-createAnalyser self-  = liftIO-      (nullableToMaybe <$> (js_createAnalyser (toAudioContext self)))- -foreign import javascript unsafe-        "$1[\"createScriptProcessor\"]($2,\n$3, $4)"-        js_createScriptProcessor ::-        AudioContext ->-          Word -> Word -> Word -> IO (Nullable ScriptProcessorNode)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.createScriptProcessor Mozilla AudioContext.createScriptProcessor documentation> -createScriptProcessor ::-                      (MonadIO m, IsAudioContext self) =>-                        self -> Word -> Word -> Word -> m (Maybe ScriptProcessorNode)-createScriptProcessor self bufferSize numberOfInputChannels-  numberOfOutputChannels-  = liftIO-      (nullableToMaybe <$>-         (js_createScriptProcessor (toAudioContext self) bufferSize-            numberOfInputChannels-            numberOfOutputChannels))- -foreign import javascript unsafe "$1[\"createOscillator\"]()"-        js_createOscillator :: AudioContext -> IO (Nullable OscillatorNode)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.createOscillator Mozilla AudioContext.createOscillator documentation> -createOscillator ::-                 (MonadIO m, IsAudioContext self) =>-                   self -> m (Maybe OscillatorNode)-createOscillator self-  = liftIO-      (nullableToMaybe <$> (js_createOscillator (toAudioContext self)))- -foreign import javascript unsafe-        "$1[\"createPeriodicWave\"]($2, $3)" js_createPeriodicWave ::-        AudioContext ->-          Nullable Float32Array ->-            Nullable Float32Array -> IO (Nullable PeriodicWave)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.createPeriodicWave Mozilla AudioContext.createPeriodicWave documentation> -createPeriodicWave ::-                   (MonadIO m, IsAudioContext self, IsFloat32Array real,-                    IsFloat32Array imag) =>-                     self -> Maybe real -> Maybe imag -> m (Maybe PeriodicWave)-createPeriodicWave self real imag-  = liftIO-      (nullableToMaybe <$>-         (js_createPeriodicWave (toAudioContext self)-            (maybeToNullable (fmap toFloat32Array real))-            (maybeToNullable (fmap toFloat32Array imag))))- -foreign import javascript unsafe-        "$1[\"createChannelSplitter\"]($2)" js_createChannelSplitter ::-        AudioContext -> Word -> IO (Nullable ChannelSplitterNode)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.createChannelSplitter Mozilla AudioContext.createChannelSplitter documentation> -createChannelSplitter ::-                      (MonadIO m, IsAudioContext self) =>-                        self -> Word -> m (Maybe ChannelSplitterNode)-createChannelSplitter self numberOfOutputs-  = liftIO-      (nullableToMaybe <$>-         (js_createChannelSplitter (toAudioContext self) numberOfOutputs))- -foreign import javascript unsafe "$1[\"createChannelMerger\"]($2)"-        js_createChannelMerger ::-        AudioContext -> Word -> IO (Nullable ChannelMergerNode)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.createChannelMerger Mozilla AudioContext.createChannelMerger documentation> -createChannelMerger ::-                    (MonadIO m, IsAudioContext self) =>-                      self -> Word -> m (Maybe ChannelMergerNode)-createChannelMerger self numberOfInputs-  = liftIO-      (nullableToMaybe <$>-         (js_createChannelMerger (toAudioContext self) numberOfInputs))- -foreign import javascript unsafe "$1[\"startRendering\"]()"-        js_startRendering :: AudioContext -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.startRendering Mozilla AudioContext.startRendering documentation> -startRendering :: (MonadIO m, IsAudioContext self) => self -> m ()-startRendering self-  = liftIO (js_startRendering (toAudioContext self))- -foreign import javascript unsafe "$1[\"createGainNode\"]()"-        js_createGainNode :: AudioContext -> IO (Nullable GainNode)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.createGainNode Mozilla AudioContext.createGainNode documentation> -createGainNode ::-               (MonadIO m, IsAudioContext self) => self -> m (Maybe GainNode)-createGainNode self-  = liftIO-      (nullableToMaybe <$> (js_createGainNode (toAudioContext self)))- -foreign import javascript unsafe "$1[\"createDelayNode\"]($2)"-        js_createDelayNode ::-        AudioContext -> Double -> IO (Nullable DelayNode)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.createDelayNode Mozilla AudioContext.createDelayNode documentation> -createDelayNode ::-                (MonadIO m, IsAudioContext self) =>-                  self -> Double -> m (Maybe DelayNode)-createDelayNode self maxDelayTime-  = liftIO-      (nullableToMaybe <$>-         (js_createDelayNode (toAudioContext self) maxDelayTime))- -foreign import javascript unsafe-        "$1[\"createJavaScriptNode\"]($2,\n$3, $4)" js_createJavaScriptNode-        ::-        AudioContext ->-          Word -> Word -> Word -> IO (Nullable ScriptProcessorNode)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.createJavaScriptNode Mozilla AudioContext.createJavaScriptNode documentation> -createJavaScriptNode ::-                     (MonadIO m, IsAudioContext self) =>-                       self -> Word -> Word -> Word -> m (Maybe ScriptProcessorNode)-createJavaScriptNode self bufferSize numberOfInputChannels-  numberOfOutputChannels-  = liftIO-      (nullableToMaybe <$>-         (js_createJavaScriptNode (toAudioContext self) bufferSize-            numberOfInputChannels-            numberOfOutputChannels))- -foreign import javascript unsafe "$1[\"destination\"]"-        js_getDestination ::-        AudioContext -> IO (Nullable AudioDestinationNode)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.destination Mozilla AudioContext.destination documentation> -getDestination ::-               (MonadIO m, IsAudioContext self) =>-                 self -> m (Maybe AudioDestinationNode)-getDestination self-  = liftIO-      (nullableToMaybe <$> (js_getDestination (toAudioContext self)))- -foreign import javascript unsafe "$1[\"currentTime\"]"-        js_getCurrentTime :: AudioContext -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.currentTime Mozilla AudioContext.currentTime documentation> -getCurrentTime ::-               (MonadIO m, IsAudioContext self) => self -> m Double-getCurrentTime self-  = liftIO (js_getCurrentTime (toAudioContext self))- -foreign import javascript unsafe "$1[\"sampleRate\"]"-        js_getSampleRate :: AudioContext -> IO Float---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.sampleRate Mozilla AudioContext.sampleRate documentation> -getSampleRate ::-              (MonadIO m, IsAudioContext self) => self -> m Float-getSampleRate self-  = liftIO (js_getSampleRate (toAudioContext self))- -foreign import javascript unsafe "$1[\"listener\"]" js_getListener-        :: AudioContext -> IO (Nullable AudioListener)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.listener Mozilla AudioContext.listener documentation> -getListener ::-            (MonadIO m, IsAudioContext self) => self -> m (Maybe AudioListener)-getListener self-  = liftIO-      (nullableToMaybe <$> (js_getListener (toAudioContext self)))- -foreign import javascript unsafe "$1[\"activeSourceCount\"]"-        js_getActiveSourceCount :: AudioContext -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.activeSourceCount Mozilla AudioContext.activeSourceCount documentation> -getActiveSourceCount ::-                     (MonadIO m, IsAudioContext self) => self -> m Word-getActiveSourceCount self-  = liftIO (js_getActiveSourceCount (toAudioContext self))---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.oncomplete Mozilla AudioContext.oncomplete documentation> -complete ::-         (IsAudioContext self, IsEventTarget self) =>-           EventName self OfflineAudioCompletionEvent-complete = unsafeEventName (toJSString "complete")

− src/GHCJS/DOM/JSFFI/Generated/AudioDestinationNode.hs

@@ -1,26 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.AudioDestinationNode-       (js_getMaxChannelCount, getMaxChannelCount, AudioDestinationNode,-        castToAudioDestinationNode, gTypeAudioDestinationNode)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"maxChannelCount\"]"-        js_getMaxChannelCount :: AudioDestinationNode -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioDestinationNode.maxChannelCount Mozilla AudioDestinationNode.maxChannelCount documentation> -getMaxChannelCount :: (MonadIO m) => AudioDestinationNode -> m Word-getMaxChannelCount self = liftIO (js_getMaxChannelCount (self))

− src/GHCJS/DOM/JSFFI/Generated/AudioListener.hs

@@ -1,80 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.AudioListener-       (js_setPosition, setPosition, js_setOrientation, setOrientation,-        js_setVelocity, setVelocity, js_setDopplerFactor, setDopplerFactor,-        js_getDopplerFactor, getDopplerFactor, js_setSpeedOfSound,-        setSpeedOfSound, js_getSpeedOfSound, getSpeedOfSound,-        AudioListener, castToAudioListener, gTypeAudioListener)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"setPosition\"]($2, $3, $4)"-        js_setPosition :: AudioListener -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioListener.setPosition Mozilla AudioListener.setPosition documentation> -setPosition ::-            (MonadIO m) => AudioListener -> Float -> Float -> Float -> m ()-setPosition self x y z = liftIO (js_setPosition (self) x y z)- -foreign import javascript unsafe-        "$1[\"setOrientation\"]($2, $3, $4,\n$5, $6, $7)" js_setOrientation-        ::-        AudioListener ->-          Float -> Float -> Float -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioListener.setOrientation Mozilla AudioListener.setOrientation documentation> -setOrientation ::-               (MonadIO m) =>-                 AudioListener ->-                   Float -> Float -> Float -> Float -> Float -> Float -> m ()-setOrientation self x y z xUp yUp zUp-  = liftIO (js_setOrientation (self) x y z xUp yUp zUp)- -foreign import javascript unsafe "$1[\"setVelocity\"]($2, $3, $4)"-        js_setVelocity :: AudioListener -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioListener.setVelocity Mozilla AudioListener.setVelocity documentation> -setVelocity ::-            (MonadIO m) => AudioListener -> Float -> Float -> Float -> m ()-setVelocity self x y z = liftIO (js_setVelocity (self) x y z)- -foreign import javascript unsafe "$1[\"dopplerFactor\"] = $2;"-        js_setDopplerFactor :: AudioListener -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioListener.dopplerFactor Mozilla AudioListener.dopplerFactor documentation> -setDopplerFactor :: (MonadIO m) => AudioListener -> Float -> m ()-setDopplerFactor self val = liftIO (js_setDopplerFactor (self) val)- -foreign import javascript unsafe "$1[\"dopplerFactor\"]"-        js_getDopplerFactor :: AudioListener -> IO Float---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioListener.dopplerFactor Mozilla AudioListener.dopplerFactor documentation> -getDopplerFactor :: (MonadIO m) => AudioListener -> m Float-getDopplerFactor self = liftIO (js_getDopplerFactor (self))- -foreign import javascript unsafe "$1[\"speedOfSound\"] = $2;"-        js_setSpeedOfSound :: AudioListener -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioListener.speedOfSound Mozilla AudioListener.speedOfSound documentation> -setSpeedOfSound :: (MonadIO m) => AudioListener -> Float -> m ()-setSpeedOfSound self val = liftIO (js_setSpeedOfSound (self) val)- -foreign import javascript unsafe "$1[\"speedOfSound\"]"-        js_getSpeedOfSound :: AudioListener -> IO Float---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioListener.speedOfSound Mozilla AudioListener.speedOfSound documentation> -getSpeedOfSound :: (MonadIO m) => AudioListener -> m Float-getSpeedOfSound self = liftIO (js_getSpeedOfSound (self))

− src/GHCJS/DOM/JSFFI/Generated/AudioNode.hs

@@ -1,151 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.AudioNode-       (js_connect, connect, js_connectParam, connectParam, js_disconnect,-        disconnect, js_getContext, getContext, js_getNumberOfInputs,-        getNumberOfInputs, js_getNumberOfOutputs, getNumberOfOutputs,-        js_setChannelCount, setChannelCount, js_getChannelCount,-        getChannelCount, js_setChannelCountMode, setChannelCountMode,-        js_getChannelCountMode, getChannelCountMode,-        js_setChannelInterpretation, setChannelInterpretation,-        js_getChannelInterpretation, getChannelInterpretation, AudioNode,-        castToAudioNode, gTypeAudioNode, IsAudioNode, toAudioNode)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"connect\"]($2, $3, $4)"-        js_connect ::-        AudioNode -> Nullable AudioNode -> Word -> Word -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioNode.connect Mozilla AudioNode.connect documentation> -connect ::-        (MonadIO m, IsAudioNode self, IsAudioNode destination) =>-          self -> Maybe destination -> Word -> Word -> m ()-connect self destination output input-  = liftIO-      (js_connect (toAudioNode self)-         (maybeToNullable (fmap toAudioNode destination))-         output-         input)- -foreign import javascript unsafe "$1[\"connect\"]($2, $3)"-        js_connectParam ::-        AudioNode -> Nullable AudioParam -> Word -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioNode.connect Mozilla AudioNode.connect documentation> -connectParam ::-             (MonadIO m, IsAudioNode self) =>-               self -> Maybe AudioParam -> Word -> m ()-connectParam self destination output-  = liftIO-      (js_connectParam (toAudioNode self) (maybeToNullable destination)-         output)- -foreign import javascript unsafe "$1[\"disconnect\"]($2)"-        js_disconnect :: AudioNode -> Word -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioNode.disconnect Mozilla AudioNode.disconnect documentation> -disconnect :: (MonadIO m, IsAudioNode self) => self -> Word -> m ()-disconnect self output-  = liftIO (js_disconnect (toAudioNode self) output)- -foreign import javascript unsafe "$1[\"context\"]" js_getContext ::-        AudioNode -> IO (Nullable AudioContext)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioNode.context Mozilla AudioNode.context documentation> -getContext ::-           (MonadIO m, IsAudioNode self) => self -> m (Maybe AudioContext)-getContext self-  = liftIO (nullableToMaybe <$> (js_getContext (toAudioNode self)))- -foreign import javascript unsafe "$1[\"numberOfInputs\"]"-        js_getNumberOfInputs :: AudioNode -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioNode.numberOfInputs Mozilla AudioNode.numberOfInputs documentation> -getNumberOfInputs ::-                  (MonadIO m, IsAudioNode self) => self -> m Word-getNumberOfInputs self-  = liftIO (js_getNumberOfInputs (toAudioNode self))- -foreign import javascript unsafe "$1[\"numberOfOutputs\"]"-        js_getNumberOfOutputs :: AudioNode -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioNode.numberOfOutputs Mozilla AudioNode.numberOfOutputs documentation> -getNumberOfOutputs ::-                   (MonadIO m, IsAudioNode self) => self -> m Word-getNumberOfOutputs self-  = liftIO (js_getNumberOfOutputs (toAudioNode self))- -foreign import javascript unsafe "$1[\"channelCount\"] = $2;"-        js_setChannelCount :: AudioNode -> Word -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioNode.channelCount Mozilla AudioNode.channelCount documentation> -setChannelCount ::-                (MonadIO m, IsAudioNode self) => self -> Word -> m ()-setChannelCount self val-  = liftIO (js_setChannelCount (toAudioNode self) val)- -foreign import javascript unsafe "$1[\"channelCount\"]"-        js_getChannelCount :: AudioNode -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioNode.channelCount Mozilla AudioNode.channelCount documentation> -getChannelCount :: (MonadIO m, IsAudioNode self) => self -> m Word-getChannelCount self-  = liftIO (js_getChannelCount (toAudioNode self))- -foreign import javascript unsafe "$1[\"channelCountMode\"] = $2;"-        js_setChannelCountMode :: AudioNode -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioNode.channelCountMode Mozilla AudioNode.channelCountMode documentation> -setChannelCountMode ::-                    (MonadIO m, IsAudioNode self, ToJSString val) =>-                      self -> val -> m ()-setChannelCountMode self val-  = liftIO-      (js_setChannelCountMode (toAudioNode self) (toJSString val))- -foreign import javascript unsafe "$1[\"channelCountMode\"]"-        js_getChannelCountMode :: AudioNode -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioNode.channelCountMode Mozilla AudioNode.channelCountMode documentation> -getChannelCountMode ::-                    (MonadIO m, IsAudioNode self, FromJSString result) =>-                      self -> m result-getChannelCountMode self-  = liftIO-      (fromJSString <$> (js_getChannelCountMode (toAudioNode self)))- -foreign import javascript unsafe-        "$1[\"channelInterpretation\"] = $2;" js_setChannelInterpretation-        :: AudioNode -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioNode.channelInterpretation Mozilla AudioNode.channelInterpretation documentation> -setChannelInterpretation ::-                         (MonadIO m, IsAudioNode self, ToJSString val) =>-                           self -> val -> m ()-setChannelInterpretation self val-  = liftIO-      (js_setChannelInterpretation (toAudioNode self) (toJSString val))- -foreign import javascript unsafe "$1[\"channelInterpretation\"]"-        js_getChannelInterpretation :: AudioNode -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioNode.channelInterpretation Mozilla AudioNode.channelInterpretation documentation> -getChannelInterpretation ::-                         (MonadIO m, IsAudioNode self, FromJSString result) =>-                           self -> m result-getChannelInterpretation self-  = liftIO-      (fromJSString <$> (js_getChannelInterpretation (toAudioNode self)))

− src/GHCJS/DOM/JSFFI/Generated/AudioParam.hs

@@ -1,152 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.AudioParam-       (js_setValueAtTime, setValueAtTime, js_linearRampToValueAtTime,-        linearRampToValueAtTime, js_exponentialRampToValueAtTime,-        exponentialRampToValueAtTime, js_setTargetAtTime, setTargetAtTime,-        js_setValueCurveAtTime, setValueCurveAtTime,-        js_cancelScheduledValues, cancelScheduledValues,-        js_setTargetValueAtTime, setTargetValueAtTime, js_setValue,-        setValue, js_getValue, getValue, js_getMinValue, getMinValue,-        js_getMaxValue, getMaxValue, js_getDefaultValue, getDefaultValue,-        js_getName, getName, js_getUnits, getUnits, AudioParam,-        castToAudioParam, gTypeAudioParam)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"setValueAtTime\"]($2, $3)"-        js_setValueAtTime :: AudioParam -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioParam.setValueAtTime Mozilla AudioParam.setValueAtTime documentation> -setValueAtTime ::-               (MonadIO m) => AudioParam -> Float -> Float -> m ()-setValueAtTime self value time-  = liftIO (js_setValueAtTime (self) value time)- -foreign import javascript unsafe-        "$1[\"linearRampToValueAtTime\"]($2,\n$3)"-        js_linearRampToValueAtTime :: AudioParam -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioParam.linearRampToValueAtTime Mozilla AudioParam.linearRampToValueAtTime documentation> -linearRampToValueAtTime ::-                        (MonadIO m) => AudioParam -> Float -> Float -> m ()-linearRampToValueAtTime self value time-  = liftIO (js_linearRampToValueAtTime (self) value time)- -foreign import javascript unsafe-        "$1[\"exponentialRampToValueAtTime\"]($2,\n$3)"-        js_exponentialRampToValueAtTime ::-        AudioParam -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioParam.exponentialRampToValueAtTime Mozilla AudioParam.exponentialRampToValueAtTime documentation> -exponentialRampToValueAtTime ::-                             (MonadIO m) => AudioParam -> Float -> Float -> m ()-exponentialRampToValueAtTime self value time-  = liftIO (js_exponentialRampToValueAtTime (self) value time)- -foreign import javascript unsafe-        "$1[\"setTargetAtTime\"]($2, $3,\n$4)" js_setTargetAtTime ::-        AudioParam -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioParam.setTargetAtTime Mozilla AudioParam.setTargetAtTime documentation> -setTargetAtTime ::-                (MonadIO m) => AudioParam -> Float -> Float -> Float -> m ()-setTargetAtTime self target time timeConstant-  = liftIO (js_setTargetAtTime (self) target time timeConstant)- -foreign import javascript unsafe-        "$1[\"setValueCurveAtTime\"]($2,\n$3, $4)" js_setValueCurveAtTime-        :: AudioParam -> Nullable Float32Array -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioParam.setValueCurveAtTime Mozilla AudioParam.setValueCurveAtTime documentation> -setValueCurveAtTime ::-                    (MonadIO m, IsFloat32Array values) =>-                      AudioParam -> Maybe values -> Float -> Float -> m ()-setValueCurveAtTime self values time duration-  = liftIO-      (js_setValueCurveAtTime (self)-         (maybeToNullable (fmap toFloat32Array values))-         time-         duration)- -foreign import javascript unsafe-        "$1[\"cancelScheduledValues\"]($2)" js_cancelScheduledValues ::-        AudioParam -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioParam.cancelScheduledValues Mozilla AudioParam.cancelScheduledValues documentation> -cancelScheduledValues :: (MonadIO m) => AudioParam -> Float -> m ()-cancelScheduledValues self startTime-  = liftIO (js_cancelScheduledValues (self) startTime)- -foreign import javascript unsafe-        "$1[\"setTargetValueAtTime\"]($2,\n$3, $4)" js_setTargetValueAtTime-        :: AudioParam -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioParam.setTargetValueAtTime Mozilla AudioParam.setTargetValueAtTime documentation> -setTargetValueAtTime ::-                     (MonadIO m) => AudioParam -> Float -> Float -> Float -> m ()-setTargetValueAtTime self targetValue time timeConstant-  = liftIO-      (js_setTargetValueAtTime (self) targetValue time timeConstant)- -foreign import javascript unsafe "$1[\"value\"] = $2;" js_setValue-        :: AudioParam -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioParam.value Mozilla AudioParam.value documentation> -setValue :: (MonadIO m) => AudioParam -> Float -> m ()-setValue self val = liftIO (js_setValue (self) val)- -foreign import javascript unsafe "$1[\"value\"]" js_getValue ::-        AudioParam -> IO Float---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioParam.value Mozilla AudioParam.value documentation> -getValue :: (MonadIO m) => AudioParam -> m Float-getValue self = liftIO (js_getValue (self))- -foreign import javascript unsafe "$1[\"minValue\"]" js_getMinValue-        :: AudioParam -> IO Float---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioParam.minValue Mozilla AudioParam.minValue documentation> -getMinValue :: (MonadIO m) => AudioParam -> m Float-getMinValue self = liftIO (js_getMinValue (self))- -foreign import javascript unsafe "$1[\"maxValue\"]" js_getMaxValue-        :: AudioParam -> IO Float---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioParam.maxValue Mozilla AudioParam.maxValue documentation> -getMaxValue :: (MonadIO m) => AudioParam -> m Float-getMaxValue self = liftIO (js_getMaxValue (self))- -foreign import javascript unsafe "$1[\"defaultValue\"]"-        js_getDefaultValue :: AudioParam -> IO Float---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioParam.defaultValue Mozilla AudioParam.defaultValue documentation> -getDefaultValue :: (MonadIO m) => AudioParam -> m Float-getDefaultValue self = liftIO (js_getDefaultValue (self))- -foreign import javascript unsafe "$1[\"name\"]" js_getName ::-        AudioParam -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioParam.name Mozilla AudioParam.name documentation> -getName ::-        (MonadIO m, FromJSString result) => AudioParam -> m result-getName self = liftIO (fromJSString <$> (js_getName (self)))- -foreign import javascript unsafe "$1[\"units\"]" js_getUnits ::-        AudioParam -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioParam.units Mozilla AudioParam.units documentation> -getUnits :: (MonadIO m) => AudioParam -> m Word-getUnits self = liftIO (js_getUnits (self))

− src/GHCJS/DOM/JSFFI/Generated/AudioProcessingEvent.hs

@@ -1,48 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.AudioProcessingEvent-       (js_getPlaybackTime, getPlaybackTime, js_getInputBuffer,-        getInputBuffer, js_getOutputBuffer, getOutputBuffer,-        AudioProcessingEvent, castToAudioProcessingEvent,-        gTypeAudioProcessingEvent)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"playbackTime\"]"-        js_getPlaybackTime :: AudioProcessingEvent -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioProcessingEvent.playbackTime Mozilla AudioProcessingEvent.playbackTime documentation> -getPlaybackTime :: (MonadIO m) => AudioProcessingEvent -> m Double-getPlaybackTime self = liftIO (js_getPlaybackTime (self))- -foreign import javascript unsafe "$1[\"inputBuffer\"]"-        js_getInputBuffer ::-        AudioProcessingEvent -> IO (Nullable AudioBuffer)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioProcessingEvent.inputBuffer Mozilla AudioProcessingEvent.inputBuffer documentation> -getInputBuffer ::-               (MonadIO m) => AudioProcessingEvent -> m (Maybe AudioBuffer)-getInputBuffer self-  = liftIO (nullableToMaybe <$> (js_getInputBuffer (self)))- -foreign import javascript unsafe "$1[\"outputBuffer\"]"-        js_getOutputBuffer ::-        AudioProcessingEvent -> IO (Nullable AudioBuffer)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioProcessingEvent.outputBuffer Mozilla AudioProcessingEvent.outputBuffer documentation> -getOutputBuffer ::-                (MonadIO m) => AudioProcessingEvent -> m (Maybe AudioBuffer)-getOutputBuffer self-  = liftIO (nullableToMaybe <$> (js_getOutputBuffer (self)))

− src/GHCJS/DOM/JSFFI/Generated/AudioStreamTrack.hs

@@ -1,32 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.AudioStreamTrack-       (js_newAudioStreamTrack, newAudioStreamTrack, AudioStreamTrack,-        castToAudioStreamTrack, gTypeAudioStreamTrack)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe-        "new window[\"AudioStreamTrack\"]($1)" js_newAudioStreamTrack ::-        Nullable Dictionary -> IO AudioStreamTrack---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioStreamTrack Mozilla AudioStreamTrack documentation> -newAudioStreamTrack ::-                    (MonadIO m, IsDictionary audioConstraints) =>-                      Maybe audioConstraints -> m AudioStreamTrack-newAudioStreamTrack audioConstraints-  = liftIO-      (js_newAudioStreamTrack-         (maybeToNullable (fmap toDictionary audioConstraints)))

− src/GHCJS/DOM/JSFFI/Generated/AudioTrack.hs

@@ -1,93 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.AudioTrack-       (js_getId, getId, js_setKind, setKind, js_getKind, getKind,-        js_getLabel, getLabel, js_setLanguage, setLanguage, js_getLanguage,-        getLanguage, js_setEnabled, setEnabled, js_getEnabled, getEnabled,-        js_getSourceBuffer, getSourceBuffer, AudioTrack, castToAudioTrack,-        gTypeAudioTrack)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"id\"]" js_getId ::-        AudioTrack -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioTrack.id Mozilla AudioTrack.id documentation> -getId :: (MonadIO m, FromJSString result) => AudioTrack -> m result-getId self = liftIO (fromJSString <$> (js_getId (self)))- -foreign import javascript unsafe "$1[\"kind\"] = $2;" js_setKind ::-        AudioTrack -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioTrack.kind Mozilla AudioTrack.kind documentation> -setKind :: (MonadIO m, ToJSString val) => AudioTrack -> val -> m ()-setKind self val = liftIO (js_setKind (self) (toJSString val))- -foreign import javascript unsafe "$1[\"kind\"]" js_getKind ::-        AudioTrack -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioTrack.kind Mozilla AudioTrack.kind documentation> -getKind ::-        (MonadIO m, FromJSString result) => AudioTrack -> m result-getKind self = liftIO (fromJSString <$> (js_getKind (self)))- -foreign import javascript unsafe "$1[\"label\"]" js_getLabel ::-        AudioTrack -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioTrack.label Mozilla AudioTrack.label documentation> -getLabel ::-         (MonadIO m, FromJSString result) => AudioTrack -> m result-getLabel self = liftIO (fromJSString <$> (js_getLabel (self)))- -foreign import javascript unsafe "$1[\"language\"] = $2;"-        js_setLanguage :: AudioTrack -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioTrack.language Mozilla AudioTrack.language documentation> -setLanguage ::-            (MonadIO m, ToJSString val) => AudioTrack -> val -> m ()-setLanguage self val-  = liftIO (js_setLanguage (self) (toJSString val))- -foreign import javascript unsafe "$1[\"language\"]" js_getLanguage-        :: AudioTrack -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioTrack.language Mozilla AudioTrack.language documentation> -getLanguage ::-            (MonadIO m, FromJSString result) => AudioTrack -> m result-getLanguage self-  = liftIO (fromJSString <$> (js_getLanguage (self)))- -foreign import javascript unsafe "$1[\"enabled\"] = $2;"-        js_setEnabled :: AudioTrack -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioTrack.enabled Mozilla AudioTrack.enabled documentation> -setEnabled :: (MonadIO m) => AudioTrack -> Bool -> m ()-setEnabled self val = liftIO (js_setEnabled (self) val)- -foreign import javascript unsafe "($1[\"enabled\"] ? 1 : 0)"-        js_getEnabled :: AudioTrack -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioTrack.enabled Mozilla AudioTrack.enabled documentation> -getEnabled :: (MonadIO m) => AudioTrack -> m Bool-getEnabled self = liftIO (js_getEnabled (self))- -foreign import javascript unsafe "$1[\"sourceBuffer\"]"-        js_getSourceBuffer :: AudioTrack -> IO (Nullable SourceBuffer)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioTrack.sourceBuffer Mozilla AudioTrack.sourceBuffer documentation> -getSourceBuffer ::-                (MonadIO m) => AudioTrack -> m (Maybe SourceBuffer)-getSourceBuffer self-  = liftIO (nullableToMaybe <$> (js_getSourceBuffer (self)))

− src/GHCJS/DOM/JSFFI/Generated/AudioTrackList.hs

@@ -1,60 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.AudioTrackList-       (js_item, item, js_getTrackById, getTrackById, js_getLength,-        getLength, change, addTrack, removeTrack, AudioTrackList,-        castToAudioTrackList, gTypeAudioTrackList)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"item\"]($2)" js_item ::-        AudioTrackList -> Word -> IO (Nullable AudioTrack)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioTrackList.item Mozilla AudioTrackList.item documentation> -item ::-     (MonadIO m) => AudioTrackList -> Word -> m (Maybe AudioTrack)-item self index-  = liftIO (nullableToMaybe <$> (js_item (self) index))- -foreign import javascript unsafe "$1[\"getTrackById\"]($2)"-        js_getTrackById ::-        AudioTrackList -> JSString -> IO (Nullable AudioTrack)---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioTrackList.getTrackById Mozilla AudioTrackList.getTrackById documentation> -getTrackById ::-             (MonadIO m, ToJSString id) =>-               AudioTrackList -> id -> m (Maybe AudioTrack)-getTrackById self id-  = liftIO-      (nullableToMaybe <$> (js_getTrackById (self) (toJSString id)))- -foreign import javascript unsafe "$1[\"length\"]" js_getLength ::-        AudioTrackList -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioTrackList.length Mozilla AudioTrackList.length documentation> -getLength :: (MonadIO m) => AudioTrackList -> m Word-getLength self = liftIO (js_getLength (self))---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioTrackList.onchange Mozilla AudioTrackList.onchange documentation> -change :: EventName AudioTrackList Event-change = unsafeEventName (toJSString "change")---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioTrackList.onaddtrack Mozilla AudioTrackList.onaddtrack documentation> -addTrack :: EventName AudioTrackList Event-addTrack = unsafeEventName (toJSString "addtrack")---- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioTrackList.onremovetrack Mozilla AudioTrackList.onremovetrack documentation> -removeTrack :: EventName AudioTrackList Event-removeTrack = unsafeEventName (toJSString "removetrack")

− src/GHCJS/DOM/JSFFI/Generated/AutocompleteErrorEvent.hs

@@ -1,28 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.AutocompleteErrorEvent-       (js_getReason, getReason, AutocompleteErrorEvent,-        castToAutocompleteErrorEvent, gTypeAutocompleteErrorEvent)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"reason\"]" js_getReason ::-        AutocompleteErrorEvent -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/AutocompleteErrorEvent.reason Mozilla AutocompleteErrorEvent.reason documentation> -getReason ::-          (MonadIO m, FromJSString result) =>-            AutocompleteErrorEvent -> m result-getReason self = liftIO (fromJSString <$> (js_getReason (self)))

− src/GHCJS/DOM/JSFFI/Generated/BarProp.hs

@@ -1,25 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.BarProp-       (js_getVisible, getVisible, BarProp, castToBarProp, gTypeBarProp)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "($1[\"visible\"] ? 1 : 0)"-        js_getVisible :: BarProp -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/BarProp.visible Mozilla BarProp.visible documentation> -getVisible :: (MonadIO m) => BarProp -> m Bool-getVisible self = liftIO (js_getVisible (self))

− src/GHCJS/DOM/JSFFI/Generated/BatteryManager.hs

@@ -1,68 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.BatteryManager-       (js_getCharging, getCharging, js_getChargingTime, getChargingTime,-        js_getDischargingTime, getDischargingTime, js_getLevel, getLevel,-        chargingChange, chargingTimeChange, dischargingTimeChange,-        levelChange, BatteryManager, castToBatteryManager,-        gTypeBatteryManager)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "($1[\"charging\"] ? 1 : 0)"-        js_getCharging :: BatteryManager -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/BatteryManager.charging Mozilla BatteryManager.charging documentation> -getCharging :: (MonadIO m) => BatteryManager -> m Bool-getCharging self = liftIO (js_getCharging (self))- -foreign import javascript unsafe "$1[\"chargingTime\"]"-        js_getChargingTime :: BatteryManager -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/BatteryManager.chargingTime Mozilla BatteryManager.chargingTime documentation> -getChargingTime :: (MonadIO m) => BatteryManager -> m Double-getChargingTime self = liftIO (js_getChargingTime (self))- -foreign import javascript unsafe "$1[\"dischargingTime\"]"-        js_getDischargingTime :: BatteryManager -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/BatteryManager.dischargingTime Mozilla BatteryManager.dischargingTime documentation> -getDischargingTime :: (MonadIO m) => BatteryManager -> m Double-getDischargingTime self = liftIO (js_getDischargingTime (self))- -foreign import javascript unsafe "$1[\"level\"]" js_getLevel ::-        BatteryManager -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/BatteryManager.level Mozilla BatteryManager.level documentation> -getLevel :: (MonadIO m) => BatteryManager -> m Double-getLevel self = liftIO (js_getLevel (self))---- | <https://developer.mozilla.org/en-US/docs/Web/API/BatteryManager.onchargingchange Mozilla BatteryManager.onchargingchange documentation> -chargingChange :: EventName BatteryManager Event-chargingChange = unsafeEventName (toJSString "chargingchange")---- | <https://developer.mozilla.org/en-US/docs/Web/API/BatteryManager.onchargingtimechange Mozilla BatteryManager.onchargingtimechange documentation> -chargingTimeChange :: EventName BatteryManager Event-chargingTimeChange-  = unsafeEventName (toJSString "chargingtimechange")---- | <https://developer.mozilla.org/en-US/docs/Web/API/BatteryManager.ondischargingtimechange Mozilla BatteryManager.ondischargingtimechange documentation> -dischargingTimeChange :: EventName BatteryManager Event-dischargingTimeChange-  = unsafeEventName (toJSString "dischargingtimechange")---- | <https://developer.mozilla.org/en-US/docs/Web/API/BatteryManager.onlevelchange Mozilla BatteryManager.onlevelchange documentation> -levelChange :: EventName BatteryManager Event-levelChange = unsafeEventName (toJSString "levelchange")

− src/GHCJS/DOM/JSFFI/Generated/BeforeLoadEvent.hs

@@ -1,27 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.BeforeLoadEvent-       (js_getUrl, getUrl, BeforeLoadEvent, castToBeforeLoadEvent,-        gTypeBeforeLoadEvent)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"url\"]" js_getUrl ::-        BeforeLoadEvent -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/BeforeLoadEvent.url Mozilla BeforeLoadEvent.url documentation> -getUrl ::-       (MonadIO m, FromJSString result) => BeforeLoadEvent -> m result-getUrl self = liftIO (fromJSString <$> (js_getUrl (self)))

− src/GHCJS/DOM/JSFFI/Generated/BeforeUnloadEvent.hs

@@ -1,38 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.BeforeUnloadEvent-       (js_setReturnValue, setReturnValue, js_getReturnValue,-        getReturnValue, BeforeUnloadEvent, castToBeforeUnloadEvent,-        gTypeBeforeUnloadEvent)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"returnValue\"] = $2;"-        js_setReturnValue :: BeforeUnloadEvent -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/BeforeUnloadEvent.returnValue Mozilla BeforeUnloadEvent.returnValue documentation> -setReturnValue ::-               (MonadIO m, ToJSString val) => BeforeUnloadEvent -> val -> m ()-setReturnValue self val-  = liftIO (js_setReturnValue (self) (toJSString val))- -foreign import javascript unsafe "$1[\"returnValue\"]"-        js_getReturnValue :: BeforeUnloadEvent -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/BeforeUnloadEvent.returnValue Mozilla BeforeUnloadEvent.returnValue documentation> -getReturnValue ::-               (MonadIO m, FromJSString result) => BeforeUnloadEvent -> m result-getReturnValue self-  = liftIO (fromJSString <$> (js_getReturnValue (self)))

− src/GHCJS/DOM/JSFFI/Generated/BiquadFilterNode.hs

@@ -1,100 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.BiquadFilterNode-       (js_getFrequencyResponse, getFrequencyResponse, pattern LOWPASS,-        pattern HIGHPASS, pattern BANDPASS, pattern LOWSHELF,-        pattern HIGHSHELF, pattern PEAKING, pattern NOTCH, pattern ALLPASS,-        js_setType, setType, js_getType, getType, js_getFrequency,-        getFrequency, js_getDetune, getDetune, js_getQ, getQ, js_getGain,-        getGain, BiquadFilterNode, castToBiquadFilterNode,-        gTypeBiquadFilterNode)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe-        "$1[\"getFrequencyResponse\"]($2,\n$3, $4)" js_getFrequencyResponse-        ::-        BiquadFilterNode ->-          Nullable Float32Array ->-            Nullable Float32Array -> Nullable Float32Array -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/BiquadFilterNode.getFrequencyResponse Mozilla BiquadFilterNode.getFrequencyResponse documentation> -getFrequencyResponse ::-                     (MonadIO m, IsFloat32Array frequencyHz, IsFloat32Array magResponse,-                      IsFloat32Array phaseResponse) =>-                       BiquadFilterNode ->-                         Maybe frequencyHz ->-                           Maybe magResponse -> Maybe phaseResponse -> m ()-getFrequencyResponse self frequencyHz magResponse phaseResponse-  = liftIO-      (js_getFrequencyResponse (self)-         (maybeToNullable (fmap toFloat32Array frequencyHz))-         (maybeToNullable (fmap toFloat32Array magResponse))-         (maybeToNullable (fmap toFloat32Array phaseResponse)))-pattern LOWPASS = 0-pattern HIGHPASS = 1-pattern BANDPASS = 2-pattern LOWSHELF = 3-pattern HIGHSHELF = 4-pattern PEAKING = 5-pattern NOTCH = 6-pattern ALLPASS = 7- -foreign import javascript unsafe "$1[\"type\"] = $2;" js_setType ::-        BiquadFilterNode -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/BiquadFilterNode.type Mozilla BiquadFilterNode.type documentation> -setType ::-        (MonadIO m, ToJSString val) => BiquadFilterNode -> val -> m ()-setType self val = liftIO (js_setType (self) (toJSString val))- -foreign import javascript unsafe "$1[\"type\"]" js_getType ::-        BiquadFilterNode -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/BiquadFilterNode.type Mozilla BiquadFilterNode.type documentation> -getType ::-        (MonadIO m, FromJSString result) => BiquadFilterNode -> m result-getType self = liftIO (fromJSString <$> (js_getType (self)))- -foreign import javascript unsafe "$1[\"frequency\"]"-        js_getFrequency :: BiquadFilterNode -> IO (Nullable AudioParam)---- | <https://developer.mozilla.org/en-US/docs/Web/API/BiquadFilterNode.frequency Mozilla BiquadFilterNode.frequency documentation> -getFrequency ::-             (MonadIO m) => BiquadFilterNode -> m (Maybe AudioParam)-getFrequency self-  = liftIO (nullableToMaybe <$> (js_getFrequency (self)))- -foreign import javascript unsafe "$1[\"detune\"]" js_getDetune ::-        BiquadFilterNode -> IO (Nullable AudioParam)---- | <https://developer.mozilla.org/en-US/docs/Web/API/BiquadFilterNode.detune Mozilla BiquadFilterNode.detune documentation> -getDetune ::-          (MonadIO m) => BiquadFilterNode -> m (Maybe AudioParam)-getDetune self = liftIO (nullableToMaybe <$> (js_getDetune (self)))- -foreign import javascript unsafe "$1[\"Q\"]" js_getQ ::-        BiquadFilterNode -> IO (Nullable AudioParam)---- | <https://developer.mozilla.org/en-US/docs/Web/API/BiquadFilterNode.Q Mozilla BiquadFilterNode.Q documentation> -getQ :: (MonadIO m) => BiquadFilterNode -> m (Maybe AudioParam)-getQ self = liftIO (nullableToMaybe <$> (js_getQ (self)))- -foreign import javascript unsafe "$1[\"gain\"]" js_getGain ::-        BiquadFilterNode -> IO (Nullable AudioParam)---- | <https://developer.mozilla.org/en-US/docs/Web/API/BiquadFilterNode.gain Mozilla BiquadFilterNode.gain documentation> -getGain :: (MonadIO m) => BiquadFilterNode -> m (Maybe AudioParam)-getGain self = liftIO (nullableToMaybe <$> (js_getGain (self)))

− src/GHCJS/DOM/JSFFI/Generated/Blob.hs

@@ -1,68 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.Blob-       (js_newBlob, newBlob, js_newBlob', newBlob', js_slice, slice,-        js_getSize, getSize, js_getType, getType, Blob, castToBlob,-        gTypeBlob, IsBlob, toBlob)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "new window[\"Blob\"]()"-        js_newBlob :: IO Blob---- | <https://developer.mozilla.org/en-US/docs/Web/API/Blob Mozilla Blob documentation> -newBlob :: (MonadIO m) => m Blob-newBlob = liftIO (js_newBlob)- -foreign import javascript unsafe "new window[\"Blob\"]($1, $2)"-        js_newBlob' :: JSVal -> Nullable BlobPropertyBag -> IO Blob---- | <https://developer.mozilla.org/en-US/docs/Web/API/Blob Mozilla Blob documentation> -newBlob' ::-         (MonadIO m, IsBlobPropertyBag options) =>-           [JSVal] -> Maybe options -> m Blob-newBlob' blobParts options-  = liftIO-      (toJSVal blobParts >>= \ blobParts' -> js_newBlob' blobParts'-         (maybeToNullable (fmap toBlobPropertyBag options)))- -foreign import javascript unsafe "$1[\"slice\"]($2, $3, $4)"-        js_slice ::-        Blob -> Double -> Double -> Nullable JSString -> IO (Nullable Blob)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Blob.slice Mozilla Blob.slice documentation> -slice ::-      (MonadIO m, IsBlob self, ToJSString contentType) =>-        self -> Int64 -> Int64 -> Maybe contentType -> m (Maybe Blob)-slice self start end contentType-  = liftIO-      (nullableToMaybe <$>-         (js_slice (toBlob self) (fromIntegral start) (fromIntegral end)-            (toMaybeJSString contentType)))- -foreign import javascript unsafe "$1[\"size\"]" js_getSize ::-        Blob -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/Blob.size Mozilla Blob.size documentation> -getSize :: (MonadIO m, IsBlob self) => self -> m Word64-getSize self = liftIO (round <$> (js_getSize (toBlob self)))- -foreign import javascript unsafe "$1[\"type\"]" js_getType ::-        Blob -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/Blob.type Mozilla Blob.type documentation> -getType ::-        (MonadIO m, IsBlob self, FromJSString result) => self -> m result-getType self = liftIO (fromJSString <$> (js_getType (toBlob self)))

− src/GHCJS/DOM/JSFFI/Generated/CSS.hs

@@ -1,41 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CSS-       (js_supports2, supports2, js_supports, supports, CSS, castToCSS,-        gTypeCSS)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe-        "($1[\"supports\"]($2, $3) ? 1 : 0)" js_supports2 ::-        CSS -> JSString -> JSString -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSS.supports Mozilla CSS.supports documentation> -supports2 ::-          (MonadIO m, ToJSString property, ToJSString value) =>-            CSS -> property -> value -> m Bool-supports2 self property value-  = liftIO-      (js_supports2 (self) (toJSString property) (toJSString value))- -foreign import javascript unsafe "($1[\"supports\"]($2) ? 1 : 0)"-        js_supports :: CSS -> JSString -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSS.supports Mozilla CSS.supports documentation> -supports ::-         (MonadIO m, ToJSString conditionText) =>-           CSS -> conditionText -> m Bool-supports self conditionText-  = liftIO (js_supports (self) (toJSString conditionText))

− src/GHCJS/DOM/JSFFI/Generated/CSSCharsetRule.hs

@@ -1,38 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CSSCharsetRule-       (js_setEncoding, setEncoding, js_getEncoding, getEncoding,-        CSSCharsetRule, castToCSSCharsetRule, gTypeCSSCharsetRule)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"encoding\"] = $2;"-        js_setEncoding :: CSSCharsetRule -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSCharsetRule.encoding Mozilla CSSCharsetRule.encoding documentation> -setEncoding ::-            (MonadIO m, ToJSString val) => CSSCharsetRule -> Maybe val -> m ()-setEncoding self val-  = liftIO (js_setEncoding (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"encoding\"]" js_getEncoding-        :: CSSCharsetRule -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSCharsetRule.encoding Mozilla CSSCharsetRule.encoding documentation> -getEncoding ::-            (MonadIO m, FromJSString result) =>-              CSSCharsetRule -> m (Maybe result)-getEncoding self-  = liftIO (fromMaybeJSString <$> (js_getEncoding (self)))

− src/GHCJS/DOM/JSFFI/Generated/CSSFontFaceLoadEvent.hs

@@ -1,37 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CSSFontFaceLoadEvent-       (js_getFontface, getFontface, js_getError, getError,-        CSSFontFaceLoadEvent, castToCSSFontFaceLoadEvent,-        gTypeCSSFontFaceLoadEvent)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"fontface\"]" js_getFontface-        :: CSSFontFaceLoadEvent -> IO (Nullable CSSFontFaceRule)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSFontFaceLoadEvent.fontface Mozilla CSSFontFaceLoadEvent.fontface documentation> -getFontface ::-            (MonadIO m) => CSSFontFaceLoadEvent -> m (Maybe CSSFontFaceRule)-getFontface self-  = liftIO (nullableToMaybe <$> (js_getFontface (self)))- -foreign import javascript unsafe "$1[\"error\"]" js_getError ::-        CSSFontFaceLoadEvent -> IO (Nullable DOMError)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSFontFaceLoadEvent.error Mozilla CSSFontFaceLoadEvent.error documentation> -getError ::-         (MonadIO m) => CSSFontFaceLoadEvent -> m (Maybe DOMError)-getError self = liftIO (nullableToMaybe <$> (js_getError (self)))

− src/GHCJS/DOM/JSFFI/Generated/CSSFontFaceRule.hs

@@ -1,27 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CSSFontFaceRule-       (js_getStyle, getStyle, CSSFontFaceRule, castToCSSFontFaceRule,-        gTypeCSSFontFaceRule)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"style\"]" js_getStyle ::-        CSSFontFaceRule -> IO (Nullable CSSStyleDeclaration)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSFontFaceRule.style Mozilla CSSFontFaceRule.style documentation> -getStyle ::-         (MonadIO m) => CSSFontFaceRule -> m (Maybe CSSStyleDeclaration)-getStyle self = liftIO (nullableToMaybe <$> (js_getStyle (self)))

− src/GHCJS/DOM/JSFFI/Generated/CSSImportRule.hs

@@ -1,45 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CSSImportRule-       (js_getHref, getHref, js_getMedia, getMedia, js_getStyleSheet,-        getStyleSheet, CSSImportRule, castToCSSImportRule,-        gTypeCSSImportRule)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"href\"]" js_getHref ::-        CSSImportRule -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSImportRule.href Mozilla CSSImportRule.href documentation> -getHref ::-        (MonadIO m, FromJSString result) =>-          CSSImportRule -> m (Maybe result)-getHref self = liftIO (fromMaybeJSString <$> (js_getHref (self)))- -foreign import javascript unsafe "$1[\"media\"]" js_getMedia ::-        CSSImportRule -> IO (Nullable MediaList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSImportRule.media Mozilla CSSImportRule.media documentation> -getMedia :: (MonadIO m) => CSSImportRule -> m (Maybe MediaList)-getMedia self = liftIO (nullableToMaybe <$> (js_getMedia (self)))- -foreign import javascript unsafe "$1[\"styleSheet\"]"-        js_getStyleSheet :: CSSImportRule -> IO (Nullable CSSStyleSheet)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSImportRule.styleSheet Mozilla CSSImportRule.styleSheet documentation> -getStyleSheet ::-              (MonadIO m) => CSSImportRule -> m (Maybe CSSStyleSheet)-getStyleSheet self-  = liftIO (nullableToMaybe <$> (js_getStyleSheet (self)))

− src/GHCJS/DOM/JSFFI/Generated/CSSKeyframeRule.hs

@@ -1,45 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CSSKeyframeRule-       (js_setKeyText, setKeyText, js_getKeyText, getKeyText, js_getStyle,-        getStyle, CSSKeyframeRule, castToCSSKeyframeRule,-        gTypeCSSKeyframeRule)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"keyText\"] = $2;"-        js_setKeyText :: CSSKeyframeRule -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSKeyframeRule.keyText Mozilla CSSKeyframeRule.keyText documentation> -setKeyText ::-           (MonadIO m, ToJSString val) => CSSKeyframeRule -> val -> m ()-setKeyText self val-  = liftIO (js_setKeyText (self) (toJSString val))- -foreign import javascript unsafe "$1[\"keyText\"]" js_getKeyText ::-        CSSKeyframeRule -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSKeyframeRule.keyText Mozilla CSSKeyframeRule.keyText documentation> -getKeyText ::-           (MonadIO m, FromJSString result) => CSSKeyframeRule -> m result-getKeyText self = liftIO (fromJSString <$> (js_getKeyText (self)))- -foreign import javascript unsafe "$1[\"style\"]" js_getStyle ::-        CSSKeyframeRule -> IO (Nullable CSSStyleDeclaration)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSKeyframeRule.style Mozilla CSSKeyframeRule.style documentation> -getStyle ::-         (MonadIO m) => CSSKeyframeRule -> m (Maybe CSSStyleDeclaration)-getStyle self = liftIO (nullableToMaybe <$> (js_getStyle (self)))

− src/GHCJS/DOM/JSFFI/Generated/CSSKeyframesRule.hs

@@ -1,97 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CSSKeyframesRule-       (js_insertRule, insertRule, js_appendRule, appendRule,-        js_deleteRule, deleteRule, js_findRule, findRule, js__get, _get,-        js_setName, setName, js_getName, getName, js_getCssRules,-        getCssRules, CSSKeyframesRule, castToCSSKeyframesRule,-        gTypeCSSKeyframesRule)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"insertRule\"]($2)"-        js_insertRule :: CSSKeyframesRule -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSKeyframesRule.insertRule Mozilla CSSKeyframesRule.insertRule documentation> -insertRule ::-           (MonadIO m, ToJSString rule) => CSSKeyframesRule -> rule -> m ()-insertRule self rule-  = liftIO (js_insertRule (self) (toJSString rule))- -foreign import javascript unsafe "$1[\"appendRule\"]($2)"-        js_appendRule :: CSSKeyframesRule -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSKeyframesRule.appendRule Mozilla CSSKeyframesRule.appendRule documentation> -appendRule ::-           (MonadIO m, ToJSString rule) => CSSKeyframesRule -> rule -> m ()-appendRule self rule-  = liftIO (js_appendRule (self) (toJSString rule))- -foreign import javascript unsafe "$1[\"deleteRule\"]($2)"-        js_deleteRule :: CSSKeyframesRule -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSKeyframesRule.deleteRule Mozilla CSSKeyframesRule.deleteRule documentation> -deleteRule ::-           (MonadIO m, ToJSString key) => CSSKeyframesRule -> key -> m ()-deleteRule self key-  = liftIO (js_deleteRule (self) (toJSString key))- -foreign import javascript unsafe "$1[\"findRule\"]($2)" js_findRule-        :: CSSKeyframesRule -> JSString -> IO (Nullable CSSKeyframeRule)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSKeyframesRule.findRule Mozilla CSSKeyframesRule.findRule documentation> -findRule ::-         (MonadIO m, ToJSString key) =>-           CSSKeyframesRule -> key -> m (Maybe CSSKeyframeRule)-findRule self key-  = liftIO-      (nullableToMaybe <$> (js_findRule (self) (toJSString key)))- -foreign import javascript unsafe "$1[\"_get\"]($2)" js__get ::-        CSSKeyframesRule -> Word -> IO (Nullable CSSKeyframeRule)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSKeyframesRule._get Mozilla CSSKeyframesRule._get documentation> -_get ::-     (MonadIO m) =>-       CSSKeyframesRule -> Word -> m (Maybe CSSKeyframeRule)-_get self index-  = liftIO (nullableToMaybe <$> (js__get (self) index))- -foreign import javascript unsafe "$1[\"name\"] = $2;" js_setName ::-        CSSKeyframesRule -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSKeyframesRule.name Mozilla CSSKeyframesRule.name documentation> -setName ::-        (MonadIO m, ToJSString val) =>-          CSSKeyframesRule -> Maybe val -> m ()-setName self val = liftIO (js_setName (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"name\"]" js_getName ::-        CSSKeyframesRule -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSKeyframesRule.name Mozilla CSSKeyframesRule.name documentation> -getName ::-        (MonadIO m, FromJSString result) =>-          CSSKeyframesRule -> m (Maybe result)-getName self = liftIO (fromMaybeJSString <$> (js_getName (self)))- -foreign import javascript unsafe "$1[\"cssRules\"]" js_getCssRules-        :: CSSKeyframesRule -> IO (Nullable CSSRuleList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSKeyframesRule.cssRules Mozilla CSSKeyframesRule.cssRules documentation> -getCssRules ::-            (MonadIO m) => CSSKeyframesRule -> m (Maybe CSSRuleList)-getCssRules self-  = liftIO (nullableToMaybe <$> (js_getCssRules (self)))

− src/GHCJS/DOM/JSFFI/Generated/CSSMediaRule.hs

@@ -1,52 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CSSMediaRule-       (js_insertRule, insertRule, js_deleteRule, deleteRule, js_getMedia,-        getMedia, js_getCssRules, getCssRules, CSSMediaRule,-        castToCSSMediaRule, gTypeCSSMediaRule)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"insertRule\"]($2, $3)"-        js_insertRule :: CSSMediaRule -> JSString -> Word -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSMediaRule.insertRule Mozilla CSSMediaRule.insertRule documentation> -insertRule ::-           (MonadIO m, ToJSString rule) =>-             CSSMediaRule -> rule -> Word -> m Word-insertRule self rule index-  = liftIO (js_insertRule (self) (toJSString rule) index)- -foreign import javascript unsafe "$1[\"deleteRule\"]($2)"-        js_deleteRule :: CSSMediaRule -> Word -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSMediaRule.deleteRule Mozilla CSSMediaRule.deleteRule documentation> -deleteRule :: (MonadIO m) => CSSMediaRule -> Word -> m ()-deleteRule self index = liftIO (js_deleteRule (self) index)- -foreign import javascript unsafe "$1[\"media\"]" js_getMedia ::-        CSSMediaRule -> IO (Nullable MediaList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSMediaRule.media Mozilla CSSMediaRule.media documentation> -getMedia :: (MonadIO m) => CSSMediaRule -> m (Maybe MediaList)-getMedia self = liftIO (nullableToMaybe <$> (js_getMedia (self)))- -foreign import javascript unsafe "$1[\"cssRules\"]" js_getCssRules-        :: CSSMediaRule -> IO (Nullable CSSRuleList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSMediaRule.cssRules Mozilla CSSMediaRule.cssRules documentation> -getCssRules :: (MonadIO m) => CSSMediaRule -> m (Maybe CSSRuleList)-getCssRules self-  = liftIO (nullableToMaybe <$> (js_getCssRules (self)))

− src/GHCJS/DOM/JSFFI/Generated/CSSPageRule.hs

@@ -1,46 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CSSPageRule-       (js_setSelectorText, setSelectorText, js_getSelectorText,-        getSelectorText, js_getStyle, getStyle, CSSPageRule,-        castToCSSPageRule, gTypeCSSPageRule)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"selectorText\"] = $2;"-        js_setSelectorText :: CSSPageRule -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSPageRule.selectorText Mozilla CSSPageRule.selectorText documentation> -setSelectorText ::-                (MonadIO m, ToJSString val) => CSSPageRule -> Maybe val -> m ()-setSelectorText self val-  = liftIO (js_setSelectorText (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"selectorText\"]"-        js_getSelectorText :: CSSPageRule -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSPageRule.selectorText Mozilla CSSPageRule.selectorText documentation> -getSelectorText ::-                (MonadIO m, FromJSString result) => CSSPageRule -> m (Maybe result)-getSelectorText self-  = liftIO (fromMaybeJSString <$> (js_getSelectorText (self)))- -foreign import javascript unsafe "$1[\"style\"]" js_getStyle ::-        CSSPageRule -> IO (Nullable CSSStyleDeclaration)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSPageRule.style Mozilla CSSPageRule.style documentation> -getStyle ::-         (MonadIO m) => CSSPageRule -> m (Maybe CSSStyleDeclaration)-getStyle self = liftIO (nullableToMaybe <$> (js_getStyle (self)))

− src/GHCJS/DOM/JSFFI/Generated/CSSPrimitiveValue.hs

@@ -1,133 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CSSPrimitiveValue-       (js_setFloatValue, setFloatValue, js_getFloatValue, getFloatValue,-        js_setStringValue, setStringValue, js_getStringValue,-        getStringValue, js_getCounterValue, getCounterValue,-        js_getRectValue, getRectValue, js_getRGBColorValue,-        getRGBColorValue, pattern CSS_UNKNOWN, pattern CSS_NUMBER,-        pattern CSS_PERCENTAGE, pattern CSS_EMS, pattern CSS_EXS,-        pattern CSS_PX, pattern CSS_CM, pattern CSS_MM, pattern CSS_IN,-        pattern CSS_PT, pattern CSS_PC, pattern CSS_DEG, pattern CSS_RAD,-        pattern CSS_GRAD, pattern CSS_MS, pattern CSS_S, pattern CSS_HZ,-        pattern CSS_KHZ, pattern CSS_DIMENSION, pattern CSS_STRING,-        pattern CSS_URI, pattern CSS_IDENT, pattern CSS_ATTR,-        pattern CSS_COUNTER, pattern CSS_RECT, pattern CSS_RGBCOLOR,-        pattern CSS_VW, pattern CSS_VH, pattern CSS_VMIN, pattern CSS_VMAX,-        js_getPrimitiveType, getPrimitiveType, CSSPrimitiveValue,-        castToCSSPrimitiveValue, gTypeCSSPrimitiveValue)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"setFloatValue\"]($2, $3)"-        js_setFloatValue :: CSSPrimitiveValue -> Word -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSPrimitiveValue.setFloatValue Mozilla CSSPrimitiveValue.setFloatValue documentation> -setFloatValue ::-              (MonadIO m) => CSSPrimitiveValue -> Word -> Float -> m ()-setFloatValue self unitType floatValue-  = liftIO (js_setFloatValue (self) unitType floatValue)- -foreign import javascript unsafe "$1[\"getFloatValue\"]($2)"-        js_getFloatValue :: CSSPrimitiveValue -> Word -> IO Float---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSPrimitiveValue.getFloatValue Mozilla CSSPrimitiveValue.getFloatValue documentation> -getFloatValue ::-              (MonadIO m) => CSSPrimitiveValue -> Word -> m Float-getFloatValue self unitType-  = liftIO (js_getFloatValue (self) unitType)- -foreign import javascript unsafe "$1[\"setStringValue\"]($2, $3)"-        js_setStringValue :: CSSPrimitiveValue -> Word -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSPrimitiveValue.setStringValue Mozilla CSSPrimitiveValue.setStringValue documentation> -setStringValue ::-               (MonadIO m, ToJSString stringValue) =>-                 CSSPrimitiveValue -> Word -> stringValue -> m ()-setStringValue self stringType stringValue-  = liftIO-      (js_setStringValue (self) stringType (toJSString stringValue))- -foreign import javascript unsafe "$1[\"getStringValue\"]()"-        js_getStringValue :: CSSPrimitiveValue -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSPrimitiveValue.getStringValue Mozilla CSSPrimitiveValue.getStringValue documentation> -getStringValue ::-               (MonadIO m, FromJSString result) => CSSPrimitiveValue -> m result-getStringValue self-  = liftIO (fromJSString <$> (js_getStringValue (self)))- -foreign import javascript unsafe "$1[\"getCounterValue\"]()"-        js_getCounterValue :: CSSPrimitiveValue -> IO (Nullable Counter)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSPrimitiveValue.getCounterValue Mozilla CSSPrimitiveValue.getCounterValue documentation> -getCounterValue ::-                (MonadIO m) => CSSPrimitiveValue -> m (Maybe Counter)-getCounterValue self-  = liftIO (nullableToMaybe <$> (js_getCounterValue (self)))- -foreign import javascript unsafe "$1[\"getRectValue\"]()"-        js_getRectValue :: CSSPrimitiveValue -> IO (Nullable Rect)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSPrimitiveValue.getRectValue Mozilla CSSPrimitiveValue.getRectValue documentation> -getRectValue :: (MonadIO m) => CSSPrimitiveValue -> m (Maybe Rect)-getRectValue self-  = liftIO (nullableToMaybe <$> (js_getRectValue (self)))- -foreign import javascript unsafe "$1[\"getRGBColorValue\"]()"-        js_getRGBColorValue :: CSSPrimitiveValue -> IO (Nullable RGBColor)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSPrimitiveValue.getRGBColorValue Mozilla CSSPrimitiveValue.getRGBColorValue documentation> -getRGBColorValue ::-                 (MonadIO m) => CSSPrimitiveValue -> m (Maybe RGBColor)-getRGBColorValue self-  = liftIO (nullableToMaybe <$> (js_getRGBColorValue (self)))-pattern CSS_UNKNOWN = 0-pattern CSS_NUMBER = 1-pattern CSS_PERCENTAGE = 2-pattern CSS_EMS = 3-pattern CSS_EXS = 4-pattern CSS_PX = 5-pattern CSS_CM = 6-pattern CSS_MM = 7-pattern CSS_IN = 8-pattern CSS_PT = 9-pattern CSS_PC = 10-pattern CSS_DEG = 11-pattern CSS_RAD = 12-pattern CSS_GRAD = 13-pattern CSS_MS = 14-pattern CSS_S = 15-pattern CSS_HZ = 16-pattern CSS_KHZ = 17-pattern CSS_DIMENSION = 18-pattern CSS_STRING = 19-pattern CSS_URI = 20-pattern CSS_IDENT = 21-pattern CSS_ATTR = 22-pattern CSS_COUNTER = 23-pattern CSS_RECT = 24-pattern CSS_RGBCOLOR = 25-pattern CSS_VW = 26-pattern CSS_VH = 27-pattern CSS_VMIN = 28-pattern CSS_VMAX = 29- -foreign import javascript unsafe "$1[\"primitiveType\"]"-        js_getPrimitiveType :: CSSPrimitiveValue -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSPrimitiveValue.primitiveType Mozilla CSSPrimitiveValue.primitiveType documentation> -getPrimitiveType :: (MonadIO m) => CSSPrimitiveValue -> m Word-getPrimitiveType self = liftIO (js_getPrimitiveType (self))

− src/GHCJS/DOM/JSFFI/Generated/CSSRule.hs

@@ -1,86 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CSSRule-       (pattern UNKNOWN_RULE, pattern STYLE_RULE, pattern CHARSET_RULE,-        pattern IMPORT_RULE, pattern MEDIA_RULE, pattern FONT_FACE_RULE,-        pattern PAGE_RULE, pattern KEYFRAMES_RULE, pattern KEYFRAME_RULE,-        pattern SUPPORTS_RULE, pattern WEBKIT_VIEWPORT_RULE,-        pattern WEBKIT_REGION_RULE, pattern WEBKIT_KEYFRAMES_RULE,-        pattern WEBKIT_KEYFRAME_RULE, js_getType, getType, js_setCssText,-        setCssText, js_getCssText, getCssText, js_getParentStyleSheet,-        getParentStyleSheet, js_getParentRule, getParentRule, CSSRule,-        castToCSSRule, gTypeCSSRule, IsCSSRule, toCSSRule)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums-pattern UNKNOWN_RULE = 0-pattern STYLE_RULE = 1-pattern CHARSET_RULE = 2-pattern IMPORT_RULE = 3-pattern MEDIA_RULE = 4-pattern FONT_FACE_RULE = 5-pattern PAGE_RULE = 6-pattern KEYFRAMES_RULE = 7-pattern KEYFRAME_RULE = 8-pattern SUPPORTS_RULE = 12-pattern WEBKIT_VIEWPORT_RULE = 15-pattern WEBKIT_REGION_RULE = 16-pattern WEBKIT_KEYFRAMES_RULE = 7-pattern WEBKIT_KEYFRAME_RULE = 8- -foreign import javascript unsafe "$1[\"type\"]" js_getType ::-        CSSRule -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSRule.type Mozilla CSSRule.type documentation> -getType :: (MonadIO m, IsCSSRule self) => self -> m Word-getType self = liftIO (js_getType (toCSSRule self))- -foreign import javascript unsafe "$1[\"cssText\"] = $2;"-        js_setCssText :: CSSRule -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSRule.cssText Mozilla CSSRule.cssText documentation> -setCssText ::-           (MonadIO m, IsCSSRule self, ToJSString val) =>-             self -> Maybe val -> m ()-setCssText self val-  = liftIO (js_setCssText (toCSSRule self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"cssText\"]" js_getCssText ::-        CSSRule -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSRule.cssText Mozilla CSSRule.cssText documentation> -getCssText ::-           (MonadIO m, IsCSSRule self, FromJSString result) =>-             self -> m (Maybe result)-getCssText self-  = liftIO (fromMaybeJSString <$> (js_getCssText (toCSSRule self)))- -foreign import javascript unsafe "$1[\"parentStyleSheet\"]"-        js_getParentStyleSheet :: CSSRule -> IO (Nullable CSSStyleSheet)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSRule.parentStyleSheet Mozilla CSSRule.parentStyleSheet documentation> -getParentStyleSheet ::-                    (MonadIO m, IsCSSRule self) => self -> m (Maybe CSSStyleSheet)-getParentStyleSheet self-  = liftIO-      (nullableToMaybe <$> (js_getParentStyleSheet (toCSSRule self)))- -foreign import javascript unsafe "$1[\"parentRule\"]"-        js_getParentRule :: CSSRule -> IO (Nullable CSSRule)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSRule.parentRule Mozilla CSSRule.parentRule documentation> -getParentRule ::-              (MonadIO m, IsCSSRule self) => self -> m (Maybe CSSRule)-getParentRule self-  = liftIO (nullableToMaybe <$> (js_getParentRule (toCSSRule self)))

− src/GHCJS/DOM/JSFFI/Generated/CSSRuleList.hs

@@ -1,34 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CSSRuleList-       (js_item, item, js_getLength, getLength, CSSRuleList,-        castToCSSRuleList, gTypeCSSRuleList)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"item\"]($2)" js_item ::-        CSSRuleList -> Word -> IO (Nullable CSSRule)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSRuleList.item Mozilla CSSRuleList.item documentation> -item :: (MonadIO m) => CSSRuleList -> Word -> m (Maybe CSSRule)-item self index-  = liftIO (nullableToMaybe <$> (js_item (self) index))- -foreign import javascript unsafe "$1[\"length\"]" js_getLength ::-        CSSRuleList -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSRuleList.length Mozilla CSSRuleList.length documentation> -getLength :: (MonadIO m) => CSSRuleList -> m Word-getLength self = liftIO (js_getLength (self))

− src/GHCJS/DOM/JSFFI/Generated/CSSStyleDeclaration.hs

@@ -1,163 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CSSStyleDeclaration-       (js_getPropertyValue, getPropertyValue, js_getPropertyCSSValue,-        getPropertyCSSValue, js_removeProperty, removeProperty,-        js_getPropertyPriority, getPropertyPriority, js_setProperty,-        setProperty, js_item, item, js_getPropertyShorthand,-        getPropertyShorthand, js_isPropertyImplicit, isPropertyImplicit,-        js_setCssText, setCssText, js_getCssText, getCssText, js_getLength,-        getLength, js_getParentRule, getParentRule, CSSStyleDeclaration,-        castToCSSStyleDeclaration, gTypeCSSStyleDeclaration)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"getPropertyValue\"]($2)"-        js_getPropertyValue ::-        CSSStyleDeclaration -> JSString -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleDeclaration.getPropertyValue Mozilla CSSStyleDeclaration.getPropertyValue documentation> -getPropertyValue ::-                 (MonadIO m, ToJSString propertyName, FromJSString result) =>-                   CSSStyleDeclaration -> propertyName -> m (Maybe result)-getPropertyValue self propertyName-  = liftIO-      (fromMaybeJSString <$>-         (js_getPropertyValue (self) (toJSString propertyName)))- -foreign import javascript unsafe "$1[\"getPropertyCSSValue\"]($2)"-        js_getPropertyCSSValue ::-        CSSStyleDeclaration -> JSString -> IO (Nullable CSSValue)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleDeclaration.getPropertyCSSValue Mozilla CSSStyleDeclaration.getPropertyCSSValue documentation> -getPropertyCSSValue ::-                    (MonadIO m, ToJSString propertyName) =>-                      CSSStyleDeclaration -> propertyName -> m (Maybe CSSValue)-getPropertyCSSValue self propertyName-  = liftIO-      (nullableToMaybe <$>-         (js_getPropertyCSSValue (self) (toJSString propertyName)))- -foreign import javascript unsafe "$1[\"removeProperty\"]($2)"-        js_removeProperty ::-        CSSStyleDeclaration -> JSString -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleDeclaration.removeProperty Mozilla CSSStyleDeclaration.removeProperty documentation> -removeProperty ::-               (MonadIO m, ToJSString propertyName, FromJSString result) =>-                 CSSStyleDeclaration -> propertyName -> m (Maybe result)-removeProperty self propertyName-  = liftIO-      (fromMaybeJSString <$>-         (js_removeProperty (self) (toJSString propertyName)))- -foreign import javascript unsafe "$1[\"getPropertyPriority\"]($2)"-        js_getPropertyPriority ::-        CSSStyleDeclaration -> JSString -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleDeclaration.getPropertyPriority Mozilla CSSStyleDeclaration.getPropertyPriority documentation> -getPropertyPriority ::-                    (MonadIO m, ToJSString propertyName, FromJSString result) =>-                      CSSStyleDeclaration -> propertyName -> m (Maybe result)-getPropertyPriority self propertyName-  = liftIO-      (fromMaybeJSString <$>-         (js_getPropertyPriority (self) (toJSString propertyName)))- -foreign import javascript unsafe "$1[\"setProperty\"]($2, $3, $4)"-        js_setProperty ::-        CSSStyleDeclaration ->-          JSString -> Nullable JSString -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleDeclaration.setProperty Mozilla CSSStyleDeclaration.setProperty documentation> -setProperty ::-            (MonadIO m, ToJSString propertyName, ToJSString value,-             ToJSString priority) =>-              CSSStyleDeclaration ->-                propertyName -> Maybe value -> priority -> m ()-setProperty self propertyName value priority-  = liftIO-      (js_setProperty (self) (toJSString propertyName)-         (toMaybeJSString value)-         (toJSString priority))- -foreign import javascript unsafe "$1[\"item\"]($2)" js_item ::-        CSSStyleDeclaration -> Word -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleDeclaration.item Mozilla CSSStyleDeclaration.item documentation> -item ::-     (MonadIO m, FromJSString result) =>-       CSSStyleDeclaration -> Word -> m result-item self index = liftIO (fromJSString <$> (js_item (self) index))- -foreign import javascript unsafe "$1[\"getPropertyShorthand\"]($2)"-        js_getPropertyShorthand ::-        CSSStyleDeclaration -> JSString -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleDeclaration.getPropertyShorthand Mozilla CSSStyleDeclaration.getPropertyShorthand documentation> -getPropertyShorthand ::-                     (MonadIO m, ToJSString propertyName, FromJSString result) =>-                       CSSStyleDeclaration -> propertyName -> m (Maybe result)-getPropertyShorthand self propertyName-  = liftIO-      (fromMaybeJSString <$>-         (js_getPropertyShorthand (self) (toJSString propertyName)))- -foreign import javascript unsafe-        "($1[\"isPropertyImplicit\"]($2) ? 1 : 0)" js_isPropertyImplicit ::-        CSSStyleDeclaration -> JSString -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleDeclaration.isPropertyImplicit Mozilla CSSStyleDeclaration.isPropertyImplicit documentation> -isPropertyImplicit ::-                   (MonadIO m, ToJSString propertyName) =>-                     CSSStyleDeclaration -> propertyName -> m Bool-isPropertyImplicit self propertyName-  = liftIO (js_isPropertyImplicit (self) (toJSString propertyName))- -foreign import javascript unsafe "$1[\"cssText\"] = $2;"-        js_setCssText :: CSSStyleDeclaration -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleDeclaration.cssText Mozilla CSSStyleDeclaration.cssText documentation> -setCssText ::-           (MonadIO m, ToJSString val) =>-             CSSStyleDeclaration -> Maybe val -> m ()-setCssText self val-  = liftIO (js_setCssText (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"cssText\"]" js_getCssText ::-        CSSStyleDeclaration -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleDeclaration.cssText Mozilla CSSStyleDeclaration.cssText documentation> -getCssText ::-           (MonadIO m, FromJSString result) =>-             CSSStyleDeclaration -> m (Maybe result)-getCssText self-  = liftIO (fromMaybeJSString <$> (js_getCssText (self)))- -foreign import javascript unsafe "$1[\"length\"]" js_getLength ::-        CSSStyleDeclaration -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleDeclaration.length Mozilla CSSStyleDeclaration.length documentation> -getLength :: (MonadIO m) => CSSStyleDeclaration -> m Word-getLength self = liftIO (js_getLength (self))- -foreign import javascript unsafe "$1[\"parentRule\"]"-        js_getParentRule :: CSSStyleDeclaration -> IO (Nullable CSSRule)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleDeclaration.parentRule Mozilla CSSStyleDeclaration.parentRule documentation> -getParentRule ::-              (MonadIO m) => CSSStyleDeclaration -> m (Maybe CSSRule)-getParentRule self-  = liftIO (nullableToMaybe <$> (js_getParentRule (self)))

− src/GHCJS/DOM/JSFFI/Generated/CSSStyleRule.hs

@@ -1,47 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CSSStyleRule-       (js_setSelectorText, setSelectorText, js_getSelectorText,-        getSelectorText, js_getStyle, getStyle, CSSStyleRule,-        castToCSSStyleRule, gTypeCSSStyleRule)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"selectorText\"] = $2;"-        js_setSelectorText :: CSSStyleRule -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleRule.selectorText Mozilla CSSStyleRule.selectorText documentation> -setSelectorText ::-                (MonadIO m, ToJSString val) => CSSStyleRule -> Maybe val -> m ()-setSelectorText self val-  = liftIO (js_setSelectorText (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"selectorText\"]"-        js_getSelectorText :: CSSStyleRule -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleRule.selectorText Mozilla CSSStyleRule.selectorText documentation> -getSelectorText ::-                (MonadIO m, FromJSString result) =>-                  CSSStyleRule -> m (Maybe result)-getSelectorText self-  = liftIO (fromMaybeJSString <$> (js_getSelectorText (self)))- -foreign import javascript unsafe "$1[\"style\"]" js_getStyle ::-        CSSStyleRule -> IO (Nullable CSSStyleDeclaration)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleRule.style Mozilla CSSStyleRule.style documentation> -getStyle ::-         (MonadIO m) => CSSStyleRule -> m (Maybe CSSStyleDeclaration)-getStyle self = liftIO (nullableToMaybe <$> (js_getStyle (self)))

− src/GHCJS/DOM/JSFFI/Generated/CSSStyleSheet.hs

@@ -1,81 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CSSStyleSheet-       (js_insertRule, insertRule, js_deleteRule, deleteRule, js_addRule,-        addRule, js_removeRule, removeRule, js_getOwnerRule, getOwnerRule,-        js_getCssRules, getCssRules, js_getRules, getRules, CSSStyleSheet,-        castToCSSStyleSheet, gTypeCSSStyleSheet)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"insertRule\"]($2, $3)"-        js_insertRule :: CSSStyleSheet -> JSString -> Word -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleSheet.insertRule Mozilla CSSStyleSheet.insertRule documentation> -insertRule ::-           (MonadIO m, ToJSString rule) =>-             CSSStyleSheet -> rule -> Word -> m Word-insertRule self rule index-  = liftIO (js_insertRule (self) (toJSString rule) index)- -foreign import javascript unsafe "$1[\"deleteRule\"]($2)"-        js_deleteRule :: CSSStyleSheet -> Word -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleSheet.deleteRule Mozilla CSSStyleSheet.deleteRule documentation> -deleteRule :: (MonadIO m) => CSSStyleSheet -> Word -> m ()-deleteRule self index = liftIO (js_deleteRule (self) index)- -foreign import javascript unsafe "$1[\"addRule\"]($2, $3, $4)"-        js_addRule ::-        CSSStyleSheet -> JSString -> JSString -> Word -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleSheet.addRule Mozilla CSSStyleSheet.addRule documentation> -addRule ::-        (MonadIO m, ToJSString selector, ToJSString style) =>-          CSSStyleSheet -> selector -> style -> Word -> m Int-addRule self selector style index-  = liftIO-      (js_addRule (self) (toJSString selector) (toJSString style) index)- -foreign import javascript unsafe "$1[\"removeRule\"]($2)"-        js_removeRule :: CSSStyleSheet -> Word -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleSheet.removeRule Mozilla CSSStyleSheet.removeRule documentation> -removeRule :: (MonadIO m) => CSSStyleSheet -> Word -> m ()-removeRule self index = liftIO (js_removeRule (self) index)- -foreign import javascript unsafe "$1[\"ownerRule\"]"-        js_getOwnerRule :: CSSStyleSheet -> IO (Nullable CSSRule)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleSheet.ownerRule Mozilla CSSStyleSheet.ownerRule documentation> -getOwnerRule :: (MonadIO m) => CSSStyleSheet -> m (Maybe CSSRule)-getOwnerRule self-  = liftIO (nullableToMaybe <$> (js_getOwnerRule (self)))- -foreign import javascript unsafe "$1[\"cssRules\"]" js_getCssRules-        :: CSSStyleSheet -> IO (Nullable CSSRuleList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleSheet.cssRules Mozilla CSSStyleSheet.cssRules documentation> -getCssRules ::-            (MonadIO m) => CSSStyleSheet -> m (Maybe CSSRuleList)-getCssRules self-  = liftIO (nullableToMaybe <$> (js_getCssRules (self)))- -foreign import javascript unsafe "$1[\"rules\"]" js_getRules ::-        CSSStyleSheet -> IO (Nullable CSSRuleList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleSheet.rules Mozilla CSSStyleSheet.rules documentation> -getRules :: (MonadIO m) => CSSStyleSheet -> m (Maybe CSSRuleList)-getRules self = liftIO (nullableToMaybe <$> (js_getRules (self)))

− src/GHCJS/DOM/JSFFI/Generated/CSSSupportsRule.hs

@@ -1,55 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CSSSupportsRule-       (js_insertRule, insertRule, js_deleteRule, deleteRule,-        js_getCssRules, getCssRules, js_getConditionText, getConditionText,-        CSSSupportsRule, castToCSSSupportsRule, gTypeCSSSupportsRule)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"insertRule\"]($2, $3)"-        js_insertRule :: CSSSupportsRule -> JSString -> Word -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSSupportsRule.insertRule Mozilla CSSSupportsRule.insertRule documentation> -insertRule ::-           (MonadIO m, ToJSString rule) =>-             CSSSupportsRule -> rule -> Word -> m Word-insertRule self rule index-  = liftIO (js_insertRule (self) (toJSString rule) index)- -foreign import javascript unsafe "$1[\"deleteRule\"]($2)"-        js_deleteRule :: CSSSupportsRule -> Word -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSSupportsRule.deleteRule Mozilla CSSSupportsRule.deleteRule documentation> -deleteRule :: (MonadIO m) => CSSSupportsRule -> Word -> m ()-deleteRule self index = liftIO (js_deleteRule (self) index)- -foreign import javascript unsafe "$1[\"cssRules\"]" js_getCssRules-        :: CSSSupportsRule -> IO (Nullable CSSRuleList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSSupportsRule.cssRules Mozilla CSSSupportsRule.cssRules documentation> -getCssRules ::-            (MonadIO m) => CSSSupportsRule -> m (Maybe CSSRuleList)-getCssRules self-  = liftIO (nullableToMaybe <$> (js_getCssRules (self)))- -foreign import javascript unsafe "$1[\"conditionText\"]"-        js_getConditionText :: CSSSupportsRule -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSSupportsRule.conditionText Mozilla CSSSupportsRule.conditionText documentation> -getConditionText ::-                 (MonadIO m, FromJSString result) => CSSSupportsRule -> m result-getConditionText self-  = liftIO (fromJSString <$> (js_getConditionText (self)))

− src/GHCJS/DOM/JSFFI/Generated/CSSValue.hs

@@ -1,54 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CSSValue-       (pattern CSS_INHERIT, pattern CSS_PRIMITIVE_VALUE,-        pattern CSS_VALUE_LIST, pattern CSS_CUSTOM, js_setCssText,-        setCssText, js_getCssText, getCssText, js_getCssValueType,-        getCssValueType, CSSValue, castToCSSValue, gTypeCSSValue,-        IsCSSValue, toCSSValue)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums-pattern CSS_INHERIT = 0-pattern CSS_PRIMITIVE_VALUE = 1-pattern CSS_VALUE_LIST = 2-pattern CSS_CUSTOM = 3- -foreign import javascript unsafe "$1[\"cssText\"] = $2;"-        js_setCssText :: CSSValue -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSValue.cssText Mozilla CSSValue.cssText documentation> -setCssText ::-           (MonadIO m, IsCSSValue self, ToJSString val) =>-             self -> Maybe val -> m ()-setCssText self val-  = liftIO (js_setCssText (toCSSValue self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"cssText\"]" js_getCssText ::-        CSSValue -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSValue.cssText Mozilla CSSValue.cssText documentation> -getCssText ::-           (MonadIO m, IsCSSValue self, FromJSString result) =>-             self -> m (Maybe result)-getCssText self-  = liftIO (fromMaybeJSString <$> (js_getCssText (toCSSValue self)))- -foreign import javascript unsafe "$1[\"cssValueType\"]"-        js_getCssValueType :: CSSValue -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSValue.cssValueType Mozilla CSSValue.cssValueType documentation> -getCssValueType :: (MonadIO m, IsCSSValue self) => self -> m Word-getCssValueType self-  = liftIO (js_getCssValueType (toCSSValue self))

− src/GHCJS/DOM/JSFFI/Generated/CSSValueList.hs

@@ -1,38 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CSSValueList-       (js_item, item, js_getLength, getLength, CSSValueList,-        castToCSSValueList, gTypeCSSValueList, IsCSSValueList,-        toCSSValueList)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"item\"]($2)" js_item ::-        CSSValueList -> Word -> IO (Nullable CSSValue)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSValueList.item Mozilla CSSValueList.item documentation> -item ::-     (MonadIO m, IsCSSValueList self) =>-       self -> Word -> m (Maybe CSSValue)-item self index-  = liftIO-      (nullableToMaybe <$> (js_item (toCSSValueList self) index))- -foreign import javascript unsafe "$1[\"length\"]" js_getLength ::-        CSSValueList -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSValueList.length Mozilla CSSValueList.length documentation> -getLength :: (MonadIO m, IsCSSValueList self) => self -> m Word-getLength self = liftIO (js_getLength (toCSSValueList self))

− src/GHCJS/DOM/JSFFI/Generated/CanvasGradient.hs

@@ -1,29 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CanvasGradient-       (js_addColorStop, addColorStop, CanvasGradient,-        castToCanvasGradient, gTypeCanvasGradient)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"addColorStop\"]($2, $3)"-        js_addColorStop :: CanvasGradient -> Float -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasGradient.addColorStop Mozilla CanvasGradient.addColorStop documentation> -addColorStop ::-             (MonadIO m, ToJSString color) =>-               CanvasGradient -> Float -> color -> m ()-addColorStop self offset color-  = liftIO (js_addColorStop (self) offset (toJSString color))

− src/GHCJS/DOM/JSFFI/Generated/CanvasRenderingContext.hs

@@ -1,32 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CanvasRenderingContext-       (js_getCanvas, getCanvas, CanvasRenderingContext,-        castToCanvasRenderingContext, gTypeCanvasRenderingContext,-        IsCanvasRenderingContext, toCanvasRenderingContext)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"canvas\"]" js_getCanvas ::-        CanvasRenderingContext -> IO (Nullable HTMLCanvasElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext.canvas Mozilla CanvasRenderingContext.canvas documentation> -getCanvas ::-          (MonadIO m, IsCanvasRenderingContext self) =>-            self -> m (Maybe HTMLCanvasElement)-getCanvas self-  = liftIO-      (nullableToMaybe <$>-         (js_getCanvas (toCanvasRenderingContext self)))

− src/GHCJS/DOM/JSFFI/Generated/CanvasRenderingContext2D.hs

@@ -1,1489 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CanvasRenderingContext2D-       (js_save, save, js_restore, restore, js_scale, scale, js_rotate,-        rotate, js_translate, translate, js_transform, transform,-        js_setTransform, setTransform, js_createLinearGradient,-        createLinearGradient, js_createRadialGradient,-        createRadialGradient, js_setLineDash, setLineDash, js_getLineDash,-        getLineDash, js_clearRect, clearRect, js_fillRect, fillRect,-        js_beginPath, beginPath, js_closePath, closePath, js_moveTo,-        moveTo, js_lineTo, lineTo, js_quadraticCurveTo, quadraticCurveTo,-        js_bezierCurveTo, bezierCurveTo, js_arcTo, arcTo, js_rect, rect,-        js_arc, arc, js_fillPath, fillPath, js_strokePath, strokePath,-        js_clipPath, clipPath, js_fill, fill, js_stroke, stroke, js_clip,-        clip, js_isPointInPathPath, isPointInPathPath,-        js_isPointInStrokePath, isPointInStrokePath, js_isPointInPath,-        isPointInPath, js_isPointInStroke, isPointInStroke, js_measureText,-        measureText, js_setAlpha, setAlpha, js_setCompositeOperation,-        setCompositeOperation, js_setLineWidthFunction,-        setLineWidthFunction, js_setLineCapFunction, setLineCapFunction,-        js_setLineJoinFunction, setLineJoinFunction,-        js_setMiterLimitFunction, setMiterLimitFunction, js_clearShadow,-        clearShadow, js_fillText, fillText, js_strokeText, strokeText,-        js_setStrokeColor, setStrokeColor, js_setStrokeColorGray,-        setStrokeColorGray, js_setStrokeColorRGB, setStrokeColorRGB,-        js_setStrokeColorCYMK, setStrokeColorCYMK, js_setFillColor,-        setFillColor, js_setFillColorGray, setFillColorGray,-        js_setFillColorRGB, setFillColorRGB, js_setFillColorCYMK,-        setFillColorCYMK, js_strokeRect, strokeRect, js_drawImage,-        drawImage, js_drawImageScaled, drawImageScaled, js_drawImagePart,-        drawImagePart, js_drawImageFromCanvas, drawImageFromCanvas,-        js_drawImageFromCanvasScaled, drawImageFromCanvasScaled,-        js_drawImageFromCanvasPart, drawImageFromCanvasPart,-        js_drawImageFromVideo, drawImageFromVideo,-        js_drawImageFromVideoScaled, drawImageFromVideoScaled,-        js_drawImageFromVideoPart, drawImageFromVideoPart,-        js_drawImageFromRect, drawImageFromRect, js_setShadow, setShadow,-        js_setShadowGray, setShadowGray, js_setShadowRGB, setShadowRGB,-        js_setShadowCYMK, setShadowCYMK, js_putImageData, putImageData,-        js_putImageDataDirty, putImageDataDirty, js_webkitPutImageDataHD,-        webkitPutImageDataHD, js_webkitPutImageDataHDDirty,-        webkitPutImageDataHDDirty, js_createPatternFromCanvas,-        createPatternFromCanvas, js_createPattern, createPattern,-        js_createImageData, createImageData, js_createImageDataSize,-        createImageDataSize, js_getImageData, getImageData,-        js_webkitGetImageDataHD, webkitGetImageDataHD,-        js_drawFocusIfNeeded, drawFocusIfNeeded, js_drawFocusIfNeededPath,-        drawFocusIfNeededPath, js_setGlobalAlpha, setGlobalAlpha,-        js_getGlobalAlpha, getGlobalAlpha, js_setGlobalCompositeOperation,-        setGlobalCompositeOperation, js_getGlobalCompositeOperation,-        getGlobalCompositeOperation, js_setLineWidth, setLineWidth,-        js_getLineWidth, getLineWidth, js_setLineCap, setLineCap,-        js_getLineCap, getLineCap, js_setLineJoin, setLineJoin,-        js_getLineJoin, getLineJoin, js_setMiterLimit, setMiterLimit,-        js_getMiterLimit, getMiterLimit, js_setShadowOffsetX,-        setShadowOffsetX, js_getShadowOffsetX, getShadowOffsetX,-        js_setShadowOffsetY, setShadowOffsetY, js_getShadowOffsetY,-        getShadowOffsetY, js_setShadowBlur, setShadowBlur,-        js_getShadowBlur, getShadowBlur, js_setShadowColor, setShadowColor,-        js_getShadowColor, getShadowColor, js_setLineDashOffset,-        setLineDashOffset, js_getLineDashOffset, getLineDashOffset,-        js_setWebkitLineDash, setWebkitLineDash, js_getWebkitLineDash,-        getWebkitLineDash, js_setWebkitLineDashOffset,-        setWebkitLineDashOffset, js_getWebkitLineDashOffset,-        getWebkitLineDashOffset, js_setFont, setFont, js_getFont, getFont,-        js_setTextAlign, setTextAlign, js_getTextAlign, getTextAlign,-        js_setTextBaseline, setTextBaseline, js_getTextBaseline,-        getTextBaseline, js_setDirection, setDirection, js_getDirection,-        getDirection, js_setStrokeStyle, setStrokeStyle, js_getStrokeStyle,-        getStrokeStyle, js_setFillStyle, setFillStyle, js_getFillStyle,-        getFillStyle, js_getWebkitBackingStorePixelRatio,-        getWebkitBackingStorePixelRatio, js_setWebkitImageSmoothingEnabled,-        setWebkitImageSmoothingEnabled, js_getWebkitImageSmoothingEnabled,-        getWebkitImageSmoothingEnabled, CanvasRenderingContext2D,-        castToCanvasRenderingContext2D, gTypeCanvasRenderingContext2D)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"save\"]()" js_save ::-        CanvasRenderingContext2D -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.save Mozilla CanvasRenderingContext2D.save documentation> -save :: (MonadIO m) => CanvasRenderingContext2D -> m ()-save self = liftIO (js_save (self))- -foreign import javascript unsafe "$1[\"restore\"]()" js_restore ::-        CanvasRenderingContext2D -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.restore Mozilla CanvasRenderingContext2D.restore documentation> -restore :: (MonadIO m) => CanvasRenderingContext2D -> m ()-restore self = liftIO (js_restore (self))- -foreign import javascript unsafe "$1[\"scale\"]($2, $3)" js_scale-        :: CanvasRenderingContext2D -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.scale Mozilla CanvasRenderingContext2D.scale documentation> -scale ::-      (MonadIO m) => CanvasRenderingContext2D -> Float -> Float -> m ()-scale self sx sy = liftIO (js_scale (self) sx sy)- -foreign import javascript unsafe "$1[\"rotate\"]($2)" js_rotate ::-        CanvasRenderingContext2D -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.rotate Mozilla CanvasRenderingContext2D.rotate documentation> -rotate :: (MonadIO m) => CanvasRenderingContext2D -> Float -> m ()-rotate self angle = liftIO (js_rotate (self) angle)- -foreign import javascript unsafe "$1[\"translate\"]($2, $3)"-        js_translate :: CanvasRenderingContext2D -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.translate Mozilla CanvasRenderingContext2D.translate documentation> -translate ::-          (MonadIO m) => CanvasRenderingContext2D -> Float -> Float -> m ()-translate self tx ty = liftIO (js_translate (self) tx ty)- -foreign import javascript unsafe-        "$1[\"transform\"]($2, $3, $4, $5,\n$6, $7)" js_transform ::-        CanvasRenderingContext2D ->-          Float -> Float -> Float -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.transform Mozilla CanvasRenderingContext2D.transform documentation> -transform ::-          (MonadIO m) =>-            CanvasRenderingContext2D ->-              Float -> Float -> Float -> Float -> Float -> Float -> m ()-transform self m11 m12 m21 m22 dx dy-  = liftIO (js_transform (self) m11 m12 m21 m22 dx dy)- -foreign import javascript unsafe-        "$1[\"setTransform\"]($2, $3, $4,\n$5, $6, $7)" js_setTransform ::-        CanvasRenderingContext2D ->-          Float -> Float -> Float -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.setTransform Mozilla CanvasRenderingContext2D.setTransform documentation> -setTransform ::-             (MonadIO m) =>-               CanvasRenderingContext2D ->-                 Float -> Float -> Float -> Float -> Float -> Float -> m ()-setTransform self m11 m12 m21 m22 dx dy-  = liftIO (js_setTransform (self) m11 m12 m21 m22 dx dy)- -foreign import javascript unsafe-        "$1[\"createLinearGradient\"]($2,\n$3, $4, $5)"-        js_createLinearGradient ::-        CanvasRenderingContext2D ->-          Float -> Float -> Float -> Float -> IO (Nullable CanvasGradient)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.createLinearGradient Mozilla CanvasRenderingContext2D.createLinearGradient documentation> -createLinearGradient ::-                     (MonadIO m) =>-                       CanvasRenderingContext2D ->-                         Float -> Float -> Float -> Float -> m (Maybe CanvasGradient)-createLinearGradient self x0 y0 x1 y1-  = liftIO-      (nullableToMaybe <$> (js_createLinearGradient (self) x0 y0 x1 y1))- -foreign import javascript unsafe-        "$1[\"createRadialGradient\"]($2,\n$3, $4, $5, $6, $7)"-        js_createRadialGradient ::-        CanvasRenderingContext2D ->-          Float ->-            Float ->-              Float -> Float -> Float -> Float -> IO (Nullable CanvasGradient)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.createRadialGradient Mozilla CanvasRenderingContext2D.createRadialGradient documentation> -createRadialGradient ::-                     (MonadIO m) =>-                       CanvasRenderingContext2D ->-                         Float ->-                           Float ->-                             Float -> Float -> Float -> Float -> m (Maybe CanvasGradient)-createRadialGradient self x0 y0 r0 x1 y1 r1-  = liftIO-      (nullableToMaybe <$>-         (js_createRadialGradient (self) x0 y0 r0 x1 y1 r1))- -foreign import javascript unsafe "$1[\"setLineDash\"]($2)"-        js_setLineDash :: CanvasRenderingContext2D -> JSVal -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.setLineDash Mozilla CanvasRenderingContext2D.setLineDash documentation> -setLineDash ::-            (MonadIO m) => CanvasRenderingContext2D -> [Float] -> m ()-setLineDash self dash-  = liftIO (toJSVal dash >>= \ dash' -> js_setLineDash (self) dash')- -foreign import javascript unsafe "$1[\"getLineDash\"]()"-        js_getLineDash :: CanvasRenderingContext2D -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.getLineDash Mozilla CanvasRenderingContext2D.getLineDash documentation> -getLineDash :: (MonadIO m) => CanvasRenderingContext2D -> m [Float]-getLineDash self-  = liftIO ((js_getLineDash (self)) >>= fromJSValUnchecked)- -foreign import javascript unsafe-        "$1[\"clearRect\"]($2, $3, $4, $5)" js_clearRect ::-        CanvasRenderingContext2D ->-          Float -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.clearRect Mozilla CanvasRenderingContext2D.clearRect documentation> -clearRect ::-          (MonadIO m) =>-            CanvasRenderingContext2D ->-              Float -> Float -> Float -> Float -> m ()-clearRect self x y width height-  = liftIO (js_clearRect (self) x y width height)- -foreign import javascript unsafe "$1[\"fillRect\"]($2, $3, $4, $5)"-        js_fillRect ::-        CanvasRenderingContext2D ->-          Float -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.fillRect Mozilla CanvasRenderingContext2D.fillRect documentation> -fillRect ::-         (MonadIO m) =>-           CanvasRenderingContext2D ->-             Float -> Float -> Float -> Float -> m ()-fillRect self x y width height-  = liftIO (js_fillRect (self) x y width height)- -foreign import javascript unsafe "$1[\"beginPath\"]()" js_beginPath-        :: CanvasRenderingContext2D -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.beginPath Mozilla CanvasRenderingContext2D.beginPath documentation> -beginPath :: (MonadIO m) => CanvasRenderingContext2D -> m ()-beginPath self = liftIO (js_beginPath (self))- -foreign import javascript unsafe "$1[\"closePath\"]()" js_closePath-        :: CanvasRenderingContext2D -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.closePath Mozilla CanvasRenderingContext2D.closePath documentation> -closePath :: (MonadIO m) => CanvasRenderingContext2D -> m ()-closePath self = liftIO (js_closePath (self))- -foreign import javascript unsafe "$1[\"moveTo\"]($2, $3)" js_moveTo-        :: CanvasRenderingContext2D -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.moveTo Mozilla CanvasRenderingContext2D.moveTo documentation> -moveTo ::-       (MonadIO m) => CanvasRenderingContext2D -> Float -> Float -> m ()-moveTo self x y = liftIO (js_moveTo (self) x y)- -foreign import javascript unsafe "$1[\"lineTo\"]($2, $3)" js_lineTo-        :: CanvasRenderingContext2D -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.lineTo Mozilla CanvasRenderingContext2D.lineTo documentation> -lineTo ::-       (MonadIO m) => CanvasRenderingContext2D -> Float -> Float -> m ()-lineTo self x y = liftIO (js_lineTo (self) x y)- -foreign import javascript unsafe-        "$1[\"quadraticCurveTo\"]($2, $3,\n$4, $5)" js_quadraticCurveTo ::-        CanvasRenderingContext2D ->-          Float -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.quadraticCurveTo Mozilla CanvasRenderingContext2D.quadraticCurveTo documentation> -quadraticCurveTo ::-                 (MonadIO m) =>-                   CanvasRenderingContext2D ->-                     Float -> Float -> Float -> Float -> m ()-quadraticCurveTo self cpx cpy x y-  = liftIO (js_quadraticCurveTo (self) cpx cpy x y)- -foreign import javascript unsafe-        "$1[\"bezierCurveTo\"]($2, $3, $4,\n$5, $6, $7)" js_bezierCurveTo-        ::-        CanvasRenderingContext2D ->-          Float -> Float -> Float -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.bezierCurveTo Mozilla CanvasRenderingContext2D.bezierCurveTo documentation> -bezierCurveTo ::-              (MonadIO m) =>-                CanvasRenderingContext2D ->-                  Float -> Float -> Float -> Float -> Float -> Float -> m ()-bezierCurveTo self cp1x cp1y cp2x cp2y x y-  = liftIO (js_bezierCurveTo (self) cp1x cp1y cp2x cp2y x y)- -foreign import javascript unsafe-        "$1[\"arcTo\"]($2, $3, $4, $5, $6)" js_arcTo ::-        CanvasRenderingContext2D ->-          Float -> Float -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.arcTo Mozilla CanvasRenderingContext2D.arcTo documentation> -arcTo ::-      (MonadIO m) =>-        CanvasRenderingContext2D ->-          Float -> Float -> Float -> Float -> Float -> m ()-arcTo self x1 y1 x2 y2 radius-  = liftIO (js_arcTo (self) x1 y1 x2 y2 radius)- -foreign import javascript unsafe "$1[\"rect\"]($2, $3, $4, $5)"-        js_rect ::-        CanvasRenderingContext2D ->-          Float -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.rect Mozilla CanvasRenderingContext2D.rect documentation> -rect ::-     (MonadIO m) =>-       CanvasRenderingContext2D ->-         Float -> Float -> Float -> Float -> m ()-rect self x y width height-  = liftIO (js_rect (self) x y width height)- -foreign import javascript unsafe-        "$1[\"arc\"]($2, $3, $4, $5, $6,\n$7)" js_arc ::-        CanvasRenderingContext2D ->-          Float -> Float -> Float -> Float -> Float -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.arc Mozilla CanvasRenderingContext2D.arc documentation> -arc ::-    (MonadIO m) =>-      CanvasRenderingContext2D ->-        Float -> Float -> Float -> Float -> Float -> Bool -> m ()-arc self x y radius startAngle endAngle anticlockwise-  = liftIO-      (js_arc (self) x y radius startAngle endAngle anticlockwise)- -foreign import javascript unsafe "$1[\"fill\"]($2, $3)" js_fillPath-        :: CanvasRenderingContext2D -> Nullable Path2D -> JSVal -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.fill Mozilla CanvasRenderingContext2D.fill documentation> -fillPath ::-         (MonadIO m) =>-           CanvasRenderingContext2D ->-             Maybe Path2D -> CanvasWindingRule -> m ()-fillPath self path winding-  = liftIO-      (js_fillPath (self) (maybeToNullable path) (pToJSVal winding))- -foreign import javascript unsafe "$1[\"stroke\"]($2)" js_strokePath-        :: CanvasRenderingContext2D -> Nullable Path2D -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.stroke Mozilla CanvasRenderingContext2D.stroke documentation> -strokePath ::-           (MonadIO m) => CanvasRenderingContext2D -> Maybe Path2D -> m ()-strokePath self path-  = liftIO (js_strokePath (self) (maybeToNullable path))- -foreign import javascript unsafe "$1[\"clip\"]($2, $3)" js_clipPath-        :: CanvasRenderingContext2D -> Nullable Path2D -> JSVal -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.clip Mozilla CanvasRenderingContext2D.clip documentation> -clipPath ::-         (MonadIO m) =>-           CanvasRenderingContext2D ->-             Maybe Path2D -> CanvasWindingRule -> m ()-clipPath self path winding-  = liftIO-      (js_clipPath (self) (maybeToNullable path) (pToJSVal winding))- -foreign import javascript unsafe "$1[\"fill\"]($2)" js_fill ::-        CanvasRenderingContext2D -> JSVal -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.fill Mozilla CanvasRenderingContext2D.fill documentation> -fill ::-     (MonadIO m) =>-       CanvasRenderingContext2D -> CanvasWindingRule -> m ()-fill self winding = liftIO (js_fill (self) (pToJSVal winding))- -foreign import javascript unsafe "$1[\"stroke\"]()" js_stroke ::-        CanvasRenderingContext2D -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.stroke Mozilla CanvasRenderingContext2D.stroke documentation> -stroke :: (MonadIO m) => CanvasRenderingContext2D -> m ()-stroke self = liftIO (js_stroke (self))- -foreign import javascript unsafe "$1[\"clip\"]($2)" js_clip ::-        CanvasRenderingContext2D -> JSVal -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.clip Mozilla CanvasRenderingContext2D.clip documentation> -clip ::-     (MonadIO m) =>-       CanvasRenderingContext2D -> CanvasWindingRule -> m ()-clip self winding = liftIO (js_clip (self) (pToJSVal winding))- -foreign import javascript unsafe-        "($1[\"isPointInPath\"]($2, $3, $4,\n$5) ? 1 : 0)"-        js_isPointInPathPath ::-        CanvasRenderingContext2D ->-          Nullable Path2D -> Float -> Float -> JSVal -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.isPointInPath Mozilla CanvasRenderingContext2D.isPointInPath documentation> -isPointInPathPath ::-                  (MonadIO m) =>-                    CanvasRenderingContext2D ->-                      Maybe Path2D -> Float -> Float -> CanvasWindingRule -> m Bool-isPointInPathPath self path x y winding-  = liftIO-      (js_isPointInPathPath (self) (maybeToNullable path) x y-         (pToJSVal winding))- -foreign import javascript unsafe-        "($1[\"isPointInStroke\"]($2, $3,\n$4) ? 1 : 0)"-        js_isPointInStrokePath ::-        CanvasRenderingContext2D ->-          Nullable Path2D -> Float -> Float -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.isPointInStroke Mozilla CanvasRenderingContext2D.isPointInStroke documentation> -isPointInStrokePath ::-                    (MonadIO m) =>-                      CanvasRenderingContext2D ->-                        Maybe Path2D -> Float -> Float -> m Bool-isPointInStrokePath self path x y-  = liftIO (js_isPointInStrokePath (self) (maybeToNullable path) x y)- -foreign import javascript unsafe-        "($1[\"isPointInPath\"]($2, $3,\n$4) ? 1 : 0)" js_isPointInPath ::-        CanvasRenderingContext2D -> Float -> Float -> JSVal -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.isPointInPath Mozilla CanvasRenderingContext2D.isPointInPath documentation> -isPointInPath ::-              (MonadIO m) =>-                CanvasRenderingContext2D ->-                  Float -> Float -> CanvasWindingRule -> m Bool-isPointInPath self x y winding-  = liftIO (js_isPointInPath (self) x y (pToJSVal winding))- -foreign import javascript unsafe-        "($1[\"isPointInStroke\"]($2,\n$3) ? 1 : 0)" js_isPointInStroke ::-        CanvasRenderingContext2D -> Float -> Float -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.isPointInStroke Mozilla CanvasRenderingContext2D.isPointInStroke documentation> -isPointInStroke ::-                (MonadIO m) => CanvasRenderingContext2D -> Float -> Float -> m Bool-isPointInStroke self x y = liftIO (js_isPointInStroke (self) x y)- -foreign import javascript unsafe "$1[\"measureText\"]($2)"-        js_measureText ::-        CanvasRenderingContext2D -> JSString -> IO (Nullable TextMetrics)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.measureText Mozilla CanvasRenderingContext2D.measureText documentation> -measureText ::-            (MonadIO m, ToJSString text) =>-              CanvasRenderingContext2D -> text -> m (Maybe TextMetrics)-measureText self text-  = liftIO-      (nullableToMaybe <$> (js_measureText (self) (toJSString text)))- -foreign import javascript unsafe "$1[\"setAlpha\"]($2)" js_setAlpha-        :: CanvasRenderingContext2D -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.setAlpha Mozilla CanvasRenderingContext2D.setAlpha documentation> -setAlpha ::-         (MonadIO m) => CanvasRenderingContext2D -> Float -> m ()-setAlpha self alpha = liftIO (js_setAlpha (self) alpha)- -foreign import javascript unsafe-        "$1[\"setCompositeOperation\"]($2)" js_setCompositeOperation ::-        CanvasRenderingContext2D -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.setCompositeOperation Mozilla CanvasRenderingContext2D.setCompositeOperation documentation> -setCompositeOperation ::-                      (MonadIO m, ToJSString compositeOperation) =>-                        CanvasRenderingContext2D -> compositeOperation -> m ()-setCompositeOperation self compositeOperation-  = liftIO-      (js_setCompositeOperation (self) (toJSString compositeOperation))- -foreign import javascript unsafe "$1[\"setLineWidth\"]($2)"-        js_setLineWidthFunction ::-        CanvasRenderingContext2D -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.setLineWidth Mozilla CanvasRenderingContext2D.setLineWidth documentation> -setLineWidthFunction ::-                     (MonadIO m) => CanvasRenderingContext2D -> Float -> m ()-setLineWidthFunction self width-  = liftIO (js_setLineWidthFunction (self) width)- -foreign import javascript unsafe "$1[\"setLineCap\"]($2)"-        js_setLineCapFunction ::-        CanvasRenderingContext2D -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.setLineCap Mozilla CanvasRenderingContext2D.setLineCap documentation> -setLineCapFunction ::-                   (MonadIO m, ToJSString cap) =>-                     CanvasRenderingContext2D -> cap -> m ()-setLineCapFunction self cap-  = liftIO (js_setLineCapFunction (self) (toJSString cap))- -foreign import javascript unsafe "$1[\"setLineJoin\"]($2)"-        js_setLineJoinFunction ::-        CanvasRenderingContext2D -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.setLineJoin Mozilla CanvasRenderingContext2D.setLineJoin documentation> -setLineJoinFunction ::-                    (MonadIO m, ToJSString join) =>-                      CanvasRenderingContext2D -> join -> m ()-setLineJoinFunction self join-  = liftIO (js_setLineJoinFunction (self) (toJSString join))- -foreign import javascript unsafe "$1[\"setMiterLimit\"]($2)"-        js_setMiterLimitFunction ::-        CanvasRenderingContext2D -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.setMiterLimit Mozilla CanvasRenderingContext2D.setMiterLimit documentation> -setMiterLimitFunction ::-                      (MonadIO m) => CanvasRenderingContext2D -> Float -> m ()-setMiterLimitFunction self limit-  = liftIO (js_setMiterLimitFunction (self) limit)- -foreign import javascript unsafe "$1[\"clearShadow\"]()"-        js_clearShadow :: CanvasRenderingContext2D -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.clearShadow Mozilla CanvasRenderingContext2D.clearShadow documentation> -clearShadow :: (MonadIO m) => CanvasRenderingContext2D -> m ()-clearShadow self = liftIO (js_clearShadow (self))- -foreign import javascript unsafe "$1[\"fillText\"]($2, $3, $4, $5)"-        js_fillText ::-        CanvasRenderingContext2D ->-          JSString -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.fillText Mozilla CanvasRenderingContext2D.fillText documentation> -fillText ::-         (MonadIO m, ToJSString text) =>-           CanvasRenderingContext2D -> text -> Float -> Float -> Float -> m ()-fillText self text x y maxWidth-  = liftIO (js_fillText (self) (toJSString text) x y maxWidth)- -foreign import javascript unsafe-        "$1[\"strokeText\"]($2, $3, $4, $5)" js_strokeText ::-        CanvasRenderingContext2D ->-          JSString -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.strokeText Mozilla CanvasRenderingContext2D.strokeText documentation> -strokeText ::-           (MonadIO m, ToJSString text) =>-             CanvasRenderingContext2D -> text -> Float -> Float -> Float -> m ()-strokeText self text x y maxWidth-  = liftIO (js_strokeText (self) (toJSString text) x y maxWidth)- -foreign import javascript unsafe "$1[\"setStrokeColor\"]($2, $3)"-        js_setStrokeColor ::-        CanvasRenderingContext2D -> JSString -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.setStrokeColor Mozilla CanvasRenderingContext2D.setStrokeColor documentation> -setStrokeColor ::-               (MonadIO m, ToJSString color) =>-                 CanvasRenderingContext2D -> color -> Float -> m ()-setStrokeColor self color alpha-  = liftIO (js_setStrokeColor (self) (toJSString color) alpha)- -foreign import javascript unsafe "$1[\"setStrokeColor\"]($2, $3)"-        js_setStrokeColorGray ::-        CanvasRenderingContext2D -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.setStrokeColor Mozilla CanvasRenderingContext2D.setStrokeColor documentation> -setStrokeColorGray ::-                   (MonadIO m) => CanvasRenderingContext2D -> Float -> Float -> m ()-setStrokeColorGray self grayLevel alpha-  = liftIO (js_setStrokeColorGray (self) grayLevel alpha)- -foreign import javascript unsafe-        "$1[\"setStrokeColor\"]($2, $3, $4,\n$5)" js_setStrokeColorRGB ::-        CanvasRenderingContext2D ->-          Float -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.setStrokeColor Mozilla CanvasRenderingContext2D.setStrokeColor documentation> -setStrokeColorRGB ::-                  (MonadIO m) =>-                    CanvasRenderingContext2D ->-                      Float -> Float -> Float -> Float -> m ()-setStrokeColorRGB self r g b a-  = liftIO (js_setStrokeColorRGB (self) r g b a)- -foreign import javascript unsafe-        "$1[\"setStrokeColor\"]($2, $3, $4,\n$5, $6)" js_setStrokeColorCYMK-        ::-        CanvasRenderingContext2D ->-          Float -> Float -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.setStrokeColor Mozilla CanvasRenderingContext2D.setStrokeColor documentation> -setStrokeColorCYMK ::-                   (MonadIO m) =>-                     CanvasRenderingContext2D ->-                       Float -> Float -> Float -> Float -> Float -> m ()-setStrokeColorCYMK self c m y k a-  = liftIO (js_setStrokeColorCYMK (self) c m y k a)- -foreign import javascript unsafe "$1[\"setFillColor\"]($2, $3)"-        js_setFillColor ::-        CanvasRenderingContext2D -> JSString -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.setFillColor Mozilla CanvasRenderingContext2D.setFillColor documentation> -setFillColor ::-             (MonadIO m, ToJSString color) =>-               CanvasRenderingContext2D -> color -> Float -> m ()-setFillColor self color alpha-  = liftIO (js_setFillColor (self) (toJSString color) alpha)- -foreign import javascript unsafe "$1[\"setFillColor\"]($2, $3)"-        js_setFillColorGray ::-        CanvasRenderingContext2D -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.setFillColor Mozilla CanvasRenderingContext2D.setFillColor documentation> -setFillColorGray ::-                 (MonadIO m) => CanvasRenderingContext2D -> Float -> Float -> m ()-setFillColorGray self grayLevel alpha-  = liftIO (js_setFillColorGray (self) grayLevel alpha)- -foreign import javascript unsafe-        "$1[\"setFillColor\"]($2, $3, $4,\n$5)" js_setFillColorRGB ::-        CanvasRenderingContext2D ->-          Float -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.setFillColor Mozilla CanvasRenderingContext2D.setFillColor documentation> -setFillColorRGB ::-                (MonadIO m) =>-                  CanvasRenderingContext2D ->-                    Float -> Float -> Float -> Float -> m ()-setFillColorRGB self r g b a-  = liftIO (js_setFillColorRGB (self) r g b a)- -foreign import javascript unsafe-        "$1[\"setFillColor\"]($2, $3, $4,\n$5, $6)" js_setFillColorCYMK ::-        CanvasRenderingContext2D ->-          Float -> Float -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.setFillColor Mozilla CanvasRenderingContext2D.setFillColor documentation> -setFillColorCYMK ::-                 (MonadIO m) =>-                   CanvasRenderingContext2D ->-                     Float -> Float -> Float -> Float -> Float -> m ()-setFillColorCYMK self c m y k a-  = liftIO (js_setFillColorCYMK (self) c m y k a)- -foreign import javascript unsafe-        "$1[\"strokeRect\"]($2, $3, $4, $5)" js_strokeRect ::-        CanvasRenderingContext2D ->-          Float -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.strokeRect Mozilla CanvasRenderingContext2D.strokeRect documentation> -strokeRect ::-           (MonadIO m) =>-             CanvasRenderingContext2D ->-               Float -> Float -> Float -> Float -> m ()-strokeRect self x y width height-  = liftIO (js_strokeRect (self) x y width height)- -foreign import javascript unsafe "$1[\"drawImage\"]($2, $3, $4)"-        js_drawImage ::-        CanvasRenderingContext2D ->-          Nullable HTMLImageElement -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.drawImage Mozilla CanvasRenderingContext2D.drawImage documentation> -drawImage ::-          (MonadIO m) =>-            CanvasRenderingContext2D ->-              Maybe HTMLImageElement -> Float -> Float -> m ()-drawImage self image x y-  = liftIO (js_drawImage (self) (maybeToNullable image) x y)- -foreign import javascript unsafe-        "$1[\"drawImage\"]($2, $3, $4, $5,\n$6)" js_drawImageScaled ::-        CanvasRenderingContext2D ->-          Nullable HTMLImageElement ->-            Float -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.drawImage Mozilla CanvasRenderingContext2D.drawImage documentation> -drawImageScaled ::-                (MonadIO m) =>-                  CanvasRenderingContext2D ->-                    Maybe HTMLImageElement -> Float -> Float -> Float -> Float -> m ()-drawImageScaled self image x y width height-  = liftIO-      (js_drawImageScaled (self) (maybeToNullable image) x y width-         height)- -foreign import javascript unsafe-        "$1[\"drawImage\"]($2, $3, $4, $5,\n$6, $7, $8, $9, $10)"-        js_drawImagePart ::-        CanvasRenderingContext2D ->-          Nullable HTMLImageElement ->-            Float ->-              Float ->-                Float -> Float -> Float -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.drawImage Mozilla CanvasRenderingContext2D.drawImage documentation> -drawImagePart ::-              (MonadIO m) =>-                CanvasRenderingContext2D ->-                  Maybe HTMLImageElement ->-                    Float ->-                      Float -> Float -> Float -> Float -> Float -> Float -> Float -> m ()-drawImagePart self image sx sy sw sh dx dy dw dh-  = liftIO-      (js_drawImagePart (self) (maybeToNullable image) sx sy sw sh dx dy-         dw-         dh)- -foreign import javascript unsafe "$1[\"drawImage\"]($2, $3, $4)"-        js_drawImageFromCanvas ::-        CanvasRenderingContext2D ->-          Nullable HTMLCanvasElement -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.drawImage Mozilla CanvasRenderingContext2D.drawImage documentation> -drawImageFromCanvas ::-                    (MonadIO m) =>-                      CanvasRenderingContext2D ->-                        Maybe HTMLCanvasElement -> Float -> Float -> m ()-drawImageFromCanvas self canvas x y-  = liftIO-      (js_drawImageFromCanvas (self) (maybeToNullable canvas) x y)- -foreign import javascript unsafe-        "$1[\"drawImage\"]($2, $3, $4, $5,\n$6)"-        js_drawImageFromCanvasScaled ::-        CanvasRenderingContext2D ->-          Nullable HTMLCanvasElement ->-            Float -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.drawImage Mozilla CanvasRenderingContext2D.drawImage documentation> -drawImageFromCanvasScaled ::-                          (MonadIO m) =>-                            CanvasRenderingContext2D ->-                              Maybe HTMLCanvasElement -> Float -> Float -> Float -> Float -> m ()-drawImageFromCanvasScaled self canvas x y width height-  = liftIO-      (js_drawImageFromCanvasScaled (self) (maybeToNullable canvas) x y-         width-         height)- -foreign import javascript unsafe-        "$1[\"drawImage\"]($2, $3, $4, $5,\n$6, $7, $8, $9, $10)"-        js_drawImageFromCanvasPart ::-        CanvasRenderingContext2D ->-          Nullable HTMLCanvasElement ->-            Float ->-              Float ->-                Float -> Float -> Float -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.drawImage Mozilla CanvasRenderingContext2D.drawImage documentation> -drawImageFromCanvasPart ::-                        (MonadIO m) =>-                          CanvasRenderingContext2D ->-                            Maybe HTMLCanvasElement ->-                              Float ->-                                Float -> Float -> Float -> Float -> Float -> Float -> Float -> m ()-drawImageFromCanvasPart self canvas sx sy sw sh dx dy dw dh-  = liftIO-      (js_drawImageFromCanvasPart (self) (maybeToNullable canvas) sx sy-         sw-         sh-         dx-         dy-         dw-         dh)- -foreign import javascript unsafe "$1[\"drawImage\"]($2, $3, $4)"-        js_drawImageFromVideo ::-        CanvasRenderingContext2D ->-          Nullable HTMLVideoElement -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.drawImage Mozilla CanvasRenderingContext2D.drawImage documentation> -drawImageFromVideo ::-                   (MonadIO m) =>-                     CanvasRenderingContext2D ->-                       Maybe HTMLVideoElement -> Float -> Float -> m ()-drawImageFromVideo self video x y-  = liftIO (js_drawImageFromVideo (self) (maybeToNullable video) x y)- -foreign import javascript unsafe-        "$1[\"drawImage\"]($2, $3, $4, $5,\n$6)"-        js_drawImageFromVideoScaled ::-        CanvasRenderingContext2D ->-          Nullable HTMLVideoElement ->-            Float -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.drawImage Mozilla CanvasRenderingContext2D.drawImage documentation> -drawImageFromVideoScaled ::-                         (MonadIO m) =>-                           CanvasRenderingContext2D ->-                             Maybe HTMLVideoElement -> Float -> Float -> Float -> Float -> m ()-drawImageFromVideoScaled self video x y width height-  = liftIO-      (js_drawImageFromVideoScaled (self) (maybeToNullable video) x y-         width-         height)- -foreign import javascript unsafe-        "$1[\"drawImage\"]($2, $3, $4, $5,\n$6, $7, $8, $9, $10)"-        js_drawImageFromVideoPart ::-        CanvasRenderingContext2D ->-          Nullable HTMLVideoElement ->-            Float ->-              Float ->-                Float -> Float -> Float -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.drawImage Mozilla CanvasRenderingContext2D.drawImage documentation> -drawImageFromVideoPart ::-                       (MonadIO m) =>-                         CanvasRenderingContext2D ->-                           Maybe HTMLVideoElement ->-                             Float ->-                               Float -> Float -> Float -> Float -> Float -> Float -> Float -> m ()-drawImageFromVideoPart self video sx sy sw sh dx dy dw dh-  = liftIO-      (js_drawImageFromVideoPart (self) (maybeToNullable video) sx sy sw-         sh-         dx-         dy-         dw-         dh)- -foreign import javascript unsafe-        "$1[\"drawImageFromRect\"]($2, $3,\n$4, $5, $6, $7, $8, $9, $10,\n$11)"-        js_drawImageFromRect ::-        CanvasRenderingContext2D ->-          Nullable HTMLImageElement ->-            Float ->-              Float ->-                Float ->-                  Float -> Float -> Float -> Float -> Float -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.drawImageFromRect Mozilla CanvasRenderingContext2D.drawImageFromRect documentation> -drawImageFromRect ::-                  (MonadIO m, ToJSString compositeOperation) =>-                    CanvasRenderingContext2D ->-                      Maybe HTMLImageElement ->-                        Float ->-                          Float ->-                            Float ->-                              Float ->-                                Float -> Float -> Float -> Float -> compositeOperation -> m ()-drawImageFromRect self image sx sy sw sh dx dy dw dh-  compositeOperation-  = liftIO-      (js_drawImageFromRect (self) (maybeToNullable image) sx sy sw sh dx-         dy-         dw-         dh-         (toJSString compositeOperation))- -foreign import javascript unsafe-        "$1[\"setShadow\"]($2, $3, $4, $5,\n$6)" js_setShadow ::-        CanvasRenderingContext2D ->-          Float -> Float -> Float -> JSString -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.setShadow Mozilla CanvasRenderingContext2D.setShadow documentation> -setShadow ::-          (MonadIO m, ToJSString color) =>-            CanvasRenderingContext2D ->-              Float -> Float -> Float -> color -> Float -> m ()-setShadow self width height blur color alpha-  = liftIO-      (js_setShadow (self) width height blur (toJSString color) alpha)- -foreign import javascript unsafe-        "$1[\"setShadow\"]($2, $3, $4, $5,\n$6)" js_setShadowGray ::-        CanvasRenderingContext2D ->-          Float -> Float -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.setShadow Mozilla CanvasRenderingContext2D.setShadow documentation> -setShadowGray ::-              (MonadIO m) =>-                CanvasRenderingContext2D ->-                  Float -> Float -> Float -> Float -> Float -> m ()-setShadowGray self width height blur grayLevel alpha-  = liftIO-      (js_setShadowGray (self) width height blur grayLevel alpha)- -foreign import javascript unsafe-        "$1[\"setShadow\"]($2, $3, $4, $5,\n$6, $7, $8)" js_setShadowRGB ::-        CanvasRenderingContext2D ->-          Float ->-            Float -> Float -> Float -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.setShadow Mozilla CanvasRenderingContext2D.setShadow documentation> -setShadowRGB ::-             (MonadIO m) =>-               CanvasRenderingContext2D ->-                 Float -> Float -> Float -> Float -> Float -> Float -> Float -> m ()-setShadowRGB self width height blur r g b a-  = liftIO (js_setShadowRGB (self) width height blur r g b a)- -foreign import javascript unsafe-        "$1[\"setShadow\"]($2, $3, $4, $5,\n$6, $7, $8, $9)"-        js_setShadowCYMK ::-        CanvasRenderingContext2D ->-          Float ->-            Float ->-              Float -> Float -> Float -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.setShadow Mozilla CanvasRenderingContext2D.setShadow documentation> -setShadowCYMK ::-              (MonadIO m) =>-                CanvasRenderingContext2D ->-                  Float ->-                    Float -> Float -> Float -> Float -> Float -> Float -> Float -> m ()-setShadowCYMK self width height blur c m y k a-  = liftIO (js_setShadowCYMK (self) width height blur c m y k a)- -foreign import javascript unsafe "$1[\"putImageData\"]($2, $3, $4)"-        js_putImageData ::-        CanvasRenderingContext2D ->-          Nullable ImageData -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.putImageData Mozilla CanvasRenderingContext2D.putImageData documentation> -putImageData ::-             (MonadIO m) =>-               CanvasRenderingContext2D ->-                 Maybe ImageData -> Float -> Float -> m ()-putImageData self imagedata dx dy-  = liftIO (js_putImageData (self) (maybeToNullable imagedata) dx dy)- -foreign import javascript unsafe-        "$1[\"putImageData\"]($2, $3, $4,\n$5, $6, $7, $8)"-        js_putImageDataDirty ::-        CanvasRenderingContext2D ->-          Nullable ImageData ->-            Float -> Float -> Float -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.putImageData Mozilla CanvasRenderingContext2D.putImageData documentation> -putImageDataDirty ::-                  (MonadIO m) =>-                    CanvasRenderingContext2D ->-                      Maybe ImageData ->-                        Float -> Float -> Float -> Float -> Float -> Float -> m ()-putImageDataDirty self imagedata dx dy dirtyX dirtyY dirtyWidth-  dirtyHeight-  = liftIO-      (js_putImageDataDirty (self) (maybeToNullable imagedata) dx dy-         dirtyX-         dirtyY-         dirtyWidth-         dirtyHeight)- -foreign import javascript unsafe-        "$1[\"webkitPutImageDataHD\"]($2,\n$3, $4)" js_webkitPutImageDataHD-        ::-        CanvasRenderingContext2D ->-          Nullable ImageData -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.webkitPutImageDataHD Mozilla CanvasRenderingContext2D.webkitPutImageDataHD documentation> -webkitPutImageDataHD ::-                     (MonadIO m) =>-                       CanvasRenderingContext2D ->-                         Maybe ImageData -> Float -> Float -> m ()-webkitPutImageDataHD self imagedata dx dy-  = liftIO-      (js_webkitPutImageDataHD (self) (maybeToNullable imagedata) dx dy)- -foreign import javascript unsafe-        "$1[\"webkitPutImageDataHD\"]($2,\n$3, $4, $5, $6, $7, $8)"-        js_webkitPutImageDataHDDirty ::-        CanvasRenderingContext2D ->-          Nullable ImageData ->-            Float -> Float -> Float -> Float -> Float -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.webkitPutImageDataHD Mozilla CanvasRenderingContext2D.webkitPutImageDataHD documentation> -webkitPutImageDataHDDirty ::-                          (MonadIO m) =>-                            CanvasRenderingContext2D ->-                              Maybe ImageData ->-                                Float -> Float -> Float -> Float -> Float -> Float -> m ()-webkitPutImageDataHDDirty self imagedata dx dy dirtyX dirtyY-  dirtyWidth dirtyHeight-  = liftIO-      (js_webkitPutImageDataHDDirty (self) (maybeToNullable imagedata) dx-         dy-         dirtyX-         dirtyY-         dirtyWidth-         dirtyHeight)- -foreign import javascript unsafe "$1[\"createPattern\"]($2, $3)"-        js_createPatternFromCanvas ::-        CanvasRenderingContext2D ->-          Nullable HTMLCanvasElement ->-            Nullable JSString -> IO (Nullable CanvasPattern)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.createPattern Mozilla CanvasRenderingContext2D.createPattern documentation> -createPatternFromCanvas ::-                        (MonadIO m, ToJSString repetitionType) =>-                          CanvasRenderingContext2D ->-                            Maybe HTMLCanvasElement ->-                              Maybe repetitionType -> m (Maybe CanvasPattern)-createPatternFromCanvas self canvas repetitionType-  = liftIO-      (nullableToMaybe <$>-         (js_createPatternFromCanvas (self) (maybeToNullable canvas)-            (toMaybeJSString repetitionType)))- -foreign import javascript unsafe "$1[\"createPattern\"]($2, $3)"-        js_createPattern ::-        CanvasRenderingContext2D ->-          Nullable HTMLImageElement ->-            Nullable JSString -> IO (Nullable CanvasPattern)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.createPattern Mozilla CanvasRenderingContext2D.createPattern documentation> -createPattern ::-              (MonadIO m, ToJSString repetitionType) =>-                CanvasRenderingContext2D ->-                  Maybe HTMLImageElement ->-                    Maybe repetitionType -> m (Maybe CanvasPattern)-createPattern self image repetitionType-  = liftIO-      (nullableToMaybe <$>-         (js_createPattern (self) (maybeToNullable image)-            (toMaybeJSString repetitionType)))- -foreign import javascript unsafe "$1[\"createImageData\"]($2)"-        js_createImageData ::-        CanvasRenderingContext2D ->-          Nullable ImageData -> IO (Nullable ImageData)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.createImageData Mozilla CanvasRenderingContext2D.createImageData documentation> -createImageData ::-                (MonadIO m) =>-                  CanvasRenderingContext2D -> Maybe ImageData -> m (Maybe ImageData)-createImageData self imagedata-  = liftIO-      (nullableToMaybe <$>-         (js_createImageData (self) (maybeToNullable imagedata)))- -foreign import javascript unsafe "$1[\"createImageData\"]($2, $3)"-        js_createImageDataSize ::-        CanvasRenderingContext2D ->-          Float -> Float -> IO (Nullable ImageData)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.createImageData Mozilla CanvasRenderingContext2D.createImageData documentation> -createImageDataSize ::-                    (MonadIO m) =>-                      CanvasRenderingContext2D -> Float -> Float -> m (Maybe ImageData)-createImageDataSize self sw sh-  = liftIO-      (nullableToMaybe <$> (js_createImageDataSize (self) sw sh))- -foreign import javascript unsafe-        "$1[\"getImageData\"]($2, $3, $4,\n$5)" js_getImageData ::-        CanvasRenderingContext2D ->-          Float -> Float -> Float -> Float -> IO (Nullable ImageData)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.getImageData Mozilla CanvasRenderingContext2D.getImageData documentation> -getImageData ::-             (MonadIO m) =>-               CanvasRenderingContext2D ->-                 Float -> Float -> Float -> Float -> m (Maybe ImageData)-getImageData self sx sy sw sh-  = liftIO (nullableToMaybe <$> (js_getImageData (self) sx sy sw sh))- -foreign import javascript unsafe-        "$1[\"webkitGetImageDataHD\"]($2,\n$3, $4, $5)"-        js_webkitGetImageDataHD ::-        CanvasRenderingContext2D ->-          Float -> Float -> Float -> Float -> IO (Nullable ImageData)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.webkitGetImageDataHD Mozilla CanvasRenderingContext2D.webkitGetImageDataHD documentation> -webkitGetImageDataHD ::-                     (MonadIO m) =>-                       CanvasRenderingContext2D ->-                         Float -> Float -> Float -> Float -> m (Maybe ImageData)-webkitGetImageDataHD self sx sy sw sh-  = liftIO-      (nullableToMaybe <$> (js_webkitGetImageDataHD (self) sx sy sw sh))- -foreign import javascript unsafe "$1[\"drawFocusIfNeeded\"]($2)"-        js_drawFocusIfNeeded ::-        CanvasRenderingContext2D -> Nullable Element -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.drawFocusIfNeeded Mozilla CanvasRenderingContext2D.drawFocusIfNeeded documentation> -drawFocusIfNeeded ::-                  (MonadIO m, IsElement element) =>-                    CanvasRenderingContext2D -> Maybe element -> m ()-drawFocusIfNeeded self element-  = liftIO-      (js_drawFocusIfNeeded (self)-         (maybeToNullable (fmap toElement element)))- -foreign import javascript unsafe-        "$1[\"drawFocusIfNeeded\"]($2, $3)" js_drawFocusIfNeededPath ::-        CanvasRenderingContext2D ->-          Nullable Path2D -> Nullable Element -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.drawFocusIfNeeded Mozilla CanvasRenderingContext2D.drawFocusIfNeeded documentation> -drawFocusIfNeededPath ::-                      (MonadIO m, IsElement element) =>-                        CanvasRenderingContext2D -> Maybe Path2D -> Maybe element -> m ()-drawFocusIfNeededPath self path element-  = liftIO-      (js_drawFocusIfNeededPath (self) (maybeToNullable path)-         (maybeToNullable (fmap toElement element)))- -foreign import javascript unsafe "$1[\"globalAlpha\"] = $2;"-        js_setGlobalAlpha :: CanvasRenderingContext2D -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.globalAlpha Mozilla CanvasRenderingContext2D.globalAlpha documentation> -setGlobalAlpha ::-               (MonadIO m) => CanvasRenderingContext2D -> Float -> m ()-setGlobalAlpha self val = liftIO (js_setGlobalAlpha (self) val)- -foreign import javascript unsafe "$1[\"globalAlpha\"]"-        js_getGlobalAlpha :: CanvasRenderingContext2D -> IO Float---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.globalAlpha Mozilla CanvasRenderingContext2D.globalAlpha documentation> -getGlobalAlpha ::-               (MonadIO m) => CanvasRenderingContext2D -> m Float-getGlobalAlpha self = liftIO (js_getGlobalAlpha (self))- -foreign import javascript unsafe-        "$1[\"globalCompositeOperation\"] = $2;"-        js_setGlobalCompositeOperation ::-        CanvasRenderingContext2D -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.globalCompositeOperation Mozilla CanvasRenderingContext2D.globalCompositeOperation documentation> -setGlobalCompositeOperation ::-                            (MonadIO m, ToJSString val) =>-                              CanvasRenderingContext2D -> Maybe val -> m ()-setGlobalCompositeOperation self val-  = liftIO-      (js_setGlobalCompositeOperation (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"globalCompositeOperation\"]"-        js_getGlobalCompositeOperation ::-        CanvasRenderingContext2D -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.globalCompositeOperation Mozilla CanvasRenderingContext2D.globalCompositeOperation documentation> -getGlobalCompositeOperation ::-                            (MonadIO m, FromJSString result) =>-                              CanvasRenderingContext2D -> m (Maybe result)-getGlobalCompositeOperation self-  = liftIO-      (fromMaybeJSString <$> (js_getGlobalCompositeOperation (self)))- -foreign import javascript unsafe "$1[\"lineWidth\"] = $2;"-        js_setLineWidth :: CanvasRenderingContext2D -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.lineWidth Mozilla CanvasRenderingContext2D.lineWidth documentation> -setLineWidth ::-             (MonadIO m) => CanvasRenderingContext2D -> Float -> m ()-setLineWidth self val = liftIO (js_setLineWidth (self) val)- -foreign import javascript unsafe "$1[\"lineWidth\"]"-        js_getLineWidth :: CanvasRenderingContext2D -> IO Float---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.lineWidth Mozilla CanvasRenderingContext2D.lineWidth documentation> -getLineWidth :: (MonadIO m) => CanvasRenderingContext2D -> m Float-getLineWidth self = liftIO (js_getLineWidth (self))- -foreign import javascript unsafe "$1[\"lineCap\"] = $2;"-        js_setLineCap ::-        CanvasRenderingContext2D -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.lineCap Mozilla CanvasRenderingContext2D.lineCap documentation> -setLineCap ::-           (MonadIO m, ToJSString val) =>-             CanvasRenderingContext2D -> Maybe val -> m ()-setLineCap self val-  = liftIO (js_setLineCap (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"lineCap\"]" js_getLineCap ::-        CanvasRenderingContext2D -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.lineCap Mozilla CanvasRenderingContext2D.lineCap documentation> -getLineCap ::-           (MonadIO m, FromJSString result) =>-             CanvasRenderingContext2D -> m (Maybe result)-getLineCap self-  = liftIO (fromMaybeJSString <$> (js_getLineCap (self)))- -foreign import javascript unsafe "$1[\"lineJoin\"] = $2;"-        js_setLineJoin ::-        CanvasRenderingContext2D -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.lineJoin Mozilla CanvasRenderingContext2D.lineJoin documentation> -setLineJoin ::-            (MonadIO m, ToJSString val) =>-              CanvasRenderingContext2D -> Maybe val -> m ()-setLineJoin self val-  = liftIO (js_setLineJoin (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"lineJoin\"]" js_getLineJoin-        :: CanvasRenderingContext2D -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.lineJoin Mozilla CanvasRenderingContext2D.lineJoin documentation> -getLineJoin ::-            (MonadIO m, FromJSString result) =>-              CanvasRenderingContext2D -> m (Maybe result)-getLineJoin self-  = liftIO (fromMaybeJSString <$> (js_getLineJoin (self)))- -foreign import javascript unsafe "$1[\"miterLimit\"] = $2;"-        js_setMiterLimit :: CanvasRenderingContext2D -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.miterLimit Mozilla CanvasRenderingContext2D.miterLimit documentation> -setMiterLimit ::-              (MonadIO m) => CanvasRenderingContext2D -> Float -> m ()-setMiterLimit self val = liftIO (js_setMiterLimit (self) val)- -foreign import javascript unsafe "$1[\"miterLimit\"]"-        js_getMiterLimit :: CanvasRenderingContext2D -> IO Float---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.miterLimit Mozilla CanvasRenderingContext2D.miterLimit documentation> -getMiterLimit :: (MonadIO m) => CanvasRenderingContext2D -> m Float-getMiterLimit self = liftIO (js_getMiterLimit (self))- -foreign import javascript unsafe "$1[\"shadowOffsetX\"] = $2;"-        js_setShadowOffsetX :: CanvasRenderingContext2D -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.shadowOffsetX Mozilla CanvasRenderingContext2D.shadowOffsetX documentation> -setShadowOffsetX ::-                 (MonadIO m) => CanvasRenderingContext2D -> Float -> m ()-setShadowOffsetX self val = liftIO (js_setShadowOffsetX (self) val)- -foreign import javascript unsafe "$1[\"shadowOffsetX\"]"-        js_getShadowOffsetX :: CanvasRenderingContext2D -> IO Float---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.shadowOffsetX Mozilla CanvasRenderingContext2D.shadowOffsetX documentation> -getShadowOffsetX ::-                 (MonadIO m) => CanvasRenderingContext2D -> m Float-getShadowOffsetX self = liftIO (js_getShadowOffsetX (self))- -foreign import javascript unsafe "$1[\"shadowOffsetY\"] = $2;"-        js_setShadowOffsetY :: CanvasRenderingContext2D -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.shadowOffsetY Mozilla CanvasRenderingContext2D.shadowOffsetY documentation> -setShadowOffsetY ::-                 (MonadIO m) => CanvasRenderingContext2D -> Float -> m ()-setShadowOffsetY self val = liftIO (js_setShadowOffsetY (self) val)- -foreign import javascript unsafe "$1[\"shadowOffsetY\"]"-        js_getShadowOffsetY :: CanvasRenderingContext2D -> IO Float---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.shadowOffsetY Mozilla CanvasRenderingContext2D.shadowOffsetY documentation> -getShadowOffsetY ::-                 (MonadIO m) => CanvasRenderingContext2D -> m Float-getShadowOffsetY self = liftIO (js_getShadowOffsetY (self))- -foreign import javascript unsafe "$1[\"shadowBlur\"] = $2;"-        js_setShadowBlur :: CanvasRenderingContext2D -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.shadowBlur Mozilla CanvasRenderingContext2D.shadowBlur documentation> -setShadowBlur ::-              (MonadIO m) => CanvasRenderingContext2D -> Float -> m ()-setShadowBlur self val = liftIO (js_setShadowBlur (self) val)- -foreign import javascript unsafe "$1[\"shadowBlur\"]"-        js_getShadowBlur :: CanvasRenderingContext2D -> IO Float---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.shadowBlur Mozilla CanvasRenderingContext2D.shadowBlur documentation> -getShadowBlur :: (MonadIO m) => CanvasRenderingContext2D -> m Float-getShadowBlur self = liftIO (js_getShadowBlur (self))- -foreign import javascript unsafe "$1[\"shadowColor\"] = $2;"-        js_setShadowColor ::-        CanvasRenderingContext2D -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.shadowColor Mozilla CanvasRenderingContext2D.shadowColor documentation> -setShadowColor ::-               (MonadIO m, ToJSString val) =>-                 CanvasRenderingContext2D -> Maybe val -> m ()-setShadowColor self val-  = liftIO (js_setShadowColor (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"shadowColor\"]"-        js_getShadowColor ::-        CanvasRenderingContext2D -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.shadowColor Mozilla CanvasRenderingContext2D.shadowColor documentation> -getShadowColor ::-               (MonadIO m, FromJSString result) =>-                 CanvasRenderingContext2D -> m (Maybe result)-getShadowColor self-  = liftIO (fromMaybeJSString <$> (js_getShadowColor (self)))- -foreign import javascript unsafe "$1[\"lineDashOffset\"] = $2;"-        js_setLineDashOffset :: CanvasRenderingContext2D -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.lineDashOffset Mozilla CanvasRenderingContext2D.lineDashOffset documentation> -setLineDashOffset ::-                  (MonadIO m) => CanvasRenderingContext2D -> Float -> m ()-setLineDashOffset self val-  = liftIO (js_setLineDashOffset (self) val)- -foreign import javascript unsafe "$1[\"lineDashOffset\"]"-        js_getLineDashOffset :: CanvasRenderingContext2D -> IO Float---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.lineDashOffset Mozilla CanvasRenderingContext2D.lineDashOffset documentation> -getLineDashOffset ::-                  (MonadIO m) => CanvasRenderingContext2D -> m Float-getLineDashOffset self = liftIO (js_getLineDashOffset (self))- -foreign import javascript unsafe "$1[\"webkitLineDash\"] = $2;"-        js_setWebkitLineDash ::-        CanvasRenderingContext2D -> Nullable Array -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.webkitLineDash Mozilla CanvasRenderingContext2D.webkitLineDash documentation> -setWebkitLineDash ::-                  (MonadIO m, IsArray val) =>-                    CanvasRenderingContext2D -> Maybe val -> m ()-setWebkitLineDash self val-  = liftIO-      (js_setWebkitLineDash (self) (maybeToNullable (fmap toArray val)))- -foreign import javascript unsafe "$1[\"webkitLineDash\"]"-        js_getWebkitLineDash ::-        CanvasRenderingContext2D -> IO (Nullable Array)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.webkitLineDash Mozilla CanvasRenderingContext2D.webkitLineDash documentation> -getWebkitLineDash ::-                  (MonadIO m) => CanvasRenderingContext2D -> m (Maybe Array)-getWebkitLineDash self-  = liftIO (nullableToMaybe <$> (js_getWebkitLineDash (self)))- -foreign import javascript unsafe-        "$1[\"webkitLineDashOffset\"] = $2;" js_setWebkitLineDashOffset ::-        CanvasRenderingContext2D -> Float -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.webkitLineDashOffset Mozilla CanvasRenderingContext2D.webkitLineDashOffset documentation> -setWebkitLineDashOffset ::-                        (MonadIO m) => CanvasRenderingContext2D -> Float -> m ()-setWebkitLineDashOffset self val-  = liftIO (js_setWebkitLineDashOffset (self) val)- -foreign import javascript unsafe "$1[\"webkitLineDashOffset\"]"-        js_getWebkitLineDashOffset :: CanvasRenderingContext2D -> IO Float---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.webkitLineDashOffset Mozilla CanvasRenderingContext2D.webkitLineDashOffset documentation> -getWebkitLineDashOffset ::-                        (MonadIO m) => CanvasRenderingContext2D -> m Float-getWebkitLineDashOffset self-  = liftIO (js_getWebkitLineDashOffset (self))- -foreign import javascript unsafe "$1[\"font\"] = $2;" js_setFont ::-        CanvasRenderingContext2D -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.font Mozilla CanvasRenderingContext2D.font documentation> -setFont ::-        (MonadIO m, ToJSString val) =>-          CanvasRenderingContext2D -> val -> m ()-setFont self val = liftIO (js_setFont (self) (toJSString val))- -foreign import javascript unsafe "$1[\"font\"]" js_getFont ::-        CanvasRenderingContext2D -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.font Mozilla CanvasRenderingContext2D.font documentation> -getFont ::-        (MonadIO m, FromJSString result) =>-          CanvasRenderingContext2D -> m result-getFont self = liftIO (fromJSString <$> (js_getFont (self)))- -foreign import javascript unsafe "$1[\"textAlign\"] = $2;"-        js_setTextAlign :: CanvasRenderingContext2D -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.textAlign Mozilla CanvasRenderingContext2D.textAlign documentation> -setTextAlign ::-             (MonadIO m, ToJSString val) =>-               CanvasRenderingContext2D -> val -> m ()-setTextAlign self val-  = liftIO (js_setTextAlign (self) (toJSString val))- -foreign import javascript unsafe "$1[\"textAlign\"]"-        js_getTextAlign :: CanvasRenderingContext2D -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.textAlign Mozilla CanvasRenderingContext2D.textAlign documentation> -getTextAlign ::-             (MonadIO m, FromJSString result) =>-               CanvasRenderingContext2D -> m result-getTextAlign self-  = liftIO (fromJSString <$> (js_getTextAlign (self)))- -foreign import javascript unsafe "$1[\"textBaseline\"] = $2;"-        js_setTextBaseline :: CanvasRenderingContext2D -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.textBaseline Mozilla CanvasRenderingContext2D.textBaseline documentation> -setTextBaseline ::-                (MonadIO m, ToJSString val) =>-                  CanvasRenderingContext2D -> val -> m ()-setTextBaseline self val-  = liftIO (js_setTextBaseline (self) (toJSString val))- -foreign import javascript unsafe "$1[\"textBaseline\"]"-        js_getTextBaseline :: CanvasRenderingContext2D -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.textBaseline Mozilla CanvasRenderingContext2D.textBaseline documentation> -getTextBaseline ::-                (MonadIO m, FromJSString result) =>-                  CanvasRenderingContext2D -> m result-getTextBaseline self-  = liftIO (fromJSString <$> (js_getTextBaseline (self)))- -foreign import javascript unsafe "$1[\"direction\"] = $2;"-        js_setDirection :: CanvasRenderingContext2D -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.direction Mozilla CanvasRenderingContext2D.direction documentation> -setDirection ::-             (MonadIO m, ToJSString val) =>-               CanvasRenderingContext2D -> val -> m ()-setDirection self val-  = liftIO (js_setDirection (self) (toJSString val))- -foreign import javascript unsafe "$1[\"direction\"]"-        js_getDirection :: CanvasRenderingContext2D -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.direction Mozilla CanvasRenderingContext2D.direction documentation> -getDirection ::-             (MonadIO m, FromJSString result) =>-               CanvasRenderingContext2D -> m result-getDirection self-  = liftIO (fromJSString <$> (js_getDirection (self)))- -foreign import javascript unsafe "$1[\"strokeStyle\"] = $2;"-        js_setStrokeStyle ::-        CanvasRenderingContext2D -> Nullable CanvasStyle -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.strokeStyle Mozilla CanvasRenderingContext2D.strokeStyle documentation> -setStrokeStyle ::-               (MonadIO m, IsCanvasStyle val) =>-                 CanvasRenderingContext2D -> Maybe val -> m ()-setStrokeStyle self val-  = liftIO-      (js_setStrokeStyle (self)-         (maybeToNullable (fmap toCanvasStyle val)))- -foreign import javascript unsafe "$1[\"strokeStyle\"]"-        js_getStrokeStyle ::-        CanvasRenderingContext2D -> IO (Nullable CanvasStyle)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.strokeStyle Mozilla CanvasRenderingContext2D.strokeStyle documentation> -getStrokeStyle ::-               (MonadIO m) => CanvasRenderingContext2D -> m (Maybe CanvasStyle)-getStrokeStyle self-  = liftIO (nullableToMaybe <$> (js_getStrokeStyle (self)))- -foreign import javascript unsafe "$1[\"fillStyle\"] = $2;"-        js_setFillStyle ::-        CanvasRenderingContext2D -> Nullable CanvasStyle -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.fillStyle Mozilla CanvasRenderingContext2D.fillStyle documentation> -setFillStyle ::-             (MonadIO m, IsCanvasStyle val) =>-               CanvasRenderingContext2D -> Maybe val -> m ()-setFillStyle self val-  = liftIO-      (js_setFillStyle (self) (maybeToNullable (fmap toCanvasStyle val)))- -foreign import javascript unsafe "$1[\"fillStyle\"]"-        js_getFillStyle ::-        CanvasRenderingContext2D -> IO (Nullable CanvasStyle)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.fillStyle Mozilla CanvasRenderingContext2D.fillStyle documentation> -getFillStyle ::-             (MonadIO m) => CanvasRenderingContext2D -> m (Maybe CanvasStyle)-getFillStyle self-  = liftIO (nullableToMaybe <$> (js_getFillStyle (self)))- -foreign import javascript unsafe-        "$1[\"webkitBackingStorePixelRatio\"]"-        js_getWebkitBackingStorePixelRatio ::-        CanvasRenderingContext2D -> IO Float---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.webkitBackingStorePixelRatio Mozilla CanvasRenderingContext2D.webkitBackingStorePixelRatio documentation> -getWebkitBackingStorePixelRatio ::-                                (MonadIO m) => CanvasRenderingContext2D -> m Float-getWebkitBackingStorePixelRatio self-  = liftIO (js_getWebkitBackingStorePixelRatio (self))- -foreign import javascript unsafe-        "$1[\"webkitImageSmoothingEnabled\"] = $2;"-        js_setWebkitImageSmoothingEnabled ::-        CanvasRenderingContext2D -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.webkitImageSmoothingEnabled Mozilla CanvasRenderingContext2D.webkitImageSmoothingEnabled documentation> -setWebkitImageSmoothingEnabled ::-                               (MonadIO m) => CanvasRenderingContext2D -> Bool -> m ()-setWebkitImageSmoothingEnabled self val-  = liftIO (js_setWebkitImageSmoothingEnabled (self) val)- -foreign import javascript unsafe-        "($1[\"webkitImageSmoothingEnabled\"] ? 1 : 0)"-        js_getWebkitImageSmoothingEnabled ::-        CanvasRenderingContext2D -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasRenderingContext2D.webkitImageSmoothingEnabled Mozilla CanvasRenderingContext2D.webkitImageSmoothingEnabled documentation> -getWebkitImageSmoothingEnabled ::-                               (MonadIO m) => CanvasRenderingContext2D -> m Bool-getWebkitImageSmoothingEnabled self-  = liftIO (js_getWebkitImageSmoothingEnabled (self))

− src/GHCJS/DOM/JSFFI/Generated/CapabilityRange.hs

@@ -1,41 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CapabilityRange-       (js_getMax, getMax, js_getMin, getMin, js_getSupported,-        getSupported, CapabilityRange, castToCapabilityRange,-        gTypeCapabilityRange)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"max\"]" js_getMax ::-        CapabilityRange -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/CapabilityRange.max Mozilla CapabilityRange.max documentation> -getMax :: (MonadIO m) => CapabilityRange -> m JSVal-getMax self = liftIO (js_getMax (self))- -foreign import javascript unsafe "$1[\"min\"]" js_getMin ::-        CapabilityRange -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/CapabilityRange.min Mozilla CapabilityRange.min documentation> -getMin :: (MonadIO m) => CapabilityRange -> m JSVal-getMin self = liftIO (js_getMin (self))- -foreign import javascript unsafe "($1[\"supported\"] ? 1 : 0)"-        js_getSupported :: CapabilityRange -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/CapabilityRange.supported Mozilla CapabilityRange.supported documentation> -getSupported :: (MonadIO m) => CapabilityRange -> m Bool-getSupported self = liftIO (js_getSupported (self))

− src/GHCJS/DOM/JSFFI/Generated/CharacterData.hs

@@ -1,107 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CharacterData-       (js_substringData, substringData, js_appendData, appendData,-        js_insertData, insertData, js_deleteData, deleteData,-        js_replaceData, replaceData, js_setData, setData, js_getData,-        getData, js_getLength, getLength, CharacterData,-        castToCharacterData, gTypeCharacterData, IsCharacterData,-        toCharacterData)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"substringData\"]($2, $3)"-        js_substringData ::-        CharacterData -> Word -> Word -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CharacterData.substringData Mozilla CharacterData.substringData documentation> -substringData ::-              (MonadIO m, IsCharacterData self, FromJSString result) =>-                self -> Word -> Word -> m (Maybe result)-substringData self offset length-  = liftIO-      (fromMaybeJSString <$>-         (js_substringData (toCharacterData self) offset length))- -foreign import javascript unsafe "$1[\"appendData\"]($2)"-        js_appendData :: CharacterData -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CharacterData.appendData Mozilla CharacterData.appendData documentation> -appendData ::-           (MonadIO m, IsCharacterData self, ToJSString data') =>-             self -> data' -> m ()-appendData self data'-  = liftIO (js_appendData (toCharacterData self) (toJSString data'))- -foreign import javascript unsafe "$1[\"insertData\"]($2, $3)"-        js_insertData :: CharacterData -> Word -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CharacterData.insertData Mozilla CharacterData.insertData documentation> -insertData ::-           (MonadIO m, IsCharacterData self, ToJSString data') =>-             self -> Word -> data' -> m ()-insertData self offset data'-  = liftIO-      (js_insertData (toCharacterData self) offset (toJSString data'))- -foreign import javascript unsafe "$1[\"deleteData\"]($2, $3)"-        js_deleteData :: CharacterData -> Word -> Word -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CharacterData.deleteData Mozilla CharacterData.deleteData documentation> -deleteData ::-           (MonadIO m, IsCharacterData self) => self -> Word -> Word -> m ()-deleteData self offset length-  = liftIO (js_deleteData (toCharacterData self) offset length)- -foreign import javascript unsafe "$1[\"replaceData\"]($2, $3, $4)"-        js_replaceData ::-        CharacterData -> Word -> Word -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CharacterData.replaceData Mozilla CharacterData.replaceData documentation> -replaceData ::-            (MonadIO m, IsCharacterData self, ToJSString data') =>-              self -> Word -> Word -> data' -> m ()-replaceData self offset length data'-  = liftIO-      (js_replaceData (toCharacterData self) offset length-         (toJSString data'))- -foreign import javascript unsafe "$1[\"data\"] = $2;" js_setData ::-        CharacterData -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CharacterData.data Mozilla CharacterData.data documentation> -setData ::-        (MonadIO m, IsCharacterData self, ToJSString val) =>-          self -> Maybe val -> m ()-setData self val-  = liftIO (js_setData (toCharacterData self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"data\"]" js_getData ::-        CharacterData -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CharacterData.data Mozilla CharacterData.data documentation> -getData ::-        (MonadIO m, IsCharacterData self, FromJSString result) =>-          self -> m (Maybe result)-getData self-  = liftIO-      (fromMaybeJSString <$> (js_getData (toCharacterData self)))- -foreign import javascript unsafe "$1[\"length\"]" js_getLength ::-        CharacterData -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/CharacterData.length Mozilla CharacterData.length documentation> -getLength :: (MonadIO m, IsCharacterData self) => self -> m Word-getLength self = liftIO (js_getLength (toCharacterData self))

− src/GHCJS/DOM/JSFFI/Generated/ChildNode.hs

@@ -1,25 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.ChildNode-       (js_remove, remove, ChildNode, castToChildNode, gTypeChildNode)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"remove\"]()" js_remove ::-        ChildNode -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/ChildNode.remove Mozilla ChildNode.remove documentation> -remove :: (MonadIO m) => ChildNode -> m ()-remove self = liftIO (js_remove (self))

− src/GHCJS/DOM/JSFFI/Generated/ClientRect.hs

@@ -1,62 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.ClientRect-       (js_getTop, getTop, js_getRight, getRight, js_getBottom, getBottom,-        js_getLeft, getLeft, js_getWidth, getWidth, js_getHeight,-        getHeight, ClientRect, castToClientRect, gTypeClientRect)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"top\"]" js_getTop ::-        ClientRect -> IO Float---- | <https://developer.mozilla.org/en-US/docs/Web/API/ClientRect.top Mozilla ClientRect.top documentation> -getTop :: (MonadIO m) => ClientRect -> m Float-getTop self = liftIO (js_getTop (self))- -foreign import javascript unsafe "$1[\"right\"]" js_getRight ::-        ClientRect -> IO Float---- | <https://developer.mozilla.org/en-US/docs/Web/API/ClientRect.right Mozilla ClientRect.right documentation> -getRight :: (MonadIO m) => ClientRect -> m Float-getRight self = liftIO (js_getRight (self))- -foreign import javascript unsafe "$1[\"bottom\"]" js_getBottom ::-        ClientRect -> IO Float---- | <https://developer.mozilla.org/en-US/docs/Web/API/ClientRect.bottom Mozilla ClientRect.bottom documentation> -getBottom :: (MonadIO m) => ClientRect -> m Float-getBottom self = liftIO (js_getBottom (self))- -foreign import javascript unsafe "$1[\"left\"]" js_getLeft ::-        ClientRect -> IO Float---- | <https://developer.mozilla.org/en-US/docs/Web/API/ClientRect.left Mozilla ClientRect.left documentation> -getLeft :: (MonadIO m) => ClientRect -> m Float-getLeft self = liftIO (js_getLeft (self))- -foreign import javascript unsafe "$1[\"width\"]" js_getWidth ::-        ClientRect -> IO Float---- | <https://developer.mozilla.org/en-US/docs/Web/API/ClientRect.width Mozilla ClientRect.width documentation> -getWidth :: (MonadIO m) => ClientRect -> m Float-getWidth self = liftIO (js_getWidth (self))- -foreign import javascript unsafe "$1[\"height\"]" js_getHeight ::-        ClientRect -> IO Float---- | <https://developer.mozilla.org/en-US/docs/Web/API/ClientRect.height Mozilla ClientRect.height documentation> -getHeight :: (MonadIO m) => ClientRect -> m Float-getHeight self = liftIO (js_getHeight (self))

− src/GHCJS/DOM/JSFFI/Generated/ClientRectList.hs

@@ -1,35 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.ClientRectList-       (js_item, item, js_getLength, getLength, ClientRectList,-        castToClientRectList, gTypeClientRectList)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"item\"]($2)" js_item ::-        ClientRectList -> Word -> IO (Nullable ClientRect)---- | <https://developer.mozilla.org/en-US/docs/Web/API/ClientRectList.item Mozilla ClientRectList.item documentation> -item ::-     (MonadIO m) => ClientRectList -> Word -> m (Maybe ClientRect)-item self index-  = liftIO (nullableToMaybe <$> (js_item (self) index))- -foreign import javascript unsafe "$1[\"length\"]" js_getLength ::-        ClientRectList -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/ClientRectList.length Mozilla ClientRectList.length documentation> -getLength :: (MonadIO m) => ClientRectList -> m Word-getLength self = liftIO (js_getLength (self))

− src/GHCJS/DOM/JSFFI/Generated/CloseEvent.hs

@@ -1,41 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CloseEvent-       (js_getWasClean, getWasClean, js_getCode, getCode, js_getReason,-        getReason, CloseEvent, castToCloseEvent, gTypeCloseEvent)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "($1[\"wasClean\"] ? 1 : 0)"-        js_getWasClean :: CloseEvent -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/CloseEvent.wasClean Mozilla CloseEvent.wasClean documentation> -getWasClean :: (MonadIO m) => CloseEvent -> m Bool-getWasClean self = liftIO (js_getWasClean (self))- -foreign import javascript unsafe "$1[\"code\"]" js_getCode ::-        CloseEvent -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/CloseEvent.code Mozilla CloseEvent.code documentation> -getCode :: (MonadIO m) => CloseEvent -> m Word-getCode self = liftIO (js_getCode (self))- -foreign import javascript unsafe "$1[\"reason\"]" js_getReason ::-        CloseEvent -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/CloseEvent.reason Mozilla CloseEvent.reason documentation> -getReason ::-          (MonadIO m, FromJSString result) => CloseEvent -> m result-getReason self = liftIO (fromJSString <$> (js_getReason (self)))

− src/GHCJS/DOM/JSFFI/Generated/CommandLineAPIHost.hs

@@ -1,87 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CommandLineAPIHost-       (js_clearConsoleMessages, clearConsoleMessages, js_copyText,-        copyText, js_inspect, inspect, js_inspectedObject, inspectedObject,-        js_getEventListeners, getEventListeners, js_databaseId, databaseId,-        js_storageId, storageId, CommandLineAPIHost,-        castToCommandLineAPIHost, gTypeCommandLineAPIHost)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"clearConsoleMessages\"]()"-        js_clearConsoleMessages :: CommandLineAPIHost -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CommandLineAPIHost.clearConsoleMessages Mozilla CommandLineAPIHost.clearConsoleMessages documentation> -clearConsoleMessages :: (MonadIO m) => CommandLineAPIHost -> m ()-clearConsoleMessages self = liftIO (js_clearConsoleMessages (self))- -foreign import javascript unsafe "$1[\"copyText\"]($2)" js_copyText-        :: CommandLineAPIHost -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CommandLineAPIHost.copyText Mozilla CommandLineAPIHost.copyText documentation> -copyText ::-         (MonadIO m, ToJSString text) => CommandLineAPIHost -> text -> m ()-copyText self text = liftIO (js_copyText (self) (toJSString text))- -foreign import javascript unsafe "$1[\"inspect\"]($2, $3)"-        js_inspect :: CommandLineAPIHost -> JSVal -> JSVal -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CommandLineAPIHost.inspect Mozilla CommandLineAPIHost.inspect documentation> -inspect ::-        (MonadIO m) => CommandLineAPIHost -> JSVal -> JSVal -> m ()-inspect self objectId hints-  = liftIO (js_inspect (self) objectId hints)- -foreign import javascript unsafe "$1[\"inspectedObject\"]($2)"-        js_inspectedObject :: CommandLineAPIHost -> Int -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/CommandLineAPIHost.inspectedObject Mozilla CommandLineAPIHost.inspectedObject documentation> -inspectedObject ::-                (MonadIO m) => CommandLineAPIHost -> Int -> m JSVal-inspectedObject self num = liftIO (js_inspectedObject (self) num)- -foreign import javascript unsafe "$1[\"getEventListeners\"]($2)"-        js_getEventListeners ::-        CommandLineAPIHost -> Nullable Node -> IO (Nullable Array)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CommandLineAPIHost.getEventListeners Mozilla CommandLineAPIHost.getEventListeners documentation> -getEventListeners ::-                  (MonadIO m, IsNode node) =>-                    CommandLineAPIHost -> Maybe node -> m (Maybe Array)-getEventListeners self node-  = liftIO-      (nullableToMaybe <$>-         (js_getEventListeners (self) (maybeToNullable (fmap toNode node))))- -foreign import javascript unsafe "$1[\"databaseId\"]($2)"-        js_databaseId :: CommandLineAPIHost -> JSVal -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/CommandLineAPIHost.databaseId Mozilla CommandLineAPIHost.databaseId documentation> -databaseId ::-           (MonadIO m, FromJSString result) =>-             CommandLineAPIHost -> JSVal -> m result-databaseId self database-  = liftIO (fromJSString <$> (js_databaseId (self) database))- -foreign import javascript unsafe "$1[\"storageId\"]($2)"-        js_storageId :: CommandLineAPIHost -> JSVal -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/CommandLineAPIHost.storageId Mozilla CommandLineAPIHost.storageId documentation> -storageId ::-          (MonadIO m, FromJSString result) =>-            CommandLineAPIHost -> JSVal -> m result-storageId self storage-  = liftIO (fromJSString <$> (js_storageId (self) storage))

− src/GHCJS/DOM/JSFFI/Generated/Comment.hs

@@ -1,25 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.Comment-       (js_newComment, newComment, Comment, castToComment, gTypeComment)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "new window[\"Comment\"]($1)"-        js_newComment :: JSString -> IO Comment---- | <https://developer.mozilla.org/en-US/docs/Web/API/Comment Mozilla Comment documentation> -newComment :: (MonadIO m, ToJSString data') => data' -> m Comment-newComment data' = liftIO (js_newComment (toJSString data'))

− src/GHCJS/DOM/JSFFI/Generated/CompositionEvent.hs

@@ -1,47 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CompositionEvent-       (js_initCompositionEvent, initCompositionEvent, js_getData,-        getData, CompositionEvent, castToCompositionEvent,-        gTypeCompositionEvent)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe-        "$1[\"initCompositionEvent\"]($2,\n$3, $4, $5, $6)"-        js_initCompositionEvent ::-        CompositionEvent ->-          JSString -> Bool -> Bool -> Nullable Window -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CompositionEvent.initCompositionEvent Mozilla CompositionEvent.initCompositionEvent documentation> -initCompositionEvent ::-                     (MonadIO m, ToJSString typeArg, ToJSString dataArg) =>-                       CompositionEvent ->-                         typeArg -> Bool -> Bool -> Maybe Window -> dataArg -> m ()-initCompositionEvent self typeArg canBubbleArg cancelableArg-  viewArg dataArg-  = liftIO-      (js_initCompositionEvent (self) (toJSString typeArg) canBubbleArg-         cancelableArg-         (maybeToNullable viewArg)-         (toJSString dataArg))- -foreign import javascript unsafe "$1[\"data\"]" js_getData ::-        CompositionEvent -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/CompositionEvent.data Mozilla CompositionEvent.data documentation> -getData ::-        (MonadIO m, FromJSString result) => CompositionEvent -> m result-getData self = liftIO (fromJSString <$> (js_getData (self)))

− src/GHCJS/DOM/JSFFI/Generated/ConvolverNode.hs

@@ -1,50 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.ConvolverNode-       (js_setBuffer, setBuffer, js_getBuffer, getBuffer, js_setNormalize,-        setNormalize, js_getNormalize, getNormalize, ConvolverNode,-        castToConvolverNode, gTypeConvolverNode)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"buffer\"] = $2;"-        js_setBuffer :: ConvolverNode -> Nullable AudioBuffer -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/ConvolverNode.buffer Mozilla ConvolverNode.buffer documentation> -setBuffer ::-          (MonadIO m) => ConvolverNode -> Maybe AudioBuffer -> m ()-setBuffer self val-  = liftIO (js_setBuffer (self) (maybeToNullable val))- -foreign import javascript unsafe "$1[\"buffer\"]" js_getBuffer ::-        ConvolverNode -> IO (Nullable AudioBuffer)---- | <https://developer.mozilla.org/en-US/docs/Web/API/ConvolverNode.buffer Mozilla ConvolverNode.buffer documentation> -getBuffer :: (MonadIO m) => ConvolverNode -> m (Maybe AudioBuffer)-getBuffer self = liftIO (nullableToMaybe <$> (js_getBuffer (self)))- -foreign import javascript unsafe "$1[\"normalize\"] = $2;"-        js_setNormalize :: ConvolverNode -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/ConvolverNode.normalize Mozilla ConvolverNode.normalize documentation> -setNormalize :: (MonadIO m) => ConvolverNode -> Bool -> m ()-setNormalize self val = liftIO (js_setNormalize (self) val)- -foreign import javascript unsafe "($1[\"normalize\"] ? 1 : 0)"-        js_getNormalize :: ConvolverNode -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/ConvolverNode.normalize Mozilla ConvolverNode.normalize documentation> -getNormalize :: (MonadIO m) => ConvolverNode -> m Bool-getNormalize self = liftIO (js_getNormalize (self))

− src/GHCJS/DOM/JSFFI/Generated/Coordinates.hs

@@ -1,76 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.Coordinates-       (js_getLatitude, getLatitude, js_getLongitude, getLongitude,-        js_getAltitude, getAltitude, js_getAccuracy, getAccuracy,-        js_getAltitudeAccuracy, getAltitudeAccuracy, js_getHeading,-        getHeading, js_getSpeed, getSpeed, Coordinates, castToCoordinates,-        gTypeCoordinates)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"latitude\"]" js_getLatitude-        :: Coordinates -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/Coordinates.latitude Mozilla Coordinates.latitude documentation> -getLatitude :: (MonadIO m) => Coordinates -> m Double-getLatitude self = liftIO (js_getLatitude (self))- -foreign import javascript unsafe "$1[\"longitude\"]"-        js_getLongitude :: Coordinates -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/Coordinates.longitude Mozilla Coordinates.longitude documentation> -getLongitude :: (MonadIO m) => Coordinates -> m Double-getLongitude self = liftIO (js_getLongitude (self))- -foreign import javascript unsafe "$1[\"altitude\"]" js_getAltitude-        :: Coordinates -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/Coordinates.altitude Mozilla Coordinates.altitude documentation> -getAltitude :: (MonadIO m) => Coordinates -> m (Maybe Double)-getAltitude self-  = liftIO ((js_getAltitude (self)) >>= fromJSValUnchecked)- -foreign import javascript unsafe "$1[\"accuracy\"]" js_getAccuracy-        :: Coordinates -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/Coordinates.accuracy Mozilla Coordinates.accuracy documentation> -getAccuracy :: (MonadIO m) => Coordinates -> m Double-getAccuracy self = liftIO (js_getAccuracy (self))- -foreign import javascript unsafe "$1[\"altitudeAccuracy\"]"-        js_getAltitudeAccuracy :: Coordinates -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/Coordinates.altitudeAccuracy Mozilla Coordinates.altitudeAccuracy documentation> -getAltitudeAccuracy ::-                    (MonadIO m) => Coordinates -> m (Maybe Double)-getAltitudeAccuracy self-  = liftIO ((js_getAltitudeAccuracy (self)) >>= fromJSValUnchecked)- -foreign import javascript unsafe "$1[\"heading\"]" js_getHeading ::-        Coordinates -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/Coordinates.heading Mozilla Coordinates.heading documentation> -getHeading :: (MonadIO m) => Coordinates -> m (Maybe Double)-getHeading self-  = liftIO ((js_getHeading (self)) >>= fromJSValUnchecked)- -foreign import javascript unsafe "$1[\"speed\"]" js_getSpeed ::-        Coordinates -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/Coordinates.speed Mozilla Coordinates.speed documentation> -getSpeed :: (MonadIO m) => Coordinates -> m (Maybe Double)-getSpeed self-  = liftIO ((js_getSpeed (self)) >>= fromJSValUnchecked)

− src/GHCJS/DOM/JSFFI/Generated/Counter.hs

@@ -1,47 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.Counter-       (js_getIdentifier, getIdentifier, js_getListStyle, getListStyle,-        js_getSeparator, getSeparator, Counter, castToCounter,-        gTypeCounter)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"identifier\"]"-        js_getIdentifier :: Counter -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/Counter.identifier Mozilla Counter.identifier documentation> -getIdentifier ::-              (MonadIO m, FromJSString result) => Counter -> m result-getIdentifier self-  = liftIO (fromJSString <$> (js_getIdentifier (self)))- -foreign import javascript unsafe "$1[\"listStyle\"]"-        js_getListStyle :: Counter -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/Counter.listStyle Mozilla Counter.listStyle documentation> -getListStyle ::-             (MonadIO m, FromJSString result) => Counter -> m result-getListStyle self-  = liftIO (fromJSString <$> (js_getListStyle (self)))- -foreign import javascript unsafe "$1[\"separator\"]"-        js_getSeparator :: Counter -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/Counter.separator Mozilla Counter.separator documentation> -getSeparator ::-             (MonadIO m, FromJSString result) => Counter -> m result-getSeparator self-  = liftIO (fromJSString <$> (js_getSeparator (self)))

− src/GHCJS/DOM/JSFFI/Generated/Crypto.hs

@@ -1,41 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.Crypto-       (js_getRandomValues, getRandomValues, js_getWebkitSubtle,-        getWebkitSubtle, Crypto, castToCrypto, gTypeCrypto)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"getRandomValues\"]($2)"-        js_getRandomValues ::-        Crypto -> Nullable ArrayBufferView -> IO (Nullable ArrayBufferView)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Crypto.getRandomValues Mozilla Crypto.getRandomValues documentation> -getRandomValues ::-                (MonadIO m, IsArrayBufferView array) =>-                  Crypto -> Maybe array -> m (Maybe ArrayBufferView)-getRandomValues self array-  = liftIO-      (nullableToMaybe <$>-         (js_getRandomValues (self)-            (maybeToNullable (fmap toArrayBufferView array))))- -foreign import javascript unsafe "$1[\"webkitSubtle\"]"-        js_getWebkitSubtle :: Crypto -> IO (Nullable SubtleCrypto)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Crypto.webkitSubtle Mozilla Crypto.webkitSubtle documentation> -getWebkitSubtle :: (MonadIO m) => Crypto -> m (Maybe SubtleCrypto)-getWebkitSubtle self-  = liftIO (nullableToMaybe <$> (js_getWebkitSubtle (self)))

− src/GHCJS/DOM/JSFFI/Generated/CryptoKey.hs

@@ -1,50 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CryptoKey-       (js_getType, getType, js_getExtractable, getExtractable,-        js_getAlgorithm, getAlgorithm, js_getUsages, getUsages, CryptoKey,-        castToCryptoKey, gTypeCryptoKey)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"type\"]" js_getType ::-        CryptoKey -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/CryptoKey.type Mozilla CryptoKey.type documentation> -getType :: (MonadIO m) => CryptoKey -> m KeyType-getType self = liftIO ((js_getType (self)) >>= fromJSValUnchecked)- -foreign import javascript unsafe "($1[\"extractable\"] ? 1 : 0)"-        js_getExtractable :: CryptoKey -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/CryptoKey.extractable Mozilla CryptoKey.extractable documentation> -getExtractable :: (MonadIO m) => CryptoKey -> m Bool-getExtractable self = liftIO (js_getExtractable (self))- -foreign import javascript unsafe "$1[\"algorithm\"]"-        js_getAlgorithm :: CryptoKey -> IO (Nullable Algorithm)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CryptoKey.algorithm Mozilla CryptoKey.algorithm documentation> -getAlgorithm :: (MonadIO m) => CryptoKey -> m (Maybe Algorithm)-getAlgorithm self-  = liftIO (nullableToMaybe <$> (js_getAlgorithm (self)))- -foreign import javascript unsafe "$1[\"usages\"]" js_getUsages ::-        CryptoKey -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/CryptoKey.usages Mozilla CryptoKey.usages documentation> -getUsages :: (MonadIO m) => CryptoKey -> m [KeyUsage]-getUsages self-  = liftIO ((js_getUsages (self)) >>= fromJSValUnchecked)

− src/GHCJS/DOM/JSFFI/Generated/CryptoKeyPair.hs

@@ -1,36 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CryptoKeyPair-       (js_getPublicKey, getPublicKey, js_getPrivateKey, getPrivateKey,-        CryptoKeyPair, castToCryptoKeyPair, gTypeCryptoKeyPair)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"publicKey\"]"-        js_getPublicKey :: CryptoKeyPair -> IO (Nullable CryptoKey)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CryptoKeyPair.publicKey Mozilla CryptoKeyPair.publicKey documentation> -getPublicKey :: (MonadIO m) => CryptoKeyPair -> m (Maybe CryptoKey)-getPublicKey self-  = liftIO (nullableToMaybe <$> (js_getPublicKey (self)))- -foreign import javascript unsafe "$1[\"privateKey\"]"-        js_getPrivateKey :: CryptoKeyPair -> IO (Nullable CryptoKey)---- | <https://developer.mozilla.org/en-US/docs/Web/API/CryptoKeyPair.privateKey Mozilla CryptoKeyPair.privateKey documentation> -getPrivateKey ::-              (MonadIO m) => CryptoKeyPair -> m (Maybe CryptoKey)-getPrivateKey self-  = liftIO (nullableToMaybe <$> (js_getPrivateKey (self)))

− src/GHCJS/DOM/JSFFI/Generated/CustomEvent.hs

@@ -1,40 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.CustomEvent-       (js_initCustomEvent, initCustomEvent, js_getDetail, getDetail,-        CustomEvent, castToCustomEvent, gTypeCustomEvent)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe-        "$1[\"initCustomEvent\"]($2, $3,\n$4, $5)" js_initCustomEvent ::-        CustomEvent -> JSString -> Bool -> Bool -> JSVal -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/CustomEvent.initCustomEvent Mozilla CustomEvent.initCustomEvent documentation> -initCustomEvent ::-                (MonadIO m, ToJSString typeArg) =>-                  CustomEvent -> typeArg -> Bool -> Bool -> JSVal -> m ()-initCustomEvent self typeArg canBubbleArg cancelableArg detailArg-  = liftIO-      (js_initCustomEvent (self) (toJSString typeArg) canBubbleArg-         cancelableArg-         detailArg)- -foreign import javascript unsafe "$1[\"detail\"]" js_getDetail ::-        CustomEvent -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/CustomEvent.detail Mozilla CustomEvent.detail documentation> -getDetail :: (MonadIO m) => CustomEvent -> m JSVal-getDetail self = liftIO (js_getDetail (self))

− src/GHCJS/DOM/JSFFI/Generated/DOMError.hs

@@ -1,29 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.DOMError-       (js_getName, getName, DOMError, castToDOMError, gTypeDOMError,-        IsDOMError, toDOMError)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"name\"]" js_getName ::-        DOMError -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMError.name Mozilla DOMError.name documentation> -getName ::-        (MonadIO m, IsDOMError self, FromJSString result) =>-          self -> m result-getName self-  = liftIO (fromJSString <$> (js_getName (toDOMError self)))

− src/GHCJS/DOM/JSFFI/Generated/DOMImplementation.hs

@@ -1,104 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.DOMImplementation-       (js_hasFeature, hasFeature, js_createDocumentType,-        createDocumentType, js_createDocument, createDocument,-        js_createCSSStyleSheet, createCSSStyleSheet, js_createHTMLDocument,-        createHTMLDocument, DOMImplementation, castToDOMImplementation,-        gTypeDOMImplementation)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe-        "($1[\"hasFeature\"]($2,\n$3) ? 1 : 0)" js_hasFeature ::-        DOMImplementation -> JSString -> Nullable JSString -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMImplementation.hasFeature Mozilla DOMImplementation.hasFeature documentation> -hasFeature ::-           (MonadIO m, ToJSString feature, ToJSString version) =>-             DOMImplementation -> feature -> Maybe version -> m Bool-hasFeature self feature version-  = liftIO-      (js_hasFeature (self) (toJSString feature)-         (toMaybeJSString version))- -foreign import javascript unsafe-        "$1[\"createDocumentType\"]($2, $3,\n$4)" js_createDocumentType ::-        DOMImplementation ->-          Nullable JSString ->-            Nullable JSString ->-              Nullable JSString -> IO (Nullable DocumentType)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMImplementation.createDocumentType Mozilla DOMImplementation.createDocumentType documentation> -createDocumentType ::-                   (MonadIO m, ToJSString qualifiedName, ToJSString publicId,-                    ToJSString systemId) =>-                     DOMImplementation ->-                       Maybe qualifiedName ->-                         Maybe publicId -> Maybe systemId -> m (Maybe DocumentType)-createDocumentType self qualifiedName publicId systemId-  = liftIO-      (nullableToMaybe <$>-         (js_createDocumentType (self) (toMaybeJSString qualifiedName)-            (toMaybeJSString publicId)-            (toMaybeJSString systemId)))- -foreign import javascript unsafe-        "$1[\"createDocument\"]($2, $3, $4)" js_createDocument ::-        DOMImplementation ->-          Nullable JSString ->-            Nullable JSString ->-              Nullable DocumentType -> IO (Nullable Document)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMImplementation.createDocument Mozilla DOMImplementation.createDocument documentation> -createDocument ::-               (MonadIO m, ToJSString namespaceURI, ToJSString qualifiedName) =>-                 DOMImplementation ->-                   Maybe namespaceURI ->-                     Maybe qualifiedName -> Maybe DocumentType -> m (Maybe Document)-createDocument self namespaceURI qualifiedName doctype-  = liftIO-      (nullableToMaybe <$>-         (js_createDocument (self) (toMaybeJSString namespaceURI)-            (toMaybeJSString qualifiedName)-            (maybeToNullable doctype)))- -foreign import javascript unsafe-        "$1[\"createCSSStyleSheet\"]($2,\n$3)" js_createCSSStyleSheet ::-        DOMImplementation ->-          JSString -> JSString -> IO (Nullable CSSStyleSheet)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMImplementation.createCSSStyleSheet Mozilla DOMImplementation.createCSSStyleSheet documentation> -createCSSStyleSheet ::-                    (MonadIO m, ToJSString title, ToJSString media) =>-                      DOMImplementation -> title -> media -> m (Maybe CSSStyleSheet)-createCSSStyleSheet self title media-  = liftIO-      (nullableToMaybe <$>-         (js_createCSSStyleSheet (self) (toJSString title)-            (toJSString media)))- -foreign import javascript unsafe "$1[\"createHTMLDocument\"]($2)"-        js_createHTMLDocument ::-        DOMImplementation -> JSString -> IO (Nullable HTMLDocument)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMImplementation.createHTMLDocument Mozilla DOMImplementation.createHTMLDocument documentation> -createHTMLDocument ::-                   (MonadIO m, ToJSString title) =>-                     DOMImplementation -> title -> m (Maybe HTMLDocument)-createHTMLDocument self title-  = liftIO-      (nullableToMaybe <$>-         (js_createHTMLDocument (self) (toJSString title)))

− src/GHCJS/DOM/JSFFI/Generated/DOMNamedFlowCollection.hs

@@ -1,49 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.DOMNamedFlowCollection-       (js_item, item, js_namedItem, namedItem, js_getLength, getLength,-        DOMNamedFlowCollection, castToDOMNamedFlowCollection,-        gTypeDOMNamedFlowCollection)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"item\"]($2)" js_item ::-        DOMNamedFlowCollection -> Word -> IO (Nullable WebKitNamedFlow)---- | <https://developer.mozilla.org/en-US/docs/Web/API/WebKitNamedFlowCollection.item Mozilla WebKitNamedFlowCollection.item documentation> -item ::-     (MonadIO m) =>-       DOMNamedFlowCollection -> Word -> m (Maybe WebKitNamedFlow)-item self index-  = liftIO (nullableToMaybe <$> (js_item (self) index))- -foreign import javascript unsafe "$1[\"namedItem\"]($2)"-        js_namedItem ::-        DOMNamedFlowCollection -> JSString -> IO (Nullable WebKitNamedFlow)---- | <https://developer.mozilla.org/en-US/docs/Web/API/WebKitNamedFlowCollection.namedItem Mozilla WebKitNamedFlowCollection.namedItem documentation> -namedItem ::-          (MonadIO m, ToJSString name) =>-            DOMNamedFlowCollection -> name -> m (Maybe WebKitNamedFlow)-namedItem self name-  = liftIO-      (nullableToMaybe <$> (js_namedItem (self) (toJSString name)))- -foreign import javascript unsafe "$1[\"length\"]" js_getLength ::-        DOMNamedFlowCollection -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/WebKitNamedFlowCollection.length Mozilla WebKitNamedFlowCollection.length documentation> -getLength :: (MonadIO m) => DOMNamedFlowCollection -> m Word-getLength self = liftIO (js_getLength (self))

− src/GHCJS/DOM/JSFFI/Generated/DOMParser.hs

@@ -1,40 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.DOMParser-       (js_newDOMParser, newDOMParser, js_parseFromString,-        parseFromString, DOMParser, castToDOMParser, gTypeDOMParser)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "new window[\"DOMParser\"]()"-        js_newDOMParser :: IO DOMParser---- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMParser Mozilla DOMParser documentation> -newDOMParser :: (MonadIO m) => m DOMParser-newDOMParser = liftIO (js_newDOMParser)- -foreign import javascript unsafe "$1[\"parseFromString\"]($2, $3)"-        js_parseFromString ::-        DOMParser -> JSString -> JSString -> IO (Nullable Document)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMParser.parseFromString Mozilla DOMParser.parseFromString documentation> -parseFromString ::-                (MonadIO m, ToJSString str, ToJSString contentType) =>-                  DOMParser -> str -> contentType -> m (Maybe Document)-parseFromString self str contentType-  = liftIO-      (nullableToMaybe <$>-         (js_parseFromString (self) (toJSString str)-            (toJSString contentType)))

− src/GHCJS/DOM/JSFFI/Generated/DOMSettableTokenList.hs

@@ -1,47 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.DOMSettableTokenList-       (js__get, _get, js_setValue, setValue, js_getValue, getValue,-        DOMSettableTokenList, castToDOMSettableTokenList,-        gTypeDOMSettableTokenList)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"_get\"]($2)" js__get ::-        DOMSettableTokenList -> Word -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMSettableTokenList._get Mozilla DOMSettableTokenList._get documentation> -_get ::-     (MonadIO m, FromJSString result) =>-       DOMSettableTokenList -> Word -> m (Maybe result)-_get self index-  = liftIO (fromMaybeJSString <$> (js__get (self) index))- -foreign import javascript unsafe "$1[\"value\"] = $2;" js_setValue-        :: DOMSettableTokenList -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMSettableTokenList.value Mozilla DOMSettableTokenList.value documentation> -setValue ::-         (MonadIO m, ToJSString val) => DOMSettableTokenList -> val -> m ()-setValue self val = liftIO (js_setValue (self) (toJSString val))- -foreign import javascript unsafe "$1[\"value\"]" js_getValue ::-        DOMSettableTokenList -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMSettableTokenList.value Mozilla DOMSettableTokenList.value documentation> -getValue ::-         (MonadIO m, FromJSString result) =>-           DOMSettableTokenList -> m result-getValue self = liftIO (fromJSString <$> (js_getValue (self)))

− src/GHCJS/DOM/JSFFI/Generated/DOMStringList.hs

@@ -1,45 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.DOMStringList-       (js_item, item, js_contains, contains, js_getLength, getLength,-        DOMStringList, castToDOMStringList, gTypeDOMStringList)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"item\"]($2)" js_item ::-        DOMStringList -> Word -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMStringList.item Mozilla DOMStringList.item documentation> -item ::-     (MonadIO m, FromJSString result) =>-       DOMStringList -> Word -> m (Maybe result)-item self index-  = liftIO (fromMaybeJSString <$> (js_item (self) index))- -foreign import javascript unsafe "($1[\"contains\"]($2) ? 1 : 0)"-        js_contains :: DOMStringList -> JSString -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMStringList.contains Mozilla DOMStringList.contains documentation> -contains ::-         (MonadIO m, ToJSString string) => DOMStringList -> string -> m Bool-contains self string-  = liftIO (js_contains (self) (toJSString string))- -foreign import javascript unsafe "$1[\"length\"]" js_getLength ::-        DOMStringList -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMStringList.length Mozilla DOMStringList.length documentation> -getLength :: (MonadIO m) => DOMStringList -> m Word-getLength self = liftIO (js_getLength (self))

− src/GHCJS/DOM/JSFFI/Generated/DOMTokenList.hs

@@ -1,95 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.DOMTokenList-       (js_item, item, js_contains, contains, js_add, add, js_remove,-        remove, js_toggle, toggle, js_toString, toString, js_getLength,-        getLength, DOMTokenList, castToDOMTokenList, gTypeDOMTokenList,-        IsDOMTokenList, toDOMTokenList)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"item\"]($2)" js_item ::-        DOMTokenList -> Word -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMTokenList.item Mozilla DOMTokenList.item documentation> -item ::-     (MonadIO m, IsDOMTokenList self, FromJSString result) =>-       self -> Word -> m (Maybe result)-item self index-  = liftIO-      (fromMaybeJSString <$> (js_item (toDOMTokenList self) index))- -foreign import javascript unsafe "($1[\"contains\"]($2) ? 1 : 0)"-        js_contains :: DOMTokenList -> JSString -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMTokenList.contains Mozilla DOMTokenList.contains documentation> -contains ::-         (MonadIO m, IsDOMTokenList self, ToJSString token) =>-           self -> token -> m Bool-contains self token-  = liftIO (js_contains (toDOMTokenList self) (toJSString token))- -foreign import javascript unsafe "$1[\"add\"].apply($1, $2)" js_add-        :: DOMTokenList -> JSVal -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMTokenList.add Mozilla DOMTokenList.add documentation> -add ::-    (MonadIO m, IsDOMTokenList self, ToJSString tokens,-     ToJSVal tokens) =>-      self -> [tokens] -> m ()-add self tokens-  = liftIO-      (toJSVal tokens >>=-         \ tokens' -> js_add (toDOMTokenList self) tokens')- -foreign import javascript unsafe "$1[\"remove\"].apply($1, $2)"-        js_remove :: DOMTokenList -> JSVal -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMTokenList.remove Mozilla DOMTokenList.remove documentation> -remove ::-       (MonadIO m, IsDOMTokenList self, ToJSString tokens,-        ToJSVal tokens) =>-         self -> [tokens] -> m ()-remove self tokens-  = liftIO-      (toJSVal tokens >>=-         \ tokens' -> js_remove (toDOMTokenList self) tokens')- -foreign import javascript unsafe "($1[\"toggle\"]($2, $3) ? 1 : 0)"-        js_toggle :: DOMTokenList -> JSString -> Bool -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMTokenList.toggle Mozilla DOMTokenList.toggle documentation> -toggle ::-       (MonadIO m, IsDOMTokenList self, ToJSString token) =>-         self -> token -> Bool -> m Bool-toggle self token force-  = liftIO (js_toggle (toDOMTokenList self) (toJSString token) force)- -foreign import javascript unsafe "$1[\"toString\"]()" js_toString-        :: DOMTokenList -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMTokenList.toString Mozilla DOMTokenList.toString documentation> -toString ::-         (MonadIO m, IsDOMTokenList self, FromJSString result) =>-           self -> m result-toString self-  = liftIO (fromJSString <$> (js_toString (toDOMTokenList self)))- -foreign import javascript unsafe "$1[\"length\"]" js_getLength ::-        DOMTokenList -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMTokenList.length Mozilla DOMTokenList.length documentation> -getLength :: (MonadIO m, IsDOMTokenList self) => self -> m Word-getLength self = liftIO (js_getLength (toDOMTokenList self))

− src/GHCJS/DOM/JSFFI/Generated/DataCue.hs

@@ -1,78 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.DataCue-       (js_newDataCue, newDataCue, js_newDataCue', newDataCue',-        js_setData, setData, js_getData, getData, js_setValue, setValue,-        js_getValue, getValue, js_getType, getType, DataCue, castToDataCue,-        gTypeDataCue)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "new window[\"WebKitDataCue\"]()"-        js_newDataCue :: IO DataCue---- | <https://developer.mozilla.org/en-US/docs/Web/API/WebKitDataCue Mozilla WebKitDataCue documentation> -newDataCue :: (MonadIO m) => m DataCue-newDataCue = liftIO (js_newDataCue)- -foreign import javascript unsafe-        "new window[\"WebKitDataCue\"]($1,\n$2, $3, $4)" js_newDataCue' ::-        Double -> Double -> JSVal -> JSString -> IO DataCue---- | <https://developer.mozilla.org/en-US/docs/Web/API/WebKitDataCue Mozilla WebKitDataCue documentation> -newDataCue' ::-            (MonadIO m, ToJSString type') =>-              Double -> Double -> JSVal -> type' -> m DataCue-newDataCue' startTime endTime value type'-  = liftIO-      (js_newDataCue' startTime endTime value (toJSString type'))- -foreign import javascript unsafe "$1[\"data\"] = $2;" js_setData ::-        DataCue -> Nullable ArrayBuffer -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/WebKitDataCue.data Mozilla WebKitDataCue.data documentation> -setData ::-        (MonadIO m, IsArrayBuffer val) => DataCue -> Maybe val -> m ()-setData self val-  = liftIO-      (js_setData (self) (maybeToNullable (fmap toArrayBuffer val)))- -foreign import javascript unsafe "$1[\"data\"]" js_getData ::-        DataCue -> IO (Nullable ArrayBuffer)---- | <https://developer.mozilla.org/en-US/docs/Web/API/WebKitDataCue.data Mozilla WebKitDataCue.data documentation> -getData :: (MonadIO m) => DataCue -> m (Maybe ArrayBuffer)-getData self = liftIO (nullableToMaybe <$> (js_getData (self)))- -foreign import javascript unsafe "$1[\"value\"] = $2;" js_setValue-        :: DataCue -> JSVal -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/WebKitDataCue.value Mozilla WebKitDataCue.value documentation> -setValue :: (MonadIO m) => DataCue -> JSVal -> m ()-setValue self val = liftIO (js_setValue (self) val)- -foreign import javascript unsafe "$1[\"value\"]" js_getValue ::-        DataCue -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/WebKitDataCue.value Mozilla WebKitDataCue.value documentation> -getValue :: (MonadIO m) => DataCue -> m JSVal-getValue self = liftIO (js_getValue (self))- -foreign import javascript unsafe "$1[\"type\"]" js_getType ::-        DataCue -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/WebKitDataCue.type Mozilla WebKitDataCue.type documentation> -getType :: (MonadIO m, FromJSString result) => DataCue -> m result-getType self = liftIO (fromJSString <$> (js_getType (self)))

− src/GHCJS/DOM/JSFFI/Generated/DataTransfer.hs

@@ -1,123 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.DataTransfer-       (js_clearData, clearData, js_getData, getData, js_setData, setData,-        js_setDragImage, setDragImage, js_setDropEffect, setDropEffect,-        js_getDropEffect, getDropEffect, js_setEffectAllowed,-        setEffectAllowed, js_getEffectAllowed, getEffectAllowed,-        js_getTypes, getTypes, js_getFiles, getFiles, js_getItems,-        getItems, DataTransfer, castToDataTransfer, gTypeDataTransfer)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"clearData\"]($2)"-        js_clearData :: DataTransfer -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/DataTransfer.clearData Mozilla DataTransfer.clearData documentation> -clearData ::-          (MonadIO m, ToJSString type') => DataTransfer -> type' -> m ()-clearData self type'-  = liftIO (js_clearData (self) (toJSString type'))- -foreign import javascript unsafe "$1[\"getData\"]($2)" js_getData-        :: DataTransfer -> JSString -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/DataTransfer.getData Mozilla DataTransfer.getData documentation> -getData ::-        (MonadIO m, ToJSString type', FromJSString result) =>-          DataTransfer -> type' -> m result-getData self type'-  = liftIO (fromJSString <$> (js_getData (self) (toJSString type')))- -foreign import javascript unsafe "$1[\"setData\"]($2, $3)"-        js_setData :: DataTransfer -> JSString -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/DataTransfer.setData Mozilla DataTransfer.setData documentation> -setData ::-        (MonadIO m, ToJSString type', ToJSString data') =>-          DataTransfer -> type' -> data' -> m ()-setData self type' data'-  = liftIO (js_setData (self) (toJSString type') (toJSString data'))- -foreign import javascript unsafe "$1[\"setDragImage\"]($2, $3, $4)"-        js_setDragImage ::-        DataTransfer -> Nullable Element -> Int -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/DataTransfer.setDragImage Mozilla DataTransfer.setDragImage documentation> -setDragImage ::-             (MonadIO m, IsElement image) =>-               DataTransfer -> Maybe image -> Int -> Int -> m ()-setDragImage self image x y-  = liftIO-      (js_setDragImage (self) (maybeToNullable (fmap toElement image)) x-         y)- -foreign import javascript unsafe "$1[\"dropEffect\"] = $2;"-        js_setDropEffect :: DataTransfer -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/DataTransfer.dropEffect Mozilla DataTransfer.dropEffect documentation> -setDropEffect ::-              (MonadIO m, ToJSString val) => DataTransfer -> val -> m ()-setDropEffect self val-  = liftIO (js_setDropEffect (self) (toJSString val))- -foreign import javascript unsafe "$1[\"dropEffect\"]"-        js_getDropEffect :: DataTransfer -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/DataTransfer.dropEffect Mozilla DataTransfer.dropEffect documentation> -getDropEffect ::-              (MonadIO m, FromJSString result) => DataTransfer -> m result-getDropEffect self-  = liftIO (fromJSString <$> (js_getDropEffect (self)))- -foreign import javascript unsafe "$1[\"effectAllowed\"] = $2;"-        js_setEffectAllowed :: DataTransfer -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/DataTransfer.effectAllowed Mozilla DataTransfer.effectAllowed documentation> -setEffectAllowed ::-                 (MonadIO m, ToJSString val) => DataTransfer -> val -> m ()-setEffectAllowed self val-  = liftIO (js_setEffectAllowed (self) (toJSString val))- -foreign import javascript unsafe "$1[\"effectAllowed\"]"-        js_getEffectAllowed :: DataTransfer -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/DataTransfer.effectAllowed Mozilla DataTransfer.effectAllowed documentation> -getEffectAllowed ::-                 (MonadIO m, FromJSString result) => DataTransfer -> m result-getEffectAllowed self-  = liftIO (fromJSString <$> (js_getEffectAllowed (self)))- -foreign import javascript unsafe "$1[\"types\"]" js_getTypes ::-        DataTransfer -> IO (Nullable Array)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DataTransfer.types Mozilla DataTransfer.types documentation> -getTypes :: (MonadIO m) => DataTransfer -> m (Maybe Array)-getTypes self = liftIO (nullableToMaybe <$> (js_getTypes (self)))- -foreign import javascript unsafe "$1[\"files\"]" js_getFiles ::-        DataTransfer -> IO (Nullable FileList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DataTransfer.files Mozilla DataTransfer.files documentation> -getFiles :: (MonadIO m) => DataTransfer -> m (Maybe FileList)-getFiles self = liftIO (nullableToMaybe <$> (js_getFiles (self)))- -foreign import javascript unsafe "$1[\"items\"]" js_getItems ::-        DataTransfer -> IO (Nullable DataTransferItemList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DataTransfer.items Mozilla DataTransfer.items documentation> -getItems ::-         (MonadIO m) => DataTransfer -> m (Maybe DataTransferItemList)-getItems self = liftIO (nullableToMaybe <$> (js_getItems (self)))

− src/GHCJS/DOM/JSFFI/Generated/DataTransferItem.hs

@@ -1,54 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.DataTransferItem-       (js_getAsString, getAsString, js_getAsFile, getAsFile, js_getKind,-        getKind, js_getType, getType, DataTransferItem,-        castToDataTransferItem, gTypeDataTransferItem)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"getAsString\"]($2)"-        js_getAsString ::-        DataTransferItem -> Nullable (StringCallback callback) -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/DataTransferItem.getAsString Mozilla DataTransferItem.getAsString documentation> -getAsString ::-            (MonadIO m, ToJSString callback) =>-              DataTransferItem -> Maybe (StringCallback callback) -> m ()-getAsString self callback-  = liftIO (js_getAsString (self) (maybeToNullable callback))- -foreign import javascript unsafe "$1[\"getAsFile\"]()" js_getAsFile-        :: DataTransferItem -> IO (Nullable Blob)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DataTransferItem.getAsFile Mozilla DataTransferItem.getAsFile documentation> -getAsFile :: (MonadIO m) => DataTransferItem -> m (Maybe Blob)-getAsFile self = liftIO (nullableToMaybe <$> (js_getAsFile (self)))- -foreign import javascript unsafe "$1[\"kind\"]" js_getKind ::-        DataTransferItem -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/DataTransferItem.kind Mozilla DataTransferItem.kind documentation> -getKind ::-        (MonadIO m, FromJSString result) => DataTransferItem -> m result-getKind self = liftIO (fromJSString <$> (js_getKind (self)))- -foreign import javascript unsafe "$1[\"type\"]" js_getType ::-        DataTransferItem -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/DataTransferItem.type Mozilla DataTransferItem.type documentation> -getType ::-        (MonadIO m, FromJSString result) => DataTransferItem -> m result-getType self = liftIO (fromJSString <$> (js_getType (self)))

− src/GHCJS/DOM/JSFFI/Generated/DataTransferItemList.hs

@@ -1,63 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.DataTransferItemList-       (js_item, item, js_clear, clear, js_addFile, addFile, js_add, add,-        js_getLength, getLength, DataTransferItemList,-        castToDataTransferItemList, gTypeDataTransferItemList)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"item\"]($2)" js_item ::-        DataTransferItemList -> Word -> IO (Nullable DataTransferItem)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DataTransferItemList.item Mozilla DataTransferItemList.item documentation> -item ::-     (MonadIO m) =>-       DataTransferItemList -> Word -> m (Maybe DataTransferItem)-item self index-  = liftIO (nullableToMaybe <$> (js_item (self) index))- -foreign import javascript unsafe "$1[\"clear\"]()" js_clear ::-        DataTransferItemList -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/DataTransferItemList.clear Mozilla DataTransferItemList.clear documentation> -clear :: (MonadIO m) => DataTransferItemList -> m ()-clear self = liftIO (js_clear (self))- -foreign import javascript unsafe "$1[\"add\"]($2)" js_addFile ::-        DataTransferItemList -> Nullable File -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/DataTransferItemList.add Mozilla DataTransferItemList.add documentation> -addFile ::-        (MonadIO m) => DataTransferItemList -> Maybe File -> m ()-addFile self file-  = liftIO (js_addFile (self) (maybeToNullable file))- -foreign import javascript unsafe "$1[\"add\"]($2, $3)" js_add ::-        DataTransferItemList -> JSString -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/DataTransferItemList.add Mozilla DataTransferItemList.add documentation> -add ::-    (MonadIO m, ToJSString data', ToJSString type') =>-      DataTransferItemList -> data' -> type' -> m ()-add self data' type'-  = liftIO (js_add (self) (toJSString data') (toJSString type'))- -foreign import javascript unsafe "$1[\"length\"]" js_getLength ::-        DataTransferItemList -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/DataTransferItemList.length Mozilla DataTransferItemList.length documentation> -getLength :: (MonadIO m) => DataTransferItemList -> m Int-getLength self = liftIO (js_getLength (self))

− src/GHCJS/DOM/JSFFI/Generated/Database.hs

@@ -1,92 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.Database-       (js_changeVersion, changeVersion, js_transaction, transaction,-        js_readTransaction, readTransaction, js_getVersion, getVersion,-        Database, castToDatabase, gTypeDatabase)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe-        "$1[\"changeVersion\"]($2, $3, $4,\n$5, $6)" js_changeVersion ::-        Database ->-          JSString ->-            JSString ->-              Nullable SQLTransactionCallback ->-                Nullable SQLTransactionErrorCallback ->-                  Nullable VoidCallback -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Database.changeVersion Mozilla Database.changeVersion documentation> -changeVersion ::-              (MonadIO m, ToJSString oldVersion, ToJSString newVersion) =>-                Database ->-                  oldVersion ->-                    newVersion ->-                      Maybe SQLTransactionCallback ->-                        Maybe SQLTransactionErrorCallback -> Maybe VoidCallback -> m ()-changeVersion self oldVersion newVersion callback errorCallback-  successCallback-  = liftIO-      (js_changeVersion (self) (toJSString oldVersion)-         (toJSString newVersion)-         (maybeToNullable callback)-         (maybeToNullable errorCallback)-         (maybeToNullable successCallback))- -foreign import javascript unsafe "$1[\"transaction\"]($2, $3, $4)"-        js_transaction ::-        Database ->-          Nullable SQLTransactionCallback ->-            Nullable SQLTransactionErrorCallback ->-              Nullable VoidCallback -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Database.transaction Mozilla Database.transaction documentation> -transaction ::-            (MonadIO m) =>-              Database ->-                Maybe SQLTransactionCallback ->-                  Maybe SQLTransactionErrorCallback -> Maybe VoidCallback -> m ()-transaction self callback errorCallback successCallback-  = liftIO-      (js_transaction (self) (maybeToNullable callback)-         (maybeToNullable errorCallback)-         (maybeToNullable successCallback))- -foreign import javascript unsafe-        "$1[\"readTransaction\"]($2, $3,\n$4)" js_readTransaction ::-        Database ->-          Nullable SQLTransactionCallback ->-            Nullable SQLTransactionErrorCallback ->-              Nullable VoidCallback -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Database.readTransaction Mozilla Database.readTransaction documentation> -readTransaction ::-                (MonadIO m) =>-                  Database ->-                    Maybe SQLTransactionCallback ->-                      Maybe SQLTransactionErrorCallback -> Maybe VoidCallback -> m ()-readTransaction self callback errorCallback successCallback-  = liftIO-      (js_readTransaction (self) (maybeToNullable callback)-         (maybeToNullable errorCallback)-         (maybeToNullable successCallback))- -foreign import javascript unsafe "$1[\"version\"]" js_getVersion ::-        Database -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/Database.version Mozilla Database.version documentation> -getVersion ::-           (MonadIO m, FromJSString result) => Database -> m result-getVersion self = liftIO (fromJSString <$> (js_getVersion (self)))

− src/GHCJS/DOM/JSFFI/Generated/DatabaseCallback.hs

@@ -1,49 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.DatabaseCallback-       (newDatabaseCallback, newDatabaseCallbackSync,-        newDatabaseCallbackAsync, DatabaseCallback)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums---- | <https://developer.mozilla.org/en-US/docs/Web/API/DatabaseCallback Mozilla DatabaseCallback documentation> -newDatabaseCallback ::-                    (MonadIO m) => (Maybe Database -> IO ()) -> m DatabaseCallback-newDatabaseCallback callback-  = liftIO-      (DatabaseCallback <$>-         syncCallback1 ThrowWouldBlock-           (\ database ->-              fromJSValUnchecked database >>= \ database' -> callback database'))---- | <https://developer.mozilla.org/en-US/docs/Web/API/DatabaseCallback Mozilla DatabaseCallback documentation> -newDatabaseCallbackSync ::-                        (MonadIO m) => (Maybe Database -> IO ()) -> m DatabaseCallback-newDatabaseCallbackSync callback-  = liftIO-      (DatabaseCallback <$>-         syncCallback1 ContinueAsync-           (\ database ->-              fromJSValUnchecked database >>= \ database' -> callback database'))---- | <https://developer.mozilla.org/en-US/docs/Web/API/DatabaseCallback Mozilla DatabaseCallback documentation> -newDatabaseCallbackAsync ::-                         (MonadIO m) => (Maybe Database -> IO ()) -> m DatabaseCallback-newDatabaseCallbackAsync callback-  = liftIO-      (DatabaseCallback <$>-         asyncCallback1-           (\ database ->-              fromJSValUnchecked database >>= \ database' -> callback database'))

− src/GHCJS/DOM/JSFFI/Generated/DedicatedWorkerGlobalScope.hs

@@ -1,36 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.DedicatedWorkerGlobalScope-       (js_postMessage, postMessage, message, DedicatedWorkerGlobalScope,-        castToDedicatedWorkerGlobalScope, gTypeDedicatedWorkerGlobalScope)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"postMessage\"]($2, $3)"-        js_postMessage ::-        DedicatedWorkerGlobalScope -> JSVal -> Nullable Array -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/DedicatedWorkerGlobalScope.postMessage Mozilla DedicatedWorkerGlobalScope.postMessage documentation> -postMessage ::-            (MonadIO m, IsArray messagePorts) =>-              DedicatedWorkerGlobalScope -> JSVal -> Maybe messagePorts -> m ()-postMessage self message messagePorts-  = liftIO-      (js_postMessage (self) message-         (maybeToNullable (fmap toArray messagePorts)))---- | <https://developer.mozilla.org/en-US/docs/Web/API/DedicatedWorkerGlobalScope.onmessage Mozilla DedicatedWorkerGlobalScope.onmessage documentation> -message :: EventName DedicatedWorkerGlobalScope MessageEvent-message = unsafeEventName (toJSString "message")

− src/GHCJS/DOM/JSFFI/Generated/DelayNode.hs

@@ -1,27 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.DelayNode-       (js_getDelayTime, getDelayTime, DelayNode, castToDelayNode,-        gTypeDelayNode)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"delayTime\"]"-        js_getDelayTime :: DelayNode -> IO (Nullable AudioParam)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DelayNode.delayTime Mozilla DelayNode.delayTime documentation> -getDelayTime :: (MonadIO m) => DelayNode -> m (Maybe AudioParam)-getDelayTime self-  = liftIO (nullableToMaybe <$> (js_getDelayTime (self)))

− src/GHCJS/DOM/JSFFI/Generated/DeviceMotionEvent.hs

@@ -1,95 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.DeviceMotionEvent-       (js_initDeviceMotionEvent, initDeviceMotionEvent,-        js_getAcceleration, getAcceleration,-        js_getAccelerationIncludingGravity,-        getAccelerationIncludingGravity, js_getRotationRate,-        getRotationRate, js_getInterval, getInterval, DeviceMotionEvent,-        castToDeviceMotionEvent, gTypeDeviceMotionEvent)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe-        "$1[\"initDeviceMotionEvent\"]($2,\n$3, $4, $5, $6, $7, $8)"-        js_initDeviceMotionEvent ::-        DeviceMotionEvent ->-          JSString ->-            Bool ->-              Bool ->-                Nullable Acceleration ->-                  Nullable Acceleration -> Nullable RotationRate -> Double -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/DeviceMotionEvent.initDeviceMotionEvent Mozilla DeviceMotionEvent.initDeviceMotionEvent documentation> -initDeviceMotionEvent ::-                      (MonadIO m, ToJSString type', IsAcceleration acceleration,-                       IsAcceleration accelerationIncludingGravity,-                       IsRotationRate rotationRate) =>-                        DeviceMotionEvent ->-                          type' ->-                            Bool ->-                              Bool ->-                                Maybe acceleration ->-                                  Maybe accelerationIncludingGravity ->-                                    Maybe rotationRate -> Double -> m ()-initDeviceMotionEvent self type' bubbles cancelable acceleration-  accelerationIncludingGravity rotationRate interval-  = liftIO-      (js_initDeviceMotionEvent (self) (toJSString type') bubbles-         cancelable-         (maybeToNullable (fmap toAcceleration acceleration))-         (maybeToNullable-            (fmap toAcceleration accelerationIncludingGravity))-         (maybeToNullable (fmap toRotationRate rotationRate))-         interval)- -foreign import javascript unsafe "$1[\"acceleration\"]"-        js_getAcceleration ::-        DeviceMotionEvent -> IO (Nullable Acceleration)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DeviceMotionEvent.acceleration Mozilla DeviceMotionEvent.acceleration documentation> -getAcceleration ::-                (MonadIO m) => DeviceMotionEvent -> m (Maybe Acceleration)-getAcceleration self-  = liftIO (nullableToMaybe <$> (js_getAcceleration (self)))- -foreign import javascript unsafe-        "$1[\"accelerationIncludingGravity\"]"-        js_getAccelerationIncludingGravity ::-        DeviceMotionEvent -> IO (Nullable Acceleration)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DeviceMotionEvent.accelerationIncludingGravity Mozilla DeviceMotionEvent.accelerationIncludingGravity documentation> -getAccelerationIncludingGravity ::-                                (MonadIO m) => DeviceMotionEvent -> m (Maybe Acceleration)-getAccelerationIncludingGravity self-  = liftIO-      (nullableToMaybe <$> (js_getAccelerationIncludingGravity (self)))- -foreign import javascript unsafe "$1[\"rotationRate\"]"-        js_getRotationRate ::-        DeviceMotionEvent -> IO (Nullable RotationRate)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DeviceMotionEvent.rotationRate Mozilla DeviceMotionEvent.rotationRate documentation> -getRotationRate ::-                (MonadIO m) => DeviceMotionEvent -> m (Maybe RotationRate)-getRotationRate self-  = liftIO (nullableToMaybe <$> (js_getRotationRate (self)))- -foreign import javascript unsafe "$1[\"interval\"]" js_getInterval-        :: DeviceMotionEvent -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/DeviceMotionEvent.interval Mozilla DeviceMotionEvent.interval documentation> -getInterval :: (MonadIO m) => DeviceMotionEvent -> m Double-getInterval self = liftIO (js_getInterval (self))

− src/GHCJS/DOM/JSFFI/Generated/DeviceOrientationEvent.hs

@@ -1,71 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.DeviceOrientationEvent-       (js_initDeviceOrientationEvent, initDeviceOrientationEvent,-        js_getAlpha, getAlpha, js_getBeta, getBeta, js_getGamma, getGamma,-        js_getAbsolute, getAbsolute, DeviceOrientationEvent,-        castToDeviceOrientationEvent, gTypeDeviceOrientationEvent)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe-        "$1[\"initDeviceOrientationEvent\"]($2,\n$3, $4, $5, $6, $7, $8)"-        js_initDeviceOrientationEvent ::-        DeviceOrientationEvent ->-          JSString ->-            Bool -> Bool -> Double -> Double -> Double -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/DeviceOrientationEvent.initDeviceOrientationEvent Mozilla DeviceOrientationEvent.initDeviceOrientationEvent documentation> -initDeviceOrientationEvent ::-                           (MonadIO m, ToJSString type') =>-                             DeviceOrientationEvent ->-                               type' -> Bool -> Bool -> Double -> Double -> Double -> Bool -> m ()-initDeviceOrientationEvent self type' bubbles cancelable alpha beta-  gamma absolute-  = liftIO-      (js_initDeviceOrientationEvent (self) (toJSString type') bubbles-         cancelable-         alpha-         beta-         gamma-         absolute)- -foreign import javascript unsafe "$1[\"alpha\"]" js_getAlpha ::-        DeviceOrientationEvent -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/DeviceOrientationEvent.alpha Mozilla DeviceOrientationEvent.alpha documentation> -getAlpha :: (MonadIO m) => DeviceOrientationEvent -> m Double-getAlpha self = liftIO (js_getAlpha (self))- -foreign import javascript unsafe "$1[\"beta\"]" js_getBeta ::-        DeviceOrientationEvent -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/DeviceOrientationEvent.beta Mozilla DeviceOrientationEvent.beta documentation> -getBeta :: (MonadIO m) => DeviceOrientationEvent -> m Double-getBeta self = liftIO (js_getBeta (self))- -foreign import javascript unsafe "$1[\"gamma\"]" js_getGamma ::-        DeviceOrientationEvent -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/DeviceOrientationEvent.gamma Mozilla DeviceOrientationEvent.gamma documentation> -getGamma :: (MonadIO m) => DeviceOrientationEvent -> m Double-getGamma self = liftIO (js_getGamma (self))- -foreign import javascript unsafe "($1[\"absolute\"] ? 1 : 0)"-        js_getAbsolute :: DeviceOrientationEvent -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/DeviceOrientationEvent.absolute Mozilla DeviceOrientationEvent.absolute documentation> -getAbsolute :: (MonadIO m) => DeviceOrientationEvent -> m Bool-getAbsolute self = liftIO (js_getAbsolute (self))

− src/GHCJS/DOM/JSFFI/Generated/DeviceProximityEvent.hs

@@ -1,41 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.DeviceProximityEvent-       (js_getValue, getValue, js_getMin, getMin, js_getMax, getMax,-        DeviceProximityEvent, castToDeviceProximityEvent,-        gTypeDeviceProximityEvent)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"value\"]" js_getValue ::-        DeviceProximityEvent -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/DeviceProximityEvent.value Mozilla DeviceProximityEvent.value documentation> -getValue :: (MonadIO m) => DeviceProximityEvent -> m Double-getValue self = liftIO (js_getValue (self))- -foreign import javascript unsafe "$1[\"min\"]" js_getMin ::-        DeviceProximityEvent -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/DeviceProximityEvent.min Mozilla DeviceProximityEvent.min documentation> -getMin :: (MonadIO m) => DeviceProximityEvent -> m Double-getMin self = liftIO (js_getMin (self))- -foreign import javascript unsafe "$1[\"max\"]" js_getMax ::-        DeviceProximityEvent -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/DeviceProximityEvent.max Mozilla DeviceProximityEvent.max documentation> -getMax :: (MonadIO m) => DeviceProximityEvent -> m Double-getMax self = liftIO (js_getMax (self))

− src/GHCJS/DOM/JSFFI/Generated/Document.hs

@@ -1,1565 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.Document-       (js_newDocument, newDocument, js_createElement, createElement,-        js_createDocumentFragment, createDocumentFragment,-        js_createTextNode, createTextNode, js_createComment, createComment,-        js_createCDATASection, createCDATASection,-        js_createProcessingInstruction, createProcessingInstruction,-        js_createAttribute, createAttribute, js_createEntityReference,-        createEntityReference, js_getElementsByTagName,-        getElementsByTagName, js_importNode, importNode,-        js_createElementNS, createElementNS, js_createAttributeNS,-        createAttributeNS, js_getElementsByTagNameNS,-        getElementsByTagNameNS, js_getElementById, getElementById,-        js_adoptNode, adoptNode, js_createEvent, createEvent,-        js_createRange, createRange, js_createNodeIterator,-        createNodeIterator, js_createTreeWalker, createTreeWalker,-        js_getOverrideStyle, getOverrideStyle, js_createExpression,-        createExpression, js_createNSResolver, createNSResolver,-        js_evaluate, evaluate, js_execCommand, execCommand,-        js_queryCommandEnabled, queryCommandEnabled,-        js_queryCommandIndeterm, queryCommandIndeterm,-        js_queryCommandState, queryCommandState, js_queryCommandSupported,-        queryCommandSupported, js_queryCommandValue, queryCommandValue,-        js_getElementsByName, getElementsByName, js_elementFromPoint,-        elementFromPoint, js_caretRangeFromPoint, caretRangeFromPoint,-        js_getSelection, getSelection, js_getCSSCanvasContext,-        getCSSCanvasContext, js_getElementsByClassName,-        getElementsByClassName, js_hasFocus, hasFocus, js_querySelector,-        querySelector, js_querySelectorAll, querySelectorAll,-        js_webkitCancelFullScreen, webkitCancelFullScreen,-        js_webkitExitFullscreen, webkitExitFullscreen, js_exitPointerLock,-        exitPointerLock, js_webkitGetNamedFlows, webkitGetNamedFlows,-        js_createTouch, createTouch, js_createTouchList, createTouchList,-        js_getDoctype, getDoctype, js_getImplementation, getImplementation,-        js_getDocumentElement, getDocumentElement, js_getInputEncoding,-        getInputEncoding, js_getXmlEncoding, getXmlEncoding,-        js_setXmlVersion, setXmlVersion, js_getXmlVersion, getXmlVersion,-        js_setXmlStandalone, setXmlStandalone, js_getXmlStandalone,-        getXmlStandalone, js_getDocumentURI, getDocumentURI,-        js_getDefaultView, getDefaultView, js_getStyleSheets,-        getStyleSheets, js_getContentType, getContentType, js_setTitle,-        setTitle, js_getTitle, getTitle, js_getReferrer, getReferrer,-        js_setDomain, setDomain, js_getDomain, getDomain, js_getURL,-        getURL, js_setCookie, setCookie, js_getCookie, getCookie,-        js_setBody, setBody, js_getBody, getBody, js_getHead, getHead,-        js_getImages, getImages, js_getApplets, getApplets, js_getLinks,-        getLinks, js_getForms, getForms, js_getAnchors, getAnchors,-        js_getLastModified, getLastModified, js_setLocation, setLocation,-        js_getLocation, getLocation, js_setCharset, setCharset,-        js_getCharset, getCharset, js_getDefaultCharset, getDefaultCharset,-        js_getReadyState, getReadyState, js_getCharacterSet,-        getCharacterSet, js_getPreferredStylesheetSet,-        getPreferredStylesheetSet, js_setSelectedStylesheetSet,-        setSelectedStylesheetSet, js_getSelectedStylesheetSet,-        getSelectedStylesheetSet, js_getActiveElement, getActiveElement,-        js_getCompatMode, getCompatMode, js_getWebkitIsFullScreen,-        getWebkitIsFullScreen, js_getWebkitFullScreenKeyboardInputAllowed,-        getWebkitFullScreenKeyboardInputAllowed,-        js_getWebkitCurrentFullScreenElement,-        getWebkitCurrentFullScreenElement, js_getWebkitFullscreenEnabled,-        getWebkitFullscreenEnabled, js_getWebkitFullscreenElement,-        getWebkitFullscreenElement, js_getPointerLockElement,-        getPointerLockElement, js_getFonts, getFonts, abort, blur, change,-        click, contextMenu, dblClick, drag, dragEnd, dragEnter, dragLeave,-        dragOver, dragStart, drop, error, focus, input, invalid, keyDown,-        keyPress, keyUp, load, mouseDown, mouseEnter, mouseLeave,-        mouseMove, mouseOut, mouseOver, mouseUp, mouseWheel,-        readyStateChange, scroll, select, submit, wheel, beforeCut, cut,-        beforeCopy, copy, beforePaste, paste, reset, search, selectStart,-        selectionchange, touchStart, touchMove, touchEnd, touchCancel,-        webKitFullscreenChange, webKitFullscreenError, pointerlockchange,-        pointerlockerror, securitypolicyviolation, webKitWillRevealBottom,-        webKitWillRevealLeft, webKitWillRevealRight, webKitWillRevealTop,-        js_getVisibilityState, getVisibilityState, js_getHidden, getHidden,-        js_getSecurityPolicy, getSecurityPolicy, js_getCurrentScript,-        getCurrentScript, js_getOrigin, getOrigin, Document,-        castToDocument, gTypeDocument, IsDocument, toDocument)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "new window[\"Document\"]()"-        js_newDocument :: IO Document---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document Mozilla Document documentation> -newDocument :: (MonadIO m) => m Document-newDocument = liftIO (js_newDocument)- -foreign import javascript unsafe "$1[\"createElement\"]($2)"-        js_createElement ::-        Document -> Nullable JSString -> IO (Nullable Element)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.createElement Mozilla Document.createElement documentation> -createElement ::-              (MonadIO m, IsDocument self, ToJSString tagName) =>-                self -> Maybe tagName -> m (Maybe Element)-createElement self tagName-  = liftIO-      (nullableToMaybe <$>-         (js_createElement (toDocument self) (toMaybeJSString tagName)))- -foreign import javascript unsafe "$1[\"createDocumentFragment\"]()"-        js_createDocumentFragment ::-        Document -> IO (Nullable DocumentFragment)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.createDocumentFragment Mozilla Document.createDocumentFragment documentation> -createDocumentFragment ::-                       (MonadIO m, IsDocument self) => self -> m (Maybe DocumentFragment)-createDocumentFragment self-  = liftIO-      (nullableToMaybe <$> (js_createDocumentFragment (toDocument self)))- -foreign import javascript unsafe "$1[\"createTextNode\"]($2)"-        js_createTextNode :: Document -> JSString -> IO (Nullable Text)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.createTextNode Mozilla Document.createTextNode documentation> -createTextNode ::-               (MonadIO m, IsDocument self, ToJSString data') =>-                 self -> data' -> m (Maybe Text)-createTextNode self data'-  = liftIO-      (nullableToMaybe <$>-         (js_createTextNode (toDocument self) (toJSString data')))- -foreign import javascript unsafe "$1[\"createComment\"]($2)"-        js_createComment :: Document -> JSString -> IO (Nullable Comment)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.createComment Mozilla Document.createComment documentation> -createComment ::-              (MonadIO m, IsDocument self, ToJSString data') =>-                self -> data' -> m (Maybe Comment)-createComment self data'-  = liftIO-      (nullableToMaybe <$>-         (js_createComment (toDocument self) (toJSString data')))- -foreign import javascript unsafe "$1[\"createCDATASection\"]($2)"-        js_createCDATASection ::-        Document -> JSString -> IO (Nullable CDATASection)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.createCDATASection Mozilla Document.createCDATASection documentation> -createCDATASection ::-                   (MonadIO m, IsDocument self, ToJSString data') =>-                     self -> data' -> m (Maybe CDATASection)-createCDATASection self data'-  = liftIO-      (nullableToMaybe <$>-         (js_createCDATASection (toDocument self) (toJSString data')))- -foreign import javascript unsafe-        "$1[\"createProcessingInstruction\"]($2,\n$3)"-        js_createProcessingInstruction ::-        Document ->-          JSString -> JSString -> IO (Nullable ProcessingInstruction)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.createProcessingInstruction Mozilla Document.createProcessingInstruction documentation> -createProcessingInstruction ::-                            (MonadIO m, IsDocument self, ToJSString target,-                             ToJSString data') =>-                              self -> target -> data' -> m (Maybe ProcessingInstruction)-createProcessingInstruction self target data'-  = liftIO-      (nullableToMaybe <$>-         (js_createProcessingInstruction (toDocument self)-            (toJSString target)-            (toJSString data')))- -foreign import javascript unsafe "$1[\"createAttribute\"]($2)"-        js_createAttribute :: Document -> JSString -> IO (Nullable Attr)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.createAttribute Mozilla Document.createAttribute documentation> -createAttribute ::-                (MonadIO m, IsDocument self, ToJSString name) =>-                  self -> name -> m (Maybe Attr)-createAttribute self name-  = liftIO-      (nullableToMaybe <$>-         (js_createAttribute (toDocument self) (toJSString name)))- -foreign import javascript unsafe-        "$1[\"createEntityReference\"]($2)" js_createEntityReference ::-        Document -> JSString -> IO (Nullable EntityReference)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.createEntityReference Mozilla Document.createEntityReference documentation> -createEntityReference ::-                      (MonadIO m, IsDocument self, ToJSString name) =>-                        self -> name -> m (Maybe EntityReference)-createEntityReference self name-  = liftIO-      (nullableToMaybe <$>-         (js_createEntityReference (toDocument self) (toJSString name)))- -foreign import javascript unsafe "$1[\"getElementsByTagName\"]($2)"-        js_getElementsByTagName ::-        Document -> JSString -> IO (Nullable NodeList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.getElementsByTagName Mozilla Document.getElementsByTagName documentation> -getElementsByTagName ::-                     (MonadIO m, IsDocument self, ToJSString tagname) =>-                       self -> tagname -> m (Maybe NodeList)-getElementsByTagName self tagname-  = liftIO-      (nullableToMaybe <$>-         (js_getElementsByTagName (toDocument self) (toJSString tagname)))- -foreign import javascript unsafe "$1[\"importNode\"]($2, $3)"-        js_importNode ::-        Document -> Nullable Node -> Bool -> IO (Nullable Node)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.importNode Mozilla Document.importNode documentation> -importNode ::-           (MonadIO m, IsDocument self, IsNode importedNode) =>-             self -> Maybe importedNode -> Bool -> m (Maybe Node)-importNode self importedNode deep-  = liftIO-      (nullableToMaybe <$>-         (js_importNode (toDocument self)-            (maybeToNullable (fmap toNode importedNode))-            deep))- -foreign import javascript unsafe "$1[\"createElementNS\"]($2, $3)"-        js_createElementNS ::-        Document ->-          Nullable JSString -> Nullable JSString -> IO (Nullable Element)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.createElementNS Mozilla Document.createElementNS documentation> -createElementNS ::-                (MonadIO m, IsDocument self, ToJSString namespaceURI,-                 ToJSString qualifiedName) =>-                  self ->-                    Maybe namespaceURI -> Maybe qualifiedName -> m (Maybe Element)-createElementNS self namespaceURI qualifiedName-  = liftIO-      (nullableToMaybe <$>-         (js_createElementNS (toDocument self)-            (toMaybeJSString namespaceURI)-            (toMaybeJSString qualifiedName)))- -foreign import javascript unsafe-        "$1[\"createAttributeNS\"]($2, $3)" js_createAttributeNS ::-        Document ->-          Nullable JSString -> Nullable JSString -> IO (Nullable Attr)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.createAttributeNS Mozilla Document.createAttributeNS documentation> -createAttributeNS ::-                  (MonadIO m, IsDocument self, ToJSString namespaceURI,-                   ToJSString qualifiedName) =>-                    self -> Maybe namespaceURI -> Maybe qualifiedName -> m (Maybe Attr)-createAttributeNS self namespaceURI qualifiedName-  = liftIO-      (nullableToMaybe <$>-         (js_createAttributeNS (toDocument self)-            (toMaybeJSString namespaceURI)-            (toMaybeJSString qualifiedName)))- -foreign import javascript unsafe-        "$1[\"getElementsByTagNameNS\"]($2,\n$3)" js_getElementsByTagNameNS-        ::-        Document -> Nullable JSString -> JSString -> IO (Nullable NodeList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.getElementsByTagNameNS Mozilla Document.getElementsByTagNameNS documentation> -getElementsByTagNameNS ::-                       (MonadIO m, IsDocument self, ToJSString namespaceURI,-                        ToJSString localName) =>-                         self -> Maybe namespaceURI -> localName -> m (Maybe NodeList)-getElementsByTagNameNS self namespaceURI localName-  = liftIO-      (nullableToMaybe <$>-         (js_getElementsByTagNameNS (toDocument self)-            (toMaybeJSString namespaceURI)-            (toJSString localName)))- -foreign import javascript unsafe "$1[\"getElementById\"]($2)"-        js_getElementById :: Document -> JSString -> IO (Nullable Element)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.getElementById Mozilla Document.getElementById documentation> -getElementById ::-               (MonadIO m, IsDocument self, ToJSString elementId) =>-                 self -> elementId -> m (Maybe Element)-getElementById self elementId-  = liftIO-      (nullableToMaybe <$>-         (js_getElementById (toDocument self) (toJSString elementId)))- -foreign import javascript unsafe "$1[\"adoptNode\"]($2)"-        js_adoptNode :: Document -> Nullable Node -> IO (Nullable Node)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.adoptNode Mozilla Document.adoptNode documentation> -adoptNode ::-          (MonadIO m, IsDocument self, IsNode source) =>-            self -> Maybe source -> m (Maybe Node)-adoptNode self source-  = liftIO-      (nullableToMaybe <$>-         (js_adoptNode (toDocument self)-            (maybeToNullable (fmap toNode source))))- -foreign import javascript unsafe "$1[\"createEvent\"]($2)"-        js_createEvent :: Document -> JSString -> IO (Nullable Event)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.createEvent Mozilla Document.createEvent documentation> -createEvent ::-            (MonadIO m, IsDocument self, ToJSString eventType) =>-              self -> eventType -> m (Maybe Event)-createEvent self eventType-  = liftIO-      (nullableToMaybe <$>-         (js_createEvent (toDocument self) (toJSString eventType)))- -foreign import javascript unsafe "$1[\"createRange\"]()"-        js_createRange :: Document -> IO (Nullable Range)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.createRange Mozilla Document.createRange documentation> -createRange ::-            (MonadIO m, IsDocument self) => self -> m (Maybe Range)-createRange self-  = liftIO (nullableToMaybe <$> (js_createRange (toDocument self)))- -foreign import javascript unsafe-        "$1[\"createNodeIterator\"]($2, $3,\n$4, $5)" js_createNodeIterator-        ::-        Document ->-          Nullable Node ->-            Word -> Nullable NodeFilter -> Bool -> IO (Nullable NodeIterator)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.createNodeIterator Mozilla Document.createNodeIterator documentation> -createNodeIterator ::-                   (MonadIO m, IsDocument self, IsNode root) =>-                     self ->-                       Maybe root ->-                         Word -> Maybe NodeFilter -> Bool -> m (Maybe NodeIterator)-createNodeIterator self root whatToShow filter-  expandEntityReferences-  = liftIO-      (nullableToMaybe <$>-         (js_createNodeIterator (toDocument self)-            (maybeToNullable (fmap toNode root))-            whatToShow-            (maybeToNullable filter)-            expandEntityReferences))- -foreign import javascript unsafe-        "$1[\"createTreeWalker\"]($2, $3,\n$4, $5)" js_createTreeWalker ::-        Document ->-          Nullable Node ->-            Word -> Nullable NodeFilter -> Bool -> IO (Nullable TreeWalker)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.createTreeWalker Mozilla Document.createTreeWalker documentation> -createTreeWalker ::-                 (MonadIO m, IsDocument self, IsNode root) =>-                   self ->-                     Maybe root ->-                       Word -> Maybe NodeFilter -> Bool -> m (Maybe TreeWalker)-createTreeWalker self root whatToShow filter expandEntityReferences-  = liftIO-      (nullableToMaybe <$>-         (js_createTreeWalker (toDocument self)-            (maybeToNullable (fmap toNode root))-            whatToShow-            (maybeToNullable filter)-            expandEntityReferences))- -foreign import javascript unsafe "$1[\"getOverrideStyle\"]($2, $3)"-        js_getOverrideStyle ::-        Document ->-          Nullable Element -> JSString -> IO (Nullable CSSStyleDeclaration)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.getOverrideStyle Mozilla Document.getOverrideStyle documentation> -getOverrideStyle ::-                 (MonadIO m, IsDocument self, IsElement element,-                  ToJSString pseudoElement) =>-                   self ->-                     Maybe element -> pseudoElement -> m (Maybe CSSStyleDeclaration)-getOverrideStyle self element pseudoElement-  = liftIO-      (nullableToMaybe <$>-         (js_getOverrideStyle (toDocument self)-            (maybeToNullable (fmap toElement element))-            (toJSString pseudoElement)))- -foreign import javascript unsafe "$1[\"createExpression\"]($2, $3)"-        js_createExpression ::-        Document ->-          JSString ->-            Nullable XPathNSResolver -> IO (Nullable XPathExpression)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.createExpression Mozilla Document.createExpression documentation> -createExpression ::-                 (MonadIO m, IsDocument self, ToJSString expression) =>-                   self ->-                     expression -> Maybe XPathNSResolver -> m (Maybe XPathExpression)-createExpression self expression resolver-  = liftIO-      (nullableToMaybe <$>-         (js_createExpression (toDocument self) (toJSString expression)-            (maybeToNullable resolver)))- -foreign import javascript unsafe "$1[\"createNSResolver\"]($2)"-        js_createNSResolver ::-        Document -> Nullable Node -> IO (Nullable XPathNSResolver)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.createNSResolver Mozilla Document.createNSResolver documentation> -createNSResolver ::-                 (MonadIO m, IsDocument self, IsNode nodeResolver) =>-                   self -> Maybe nodeResolver -> m (Maybe XPathNSResolver)-createNSResolver self nodeResolver-  = liftIO-      (nullableToMaybe <$>-         (js_createNSResolver (toDocument self)-            (maybeToNullable (fmap toNode nodeResolver))))- -foreign import javascript unsafe-        "$1[\"evaluate\"]($2, $3, $4, $5,\n$6)" js_evaluate ::-        Document ->-          JSString ->-            Nullable Node ->-              Nullable XPathNSResolver ->-                Word -> Nullable XPathResult -> IO (Nullable XPathResult)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.evaluate Mozilla Document.evaluate documentation> -evaluate ::-         (MonadIO m, IsDocument self, ToJSString expression,-          IsNode contextNode) =>-           self ->-             expression ->-               Maybe contextNode ->-                 Maybe XPathNSResolver ->-                   Word -> Maybe XPathResult -> m (Maybe XPathResult)-evaluate self expression contextNode resolver type' inResult-  = liftIO-      (nullableToMaybe <$>-         (js_evaluate (toDocument self) (toJSString expression)-            (maybeToNullable (fmap toNode contextNode))-            (maybeToNullable resolver)-            type'-            (maybeToNullable inResult)))- -foreign import javascript unsafe-        "($1[\"execCommand\"]($2, $3,\n$4) ? 1 : 0)" js_execCommand ::-        Document -> JSString -> Bool -> Nullable JSString -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.execCommand Mozilla Document.execCommand documentation> -execCommand ::-            (MonadIO m, IsDocument self, ToJSString command,-             ToJSString value) =>-              self -> command -> Bool -> Maybe value -> m Bool-execCommand self command userInterface value-  = liftIO-      (js_execCommand (toDocument self) (toJSString command)-         userInterface-         (toMaybeJSString value))- -foreign import javascript unsafe-        "($1[\"queryCommandEnabled\"]($2) ? 1 : 0)" js_queryCommandEnabled-        :: Document -> JSString -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.queryCommandEnabled Mozilla Document.queryCommandEnabled documentation> -queryCommandEnabled ::-                    (MonadIO m, IsDocument self, ToJSString command) =>-                      self -> command -> m Bool-queryCommandEnabled self command-  = liftIO-      (js_queryCommandEnabled (toDocument self) (toJSString command))- -foreign import javascript unsafe-        "($1[\"queryCommandIndeterm\"]($2) ? 1 : 0)"-        js_queryCommandIndeterm :: Document -> JSString -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.queryCommandIndeterm Mozilla Document.queryCommandIndeterm documentation> -queryCommandIndeterm ::-                     (MonadIO m, IsDocument self, ToJSString command) =>-                       self -> command -> m Bool-queryCommandIndeterm self command-  = liftIO-      (js_queryCommandIndeterm (toDocument self) (toJSString command))- -foreign import javascript unsafe-        "($1[\"queryCommandState\"]($2) ? 1 : 0)" js_queryCommandState ::-        Document -> JSString -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.queryCommandState Mozilla Document.queryCommandState documentation> -queryCommandState ::-                  (MonadIO m, IsDocument self, ToJSString command) =>-                    self -> command -> m Bool-queryCommandState self command-  = liftIO-      (js_queryCommandState (toDocument self) (toJSString command))- -foreign import javascript unsafe-        "($1[\"queryCommandSupported\"]($2) ? 1 : 0)"-        js_queryCommandSupported :: Document -> JSString -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.queryCommandSupported Mozilla Document.queryCommandSupported documentation> -queryCommandSupported ::-                      (MonadIO m, IsDocument self, ToJSString command) =>-                        self -> command -> m Bool-queryCommandSupported self command-  = liftIO-      (js_queryCommandSupported (toDocument self) (toJSString command))- -foreign import javascript unsafe "$1[\"queryCommandValue\"]($2)"-        js_queryCommandValue :: Document -> JSString -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.queryCommandValue Mozilla Document.queryCommandValue documentation> -queryCommandValue ::-                  (MonadIO m, IsDocument self, ToJSString command,-                   FromJSString result) =>-                    self -> command -> m result-queryCommandValue self command-  = liftIO-      (fromJSString <$>-         (js_queryCommandValue (toDocument self) (toJSString command)))- -foreign import javascript unsafe "$1[\"getElementsByName\"]($2)"-        js_getElementsByName ::-        Document -> JSString -> IO (Nullable NodeList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.getElementsByName Mozilla Document.getElementsByName documentation> -getElementsByName ::-                  (MonadIO m, IsDocument self, ToJSString elementName) =>-                    self -> elementName -> m (Maybe NodeList)-getElementsByName self elementName-  = liftIO-      (nullableToMaybe <$>-         (js_getElementsByName (toDocument self) (toJSString elementName)))- -foreign import javascript unsafe "$1[\"elementFromPoint\"]($2, $3)"-        js_elementFromPoint ::-        Document -> Int -> Int -> IO (Nullable Element)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.elementFromPoint Mozilla Document.elementFromPoint documentation> -elementFromPoint ::-                 (MonadIO m, IsDocument self) =>-                   self -> Int -> Int -> m (Maybe Element)-elementFromPoint self x y-  = liftIO-      (nullableToMaybe <$> (js_elementFromPoint (toDocument self) x y))- -foreign import javascript unsafe-        "$1[\"caretRangeFromPoint\"]($2,\n$3)" js_caretRangeFromPoint ::-        Document -> Int -> Int -> IO (Nullable Range)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.caretRangeFromPoint Mozilla Document.caretRangeFromPoint documentation> -caretRangeFromPoint ::-                    (MonadIO m, IsDocument self) =>-                      self -> Int -> Int -> m (Maybe Range)-caretRangeFromPoint self x y-  = liftIO-      (nullableToMaybe <$>-         (js_caretRangeFromPoint (toDocument self) x y))- -foreign import javascript unsafe "$1[\"getSelection\"]()"-        js_getSelection :: Document -> IO (Nullable Selection)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.getSelection Mozilla Document.getSelection documentation> -getSelection ::-             (MonadIO m, IsDocument self) => self -> m (Maybe Selection)-getSelection self-  = liftIO (nullableToMaybe <$> (js_getSelection (toDocument self)))- -foreign import javascript unsafe-        "$1[\"getCSSCanvasContext\"]($2,\n$3, $4, $5)"-        js_getCSSCanvasContext ::-        Document ->-          JSString ->-            JSString -> Int -> Int -> IO (Nullable CanvasRenderingContext)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.getCSSCanvasContext Mozilla Document.getCSSCanvasContext documentation> -getCSSCanvasContext ::-                    (MonadIO m, IsDocument self, ToJSString contextId,-                     ToJSString name) =>-                      self ->-                        contextId -> name -> Int -> Int -> m (Maybe CanvasRenderingContext)-getCSSCanvasContext self contextId name width height-  = liftIO-      (nullableToMaybe <$>-         (js_getCSSCanvasContext (toDocument self) (toJSString contextId)-            (toJSString name)-            width-            height))- -foreign import javascript unsafe-        "$1[\"getElementsByClassName\"]($2)" js_getElementsByClassName ::-        Document -> JSString -> IO (Nullable NodeList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.getElementsByClassName Mozilla Document.getElementsByClassName documentation> -getElementsByClassName ::-                       (MonadIO m, IsDocument self, ToJSString tagname) =>-                         self -> tagname -> m (Maybe NodeList)-getElementsByClassName self tagname-  = liftIO-      (nullableToMaybe <$>-         (js_getElementsByClassName (toDocument self) (toJSString tagname)))- -foreign import javascript unsafe "($1[\"hasFocus\"]() ? 1 : 0)"-        js_hasFocus :: Document -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.hasFocus Mozilla Document.hasFocus documentation> -hasFocus :: (MonadIO m, IsDocument self) => self -> m Bool-hasFocus self = liftIO (js_hasFocus (toDocument self))- -foreign import javascript unsafe "$1[\"querySelector\"]($2)"-        js_querySelector :: Document -> JSString -> IO (Nullable Element)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.querySelector Mozilla Document.querySelector documentation> -querySelector ::-              (MonadIO m, IsDocument self, ToJSString selectors) =>-                self -> selectors -> m (Maybe Element)-querySelector self selectors-  = liftIO-      (nullableToMaybe <$>-         (js_querySelector (toDocument self) (toJSString selectors)))- -foreign import javascript unsafe "$1[\"querySelectorAll\"]($2)"-        js_querySelectorAll ::-        Document -> JSString -> IO (Nullable NodeList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.querySelectorAll Mozilla Document.querySelectorAll documentation> -querySelectorAll ::-                 (MonadIO m, IsDocument self, ToJSString selectors) =>-                   self -> selectors -> m (Maybe NodeList)-querySelectorAll self selectors-  = liftIO-      (nullableToMaybe <$>-         (js_querySelectorAll (toDocument self) (toJSString selectors)))- -foreign import javascript unsafe "$1[\"webkitCancelFullScreen\"]()"-        js_webkitCancelFullScreen :: Document -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.webkitCancelFullScreen Mozilla Document.webkitCancelFullScreen documentation> -webkitCancelFullScreen ::-                       (MonadIO m, IsDocument self) => self -> m ()-webkitCancelFullScreen self-  = liftIO (js_webkitCancelFullScreen (toDocument self))- -foreign import javascript unsafe "$1[\"webkitExitFullscreen\"]()"-        js_webkitExitFullscreen :: Document -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.webkitExitFullscreen Mozilla Document.webkitExitFullscreen documentation> -webkitExitFullscreen ::-                     (MonadIO m, IsDocument self) => self -> m ()-webkitExitFullscreen self-  = liftIO (js_webkitExitFullscreen (toDocument self))- -foreign import javascript unsafe "$1[\"exitPointerLock\"]()"-        js_exitPointerLock :: Document -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.exitPointerLock Mozilla Document.exitPointerLock documentation> -exitPointerLock :: (MonadIO m, IsDocument self) => self -> m ()-exitPointerLock self-  = liftIO (js_exitPointerLock (toDocument self))- -foreign import javascript unsafe "$1[\"webkitGetNamedFlows\"]()"-        js_webkitGetNamedFlows ::-        Document -> IO (Nullable DOMNamedFlowCollection)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.webkitGetNamedFlows Mozilla Document.webkitGetNamedFlows documentation> -webkitGetNamedFlows ::-                    (MonadIO m, IsDocument self) =>-                      self -> m (Maybe DOMNamedFlowCollection)-webkitGetNamedFlows self-  = liftIO-      (nullableToMaybe <$> (js_webkitGetNamedFlows (toDocument self)))- -foreign import javascript unsafe-        "$1[\"createTouch\"]($2, $3, $4,\n$5, $6, $7, $8, $9, $10, $11,\n$12)"-        js_createTouch ::-        Document ->-          Nullable Window ->-            Nullable EventTarget ->-              Int ->-                Int ->-                  Int ->-                    Int -> Int -> Int -> Int -> Float -> Float -> IO (Nullable Touch)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.createTouch Mozilla Document.createTouch documentation> -createTouch ::-            (MonadIO m, IsDocument self, IsEventTarget target) =>-              self ->-                Maybe Window ->-                  Maybe target ->-                    Int ->-                      Int ->-                        Int ->-                          Int -> Int -> Int -> Int -> Float -> Float -> m (Maybe Touch)-createTouch self window target identifier pageX pageY screenX-  screenY webkitRadiusX webkitRadiusY webkitRotationAngle webkitForce-  = liftIO-      (nullableToMaybe <$>-         (js_createTouch (toDocument self) (maybeToNullable window)-            (maybeToNullable (fmap toEventTarget target))-            identifier-            pageX-            pageY-            screenX-            screenY-            webkitRadiusX-            webkitRadiusY-            webkitRotationAngle-            webkitForce))- -foreign import javascript unsafe "$1[\"createTouchList\"]()"-        js_createTouchList :: Document -> IO (Nullable TouchList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.createTouchList Mozilla Document.createTouchList documentation> -createTouchList ::-                (MonadIO m, IsDocument self) => self -> m (Maybe TouchList)-createTouchList self-  = liftIO-      (nullableToMaybe <$> (js_createTouchList (toDocument self)))- -foreign import javascript unsafe "$1[\"doctype\"]" js_getDoctype ::-        Document -> IO (Nullable DocumentType)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.doctype Mozilla Document.doctype documentation> -getDoctype ::-           (MonadIO m, IsDocument self) => self -> m (Maybe DocumentType)-getDoctype self-  = liftIO (nullableToMaybe <$> (js_getDoctype (toDocument self)))- -foreign import javascript unsafe "$1[\"implementation\"]"-        js_getImplementation :: Document -> IO (Nullable DOMImplementation)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.implementation Mozilla Document.implementation documentation> -getImplementation ::-                  (MonadIO m, IsDocument self) => self -> m (Maybe DOMImplementation)-getImplementation self-  = liftIO-      (nullableToMaybe <$> (js_getImplementation (toDocument self)))- -foreign import javascript unsafe "$1[\"documentElement\"]"-        js_getDocumentElement :: Document -> IO (Nullable Element)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.documentElement Mozilla Document.documentElement documentation> -getDocumentElement ::-                   (MonadIO m, IsDocument self) => self -> m (Maybe Element)-getDocumentElement self-  = liftIO-      (nullableToMaybe <$> (js_getDocumentElement (toDocument self)))- -foreign import javascript unsafe "$1[\"inputEncoding\"]"-        js_getInputEncoding :: Document -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.inputEncoding Mozilla Document.inputEncoding documentation> -getInputEncoding ::-                 (MonadIO m, IsDocument self, FromJSString result) =>-                   self -> m (Maybe result)-getInputEncoding self-  = liftIO-      (fromMaybeJSString <$> (js_getInputEncoding (toDocument self)))- -foreign import javascript unsafe "$1[\"xmlEncoding\"]"-        js_getXmlEncoding :: Document -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.xmlEncoding Mozilla Document.xmlEncoding documentation> -getXmlEncoding ::-               (MonadIO m, IsDocument self, FromJSString result) =>-                 self -> m (Maybe result)-getXmlEncoding self-  = liftIO-      (fromMaybeJSString <$> (js_getXmlEncoding (toDocument self)))- -foreign import javascript unsafe "$1[\"xmlVersion\"] = $2;"-        js_setXmlVersion :: Document -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.xmlVersion Mozilla Document.xmlVersion documentation> -setXmlVersion ::-              (MonadIO m, IsDocument self, ToJSString val) =>-                self -> Maybe val -> m ()-setXmlVersion self val-  = liftIO (js_setXmlVersion (toDocument self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"xmlVersion\"]"-        js_getXmlVersion :: Document -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.xmlVersion Mozilla Document.xmlVersion documentation> -getXmlVersion ::-              (MonadIO m, IsDocument self, FromJSString result) =>-                self -> m (Maybe result)-getXmlVersion self-  = liftIO-      (fromMaybeJSString <$> (js_getXmlVersion (toDocument self)))- -foreign import javascript unsafe "$1[\"xmlStandalone\"] = $2;"-        js_setXmlStandalone :: Document -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.xmlStandalone Mozilla Document.xmlStandalone documentation> -setXmlStandalone ::-                 (MonadIO m, IsDocument self) => self -> Bool -> m ()-setXmlStandalone self val-  = liftIO (js_setXmlStandalone (toDocument self) val)- -foreign import javascript unsafe "($1[\"xmlStandalone\"] ? 1 : 0)"-        js_getXmlStandalone :: Document -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.xmlStandalone Mozilla Document.xmlStandalone documentation> -getXmlStandalone :: (MonadIO m, IsDocument self) => self -> m Bool-getXmlStandalone self-  = liftIO (js_getXmlStandalone (toDocument self))- -foreign import javascript unsafe "$1[\"documentURI\"]"-        js_getDocumentURI :: Document -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.documentURI Mozilla Document.documentURI documentation> -getDocumentURI ::-               (MonadIO m, IsDocument self, FromJSString result) =>-                 self -> m (Maybe result)-getDocumentURI self-  = liftIO-      (fromMaybeJSString <$> (js_getDocumentURI (toDocument self)))- -foreign import javascript unsafe "$1[\"defaultView\"]"-        js_getDefaultView :: Document -> IO (Nullable Window)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.defaultView Mozilla Document.defaultView documentation> -getDefaultView ::-               (MonadIO m, IsDocument self) => self -> m (Maybe Window)-getDefaultView self-  = liftIO-      (nullableToMaybe <$> (js_getDefaultView (toDocument self)))- -foreign import javascript unsafe "$1[\"styleSheets\"]"-        js_getStyleSheets :: Document -> IO (Nullable StyleSheetList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.styleSheets Mozilla Document.styleSheets documentation> -getStyleSheets ::-               (MonadIO m, IsDocument self) => self -> m (Maybe StyleSheetList)-getStyleSheets self-  = liftIO-      (nullableToMaybe <$> (js_getStyleSheets (toDocument self)))- -foreign import javascript unsafe "$1[\"contentType\"]"-        js_getContentType :: Document -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.contentType Mozilla Document.contentType documentation> -getContentType ::-               (MonadIO m, IsDocument self, FromJSString result) =>-                 self -> m result-getContentType self-  = liftIO (fromJSString <$> (js_getContentType (toDocument self)))- -foreign import javascript unsafe "$1[\"title\"] = $2;" js_setTitle-        :: Document -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.title Mozilla Document.title documentation> -setTitle ::-         (MonadIO m, IsDocument self, ToJSString val) =>-           self -> Maybe val -> m ()-setTitle self val-  = liftIO (js_setTitle (toDocument self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"title\"]" js_getTitle ::-        Document -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.title Mozilla Document.title documentation> -getTitle ::-         (MonadIO m, IsDocument self, FromJSString result) =>-           self -> m (Maybe result)-getTitle self-  = liftIO (fromMaybeJSString <$> (js_getTitle (toDocument self)))- -foreign import javascript unsafe "$1[\"referrer\"]" js_getReferrer-        :: Document -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.referrer Mozilla Document.referrer documentation> -getReferrer ::-            (MonadIO m, IsDocument self, FromJSString result) =>-              self -> m result-getReferrer self-  = liftIO (fromJSString <$> (js_getReferrer (toDocument self)))- -foreign import javascript unsafe "$1[\"domain\"] = $2;"-        js_setDomain :: Document -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.domain Mozilla Document.domain documentation> -setDomain ::-          (MonadIO m, IsDocument self, ToJSString val) =>-            self -> Maybe val -> m ()-setDomain self val-  = liftIO (js_setDomain (toDocument self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"domain\"]" js_getDomain ::-        Document -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.domain Mozilla Document.domain documentation> -getDomain ::-          (MonadIO m, IsDocument self, FromJSString result) =>-            self -> m (Maybe result)-getDomain self-  = liftIO (fromMaybeJSString <$> (js_getDomain (toDocument self)))- -foreign import javascript unsafe "$1[\"URL\"]" js_getURL ::-        Document -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.URL Mozilla Document.URL documentation> -getURL ::-       (MonadIO m, IsDocument self, FromJSString result) =>-         self -> m result-getURL self-  = liftIO (fromJSString <$> (js_getURL (toDocument self)))- -foreign import javascript unsafe "$1[\"cookie\"] = $2;"-        js_setCookie :: Document -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.cookie Mozilla Document.cookie documentation> -setCookie ::-          (MonadIO m, IsDocument self, ToJSString val) =>-            self -> Maybe val -> m ()-setCookie self val-  = liftIO (js_setCookie (toDocument self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"cookie\"]" js_getCookie ::-        Document -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.cookie Mozilla Document.cookie documentation> -getCookie ::-          (MonadIO m, IsDocument self, FromJSString result) =>-            self -> m (Maybe result)-getCookie self-  = liftIO (fromMaybeJSString <$> (js_getCookie (toDocument self)))- -foreign import javascript unsafe "$1[\"body\"] = $2;" js_setBody ::-        Document -> Nullable HTMLElement -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.body Mozilla Document.body documentation> -setBody ::-        (MonadIO m, IsDocument self, IsHTMLElement val) =>-          self -> Maybe val -> m ()-setBody self val-  = liftIO-      (js_setBody (toDocument self)-         (maybeToNullable (fmap toHTMLElement val)))- -foreign import javascript unsafe "$1[\"body\"]" js_getBody ::-        Document -> IO (Nullable HTMLElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.body Mozilla Document.body documentation> -getBody ::-        (MonadIO m, IsDocument self) => self -> m (Maybe HTMLElement)-getBody self-  = liftIO (nullableToMaybe <$> (js_getBody (toDocument self)))- -foreign import javascript unsafe "$1[\"head\"]" js_getHead ::-        Document -> IO (Nullable HTMLHeadElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.head Mozilla Document.head documentation> -getHead ::-        (MonadIO m, IsDocument self) => self -> m (Maybe HTMLHeadElement)-getHead self-  = liftIO (nullableToMaybe <$> (js_getHead (toDocument self)))- -foreign import javascript unsafe "$1[\"images\"]" js_getImages ::-        Document -> IO (Nullable HTMLCollection)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.images Mozilla Document.images documentation> -getImages ::-          (MonadIO m, IsDocument self) => self -> m (Maybe HTMLCollection)-getImages self-  = liftIO (nullableToMaybe <$> (js_getImages (toDocument self)))- -foreign import javascript unsafe "$1[\"applets\"]" js_getApplets ::-        Document -> IO (Nullable HTMLCollection)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.applets Mozilla Document.applets documentation> -getApplets ::-           (MonadIO m, IsDocument self) => self -> m (Maybe HTMLCollection)-getApplets self-  = liftIO (nullableToMaybe <$> (js_getApplets (toDocument self)))- -foreign import javascript unsafe "$1[\"links\"]" js_getLinks ::-        Document -> IO (Nullable HTMLCollection)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.links Mozilla Document.links documentation> -getLinks ::-         (MonadIO m, IsDocument self) => self -> m (Maybe HTMLCollection)-getLinks self-  = liftIO (nullableToMaybe <$> (js_getLinks (toDocument self)))- -foreign import javascript unsafe "$1[\"forms\"]" js_getForms ::-        Document -> IO (Nullable HTMLCollection)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.forms Mozilla Document.forms documentation> -getForms ::-         (MonadIO m, IsDocument self) => self -> m (Maybe HTMLCollection)-getForms self-  = liftIO (nullableToMaybe <$> (js_getForms (toDocument self)))- -foreign import javascript unsafe "$1[\"anchors\"]" js_getAnchors ::-        Document -> IO (Nullable HTMLCollection)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.anchors Mozilla Document.anchors documentation> -getAnchors ::-           (MonadIO m, IsDocument self) => self -> m (Maybe HTMLCollection)-getAnchors self-  = liftIO (nullableToMaybe <$> (js_getAnchors (toDocument self)))- -foreign import javascript unsafe "$1[\"lastModified\"]"-        js_getLastModified :: Document -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.lastModified Mozilla Document.lastModified documentation> -getLastModified ::-                (MonadIO m, IsDocument self, FromJSString result) =>-                  self -> m result-getLastModified self-  = liftIO (fromJSString <$> (js_getLastModified (toDocument self)))- -foreign import javascript unsafe "$1[\"location\"] = $2;"-        js_setLocation :: Document -> Nullable Location -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.location Mozilla Document.location documentation> -setLocation ::-            (MonadIO m, IsDocument self) => self -> Maybe Location -> m ()-setLocation self val-  = liftIO (js_setLocation (toDocument self) (maybeToNullable val))- -foreign import javascript unsafe "$1[\"location\"]" js_getLocation-        :: Document -> IO (Nullable Location)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.location Mozilla Document.location documentation> -getLocation ::-            (MonadIO m, IsDocument self) => self -> m (Maybe Location)-getLocation self-  = liftIO (nullableToMaybe <$> (js_getLocation (toDocument self)))- -foreign import javascript unsafe "$1[\"charset\"] = $2;"-        js_setCharset :: Document -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.charset Mozilla Document.charset documentation> -setCharset ::-           (MonadIO m, IsDocument self, ToJSString val) =>-             self -> Maybe val -> m ()-setCharset self val-  = liftIO (js_setCharset (toDocument self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"charset\"]" js_getCharset ::-        Document -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.charset Mozilla Document.charset documentation> -getCharset ::-           (MonadIO m, IsDocument self, FromJSString result) =>-             self -> m (Maybe result)-getCharset self-  = liftIO (fromMaybeJSString <$> (js_getCharset (toDocument self)))- -foreign import javascript unsafe "$1[\"defaultCharset\"]"-        js_getDefaultCharset :: Document -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.defaultCharset Mozilla Document.defaultCharset documentation> -getDefaultCharset ::-                  (MonadIO m, IsDocument self, FromJSString result) =>-                    self -> m (Maybe result)-getDefaultCharset self-  = liftIO-      (fromMaybeJSString <$> (js_getDefaultCharset (toDocument self)))- -foreign import javascript unsafe "$1[\"readyState\"]"-        js_getReadyState :: Document -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.readyState Mozilla Document.readyState documentation> -getReadyState ::-              (MonadIO m, IsDocument self, FromJSString result) =>-                self -> m (Maybe result)-getReadyState self-  = liftIO-      (fromMaybeJSString <$> (js_getReadyState (toDocument self)))- -foreign import javascript unsafe "$1[\"characterSet\"]"-        js_getCharacterSet :: Document -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.characterSet Mozilla Document.characterSet documentation> -getCharacterSet ::-                (MonadIO m, IsDocument self, FromJSString result) =>-                  self -> m (Maybe result)-getCharacterSet self-  = liftIO-      (fromMaybeJSString <$> (js_getCharacterSet (toDocument self)))- -foreign import javascript unsafe "$1[\"preferredStylesheetSet\"]"-        js_getPreferredStylesheetSet :: Document -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.preferredStylesheetSet Mozilla Document.preferredStylesheetSet documentation> -getPreferredStylesheetSet ::-                          (MonadIO m, IsDocument self, FromJSString result) =>-                            self -> m (Maybe result)-getPreferredStylesheetSet self-  = liftIO-      (fromMaybeJSString <$>-         (js_getPreferredStylesheetSet (toDocument self)))- -foreign import javascript unsafe-        "$1[\"selectedStylesheetSet\"] = $2;" js_setSelectedStylesheetSet-        :: Document -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.selectedStylesheetSet Mozilla Document.selectedStylesheetSet documentation> -setSelectedStylesheetSet ::-                         (MonadIO m, IsDocument self, ToJSString val) =>-                           self -> Maybe val -> m ()-setSelectedStylesheetSet self val-  = liftIO-      (js_setSelectedStylesheetSet (toDocument self)-         (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"selectedStylesheetSet\"]"-        js_getSelectedStylesheetSet :: Document -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.selectedStylesheetSet Mozilla Document.selectedStylesheetSet documentation> -getSelectedStylesheetSet ::-                         (MonadIO m, IsDocument self, FromJSString result) =>-                           self -> m (Maybe result)-getSelectedStylesheetSet self-  = liftIO-      (fromMaybeJSString <$>-         (js_getSelectedStylesheetSet (toDocument self)))- -foreign import javascript unsafe "$1[\"activeElement\"]"-        js_getActiveElement :: Document -> IO (Nullable Element)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.activeElement Mozilla Document.activeElement documentation> -getActiveElement ::-                 (MonadIO m, IsDocument self) => self -> m (Maybe Element)-getActiveElement self-  = liftIO-      (nullableToMaybe <$> (js_getActiveElement (toDocument self)))- -foreign import javascript unsafe "$1[\"compatMode\"]"-        js_getCompatMode :: Document -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.compatMode Mozilla Document.compatMode documentation> -getCompatMode ::-              (MonadIO m, IsDocument self, FromJSString result) =>-                self -> m result-getCompatMode self-  = liftIO (fromJSString <$> (js_getCompatMode (toDocument self)))- -foreign import javascript unsafe-        "($1[\"webkitIsFullScreen\"] ? 1 : 0)" js_getWebkitIsFullScreen ::-        Document -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.webkitIsFullScreen Mozilla Document.webkitIsFullScreen documentation> -getWebkitIsFullScreen ::-                      (MonadIO m, IsDocument self) => self -> m Bool-getWebkitIsFullScreen self-  = liftIO (js_getWebkitIsFullScreen (toDocument self))- -foreign import javascript unsafe-        "($1[\"webkitFullScreenKeyboardInputAllowed\"] ? 1 : 0)"-        js_getWebkitFullScreenKeyboardInputAllowed :: Document -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.webkitFullScreenKeyboardInputAllowed Mozilla Document.webkitFullScreenKeyboardInputAllowed documentation> -getWebkitFullScreenKeyboardInputAllowed ::-                                        (MonadIO m, IsDocument self) => self -> m Bool-getWebkitFullScreenKeyboardInputAllowed self-  = liftIO-      (js_getWebkitFullScreenKeyboardInputAllowed (toDocument self))- -foreign import javascript unsafe-        "$1[\"webkitCurrentFullScreenElement\"]"-        js_getWebkitCurrentFullScreenElement ::-        Document -> IO (Nullable Element)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.webkitCurrentFullScreenElement Mozilla Document.webkitCurrentFullScreenElement documentation> -getWebkitCurrentFullScreenElement ::-                                  (MonadIO m, IsDocument self) => self -> m (Maybe Element)-getWebkitCurrentFullScreenElement self-  = liftIO-      (nullableToMaybe <$>-         (js_getWebkitCurrentFullScreenElement (toDocument self)))- -foreign import javascript unsafe-        "($1[\"webkitFullscreenEnabled\"] ? 1 : 0)"-        js_getWebkitFullscreenEnabled :: Document -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.webkitFullscreenEnabled Mozilla Document.webkitFullscreenEnabled documentation> -getWebkitFullscreenEnabled ::-                           (MonadIO m, IsDocument self) => self -> m Bool-getWebkitFullscreenEnabled self-  = liftIO (js_getWebkitFullscreenEnabled (toDocument self))- -foreign import javascript unsafe "$1[\"webkitFullscreenElement\"]"-        js_getWebkitFullscreenElement :: Document -> IO (Nullable Element)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.webkitFullscreenElement Mozilla Document.webkitFullscreenElement documentation> -getWebkitFullscreenElement ::-                           (MonadIO m, IsDocument self) => self -> m (Maybe Element)-getWebkitFullscreenElement self-  = liftIO-      (nullableToMaybe <$>-         (js_getWebkitFullscreenElement (toDocument self)))- -foreign import javascript unsafe "$1[\"pointerLockElement\"]"-        js_getPointerLockElement :: Document -> IO (Nullable Element)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.pointerLockElement Mozilla Document.pointerLockElement documentation> -getPointerLockElement ::-                      (MonadIO m, IsDocument self) => self -> m (Maybe Element)-getPointerLockElement self-  = liftIO-      (nullableToMaybe <$> (js_getPointerLockElement (toDocument self)))- -foreign import javascript unsafe "$1[\"fonts\"]" js_getFonts ::-        Document -> IO (Nullable FontLoader)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.fonts Mozilla Document.fonts documentation> -getFonts ::-         (MonadIO m, IsDocument self) => self -> m (Maybe FontLoader)-getFonts self-  = liftIO (nullableToMaybe <$> (js_getFonts (toDocument self)))---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onabort Mozilla Document.onabort documentation> -abort ::-      (IsDocument self, IsEventTarget self) => EventName self UIEvent-abort = unsafeEventName (toJSString "abort")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onblur Mozilla Document.onblur documentation> -blur ::-     (IsDocument self, IsEventTarget self) => EventName self FocusEvent-blur = unsafeEventName (toJSString "blur")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onchange Mozilla Document.onchange documentation> -change ::-       (IsDocument self, IsEventTarget self) => EventName self Event-change = unsafeEventName (toJSString "change")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onclick Mozilla Document.onclick documentation> -click ::-      (IsDocument self, IsEventTarget self) => EventName self MouseEvent-click = unsafeEventName (toJSString "click")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.oncontextmenu Mozilla Document.oncontextmenu documentation> -contextMenu ::-            (IsDocument self, IsEventTarget self) => EventName self MouseEvent-contextMenu = unsafeEventName (toJSString "contextmenu")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.ondblclick Mozilla Document.ondblclick documentation> -dblClick ::-         (IsDocument self, IsEventTarget self) => EventName self MouseEvent-dblClick = unsafeEventName (toJSString "dblclick")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.ondrag Mozilla Document.ondrag documentation> -drag ::-     (IsDocument self, IsEventTarget self) => EventName self MouseEvent-drag = unsafeEventName (toJSString "drag")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.ondragend Mozilla Document.ondragend documentation> -dragEnd ::-        (IsDocument self, IsEventTarget self) => EventName self MouseEvent-dragEnd = unsafeEventName (toJSString "dragend")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.ondragenter Mozilla Document.ondragenter documentation> -dragEnter ::-          (IsDocument self, IsEventTarget self) => EventName self MouseEvent-dragEnter = unsafeEventName (toJSString "dragenter")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.ondragleave Mozilla Document.ondragleave documentation> -dragLeave ::-          (IsDocument self, IsEventTarget self) => EventName self MouseEvent-dragLeave = unsafeEventName (toJSString "dragleave")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.ondragover Mozilla Document.ondragover documentation> -dragOver ::-         (IsDocument self, IsEventTarget self) => EventName self MouseEvent-dragOver = unsafeEventName (toJSString "dragover")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.ondragstart Mozilla Document.ondragstart documentation> -dragStart ::-          (IsDocument self, IsEventTarget self) => EventName self MouseEvent-dragStart = unsafeEventName (toJSString "dragstart")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.ondrop Mozilla Document.ondrop documentation> -drop ::-     (IsDocument self, IsEventTarget self) => EventName self MouseEvent-drop = unsafeEventName (toJSString "drop")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onerror Mozilla Document.onerror documentation> -error ::-      (IsDocument self, IsEventTarget self) => EventName self UIEvent-error = unsafeEventName (toJSString "error")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onfocus Mozilla Document.onfocus documentation> -focus ::-      (IsDocument self, IsEventTarget self) => EventName self FocusEvent-focus = unsafeEventName (toJSString "focus")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.oninput Mozilla Document.oninput documentation> -input ::-      (IsDocument self, IsEventTarget self) => EventName self Event-input = unsafeEventName (toJSString "input")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.oninvalid Mozilla Document.oninvalid documentation> -invalid ::-        (IsDocument self, IsEventTarget self) => EventName self Event-invalid = unsafeEventName (toJSString "invalid")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onkeydown Mozilla Document.onkeydown documentation> -keyDown ::-        (IsDocument self, IsEventTarget self) =>-          EventName self KeyboardEvent-keyDown = unsafeEventName (toJSString "keydown")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onkeypress Mozilla Document.onkeypress documentation> -keyPress ::-         (IsDocument self, IsEventTarget self) =>-           EventName self KeyboardEvent-keyPress = unsafeEventName (toJSString "keypress")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onkeyup Mozilla Document.onkeyup documentation> -keyUp ::-      (IsDocument self, IsEventTarget self) =>-        EventName self KeyboardEvent-keyUp = unsafeEventName (toJSString "keyup")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onload Mozilla Document.onload documentation> -load ::-     (IsDocument self, IsEventTarget self) => EventName self UIEvent-load = unsafeEventName (toJSString "load")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onmousedown Mozilla Document.onmousedown documentation> -mouseDown ::-          (IsDocument self, IsEventTarget self) => EventName self MouseEvent-mouseDown = unsafeEventName (toJSString "mousedown")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onmouseenter Mozilla Document.onmouseenter documentation> -mouseEnter ::-           (IsDocument self, IsEventTarget self) => EventName self MouseEvent-mouseEnter = unsafeEventName (toJSString "mouseenter")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onmouseleave Mozilla Document.onmouseleave documentation> -mouseLeave ::-           (IsDocument self, IsEventTarget self) => EventName self MouseEvent-mouseLeave = unsafeEventName (toJSString "mouseleave")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onmousemove Mozilla Document.onmousemove documentation> -mouseMove ::-          (IsDocument self, IsEventTarget self) => EventName self MouseEvent-mouseMove = unsafeEventName (toJSString "mousemove")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onmouseout Mozilla Document.onmouseout documentation> -mouseOut ::-         (IsDocument self, IsEventTarget self) => EventName self MouseEvent-mouseOut = unsafeEventName (toJSString "mouseout")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onmouseover Mozilla Document.onmouseover documentation> -mouseOver ::-          (IsDocument self, IsEventTarget self) => EventName self MouseEvent-mouseOver = unsafeEventName (toJSString "mouseover")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onmouseup Mozilla Document.onmouseup documentation> -mouseUp ::-        (IsDocument self, IsEventTarget self) => EventName self MouseEvent-mouseUp = unsafeEventName (toJSString "mouseup")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onmousewheel Mozilla Document.onmousewheel documentation> -mouseWheel ::-           (IsDocument self, IsEventTarget self) => EventName self MouseEvent-mouseWheel = unsafeEventName (toJSString "mousewheel")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onreadystatechange Mozilla Document.onreadystatechange documentation> -readyStateChange ::-                 (IsDocument self, IsEventTarget self) => EventName self Event-readyStateChange = unsafeEventName (toJSString "readystatechange")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onscroll Mozilla Document.onscroll documentation> -scroll ::-       (IsDocument self, IsEventTarget self) => EventName self UIEvent-scroll = unsafeEventName (toJSString "scroll")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onselect Mozilla Document.onselect documentation> -select ::-       (IsDocument self, IsEventTarget self) => EventName self UIEvent-select = unsafeEventName (toJSString "select")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onsubmit Mozilla Document.onsubmit documentation> -submit ::-       (IsDocument self, IsEventTarget self) => EventName self Event-submit = unsafeEventName (toJSString "submit")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onwheel Mozilla Document.onwheel documentation> -wheel ::-      (IsDocument self, IsEventTarget self) => EventName self WheelEvent-wheel = unsafeEventName (toJSString "wheel")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onbeforecut Mozilla Document.onbeforecut documentation> -beforeCut ::-          (IsDocument self, IsEventTarget self) => EventName self Event-beforeCut = unsafeEventName (toJSString "beforecut")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.oncut Mozilla Document.oncut documentation> -cut ::-    (IsDocument self, IsEventTarget self) => EventName self Event-cut = unsafeEventName (toJSString "cut")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onbeforecopy Mozilla Document.onbeforecopy documentation> -beforeCopy ::-           (IsDocument self, IsEventTarget self) => EventName self Event-beforeCopy = unsafeEventName (toJSString "beforecopy")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.oncopy Mozilla Document.oncopy documentation> -copy ::-     (IsDocument self, IsEventTarget self) => EventName self Event-copy = unsafeEventName (toJSString "copy")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onbeforepaste Mozilla Document.onbeforepaste documentation> -beforePaste ::-            (IsDocument self, IsEventTarget self) => EventName self Event-beforePaste = unsafeEventName (toJSString "beforepaste")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onpaste Mozilla Document.onpaste documentation> -paste ::-      (IsDocument self, IsEventTarget self) => EventName self Event-paste = unsafeEventName (toJSString "paste")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onreset Mozilla Document.onreset documentation> -reset ::-      (IsDocument self, IsEventTarget self) => EventName self Event-reset = unsafeEventName (toJSString "reset")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onsearch Mozilla Document.onsearch documentation> -search ::-       (IsDocument self, IsEventTarget self) => EventName self Event-search = unsafeEventName (toJSString "search")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onselectstart Mozilla Document.onselectstart documentation> -selectStart ::-            (IsDocument self, IsEventTarget self) => EventName self Event-selectStart = unsafeEventName (toJSString "selectstart")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onselectionchange Mozilla Document.onselectionchange documentation> -selectionchange ::-                (IsDocument self, IsEventTarget self) =>-                  EventName self onselectionchange-selectionchange = unsafeEventName (toJSString "selectionchange")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.ontouchstart Mozilla Document.ontouchstart documentation> -touchStart ::-           (IsDocument self, IsEventTarget self) => EventName self TouchEvent-touchStart = unsafeEventName (toJSString "touchstart")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.ontouchmove Mozilla Document.ontouchmove documentation> -touchMove ::-          (IsDocument self, IsEventTarget self) => EventName self TouchEvent-touchMove = unsafeEventName (toJSString "touchmove")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.ontouchend Mozilla Document.ontouchend documentation> -touchEnd ::-         (IsDocument self, IsEventTarget self) => EventName self TouchEvent-touchEnd = unsafeEventName (toJSString "touchend")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.ontouchcancel Mozilla Document.ontouchcancel documentation> -touchCancel ::-            (IsDocument self, IsEventTarget self) => EventName self TouchEvent-touchCancel = unsafeEventName (toJSString "touchcancel")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onwebkitfullscreenchange Mozilla Document.onwebkitfullscreenchange documentation> -webKitFullscreenChange ::-                       (IsDocument self, IsEventTarget self) => EventName self Event-webKitFullscreenChange-  = unsafeEventName (toJSString "webkitfullscreenchange")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onwebkitfullscreenerror Mozilla Document.onwebkitfullscreenerror documentation> -webKitFullscreenError ::-                      (IsDocument self, IsEventTarget self) => EventName self Event-webKitFullscreenError-  = unsafeEventName (toJSString "webkitfullscreenerror")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onpointerlockchange Mozilla Document.onpointerlockchange documentation> -pointerlockchange ::-                  (IsDocument self, IsEventTarget self) => EventName self Event-pointerlockchange-  = unsafeEventName (toJSString "pointerlockchange")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onpointerlockerror Mozilla Document.onpointerlockerror documentation> -pointerlockerror ::-                 (IsDocument self, IsEventTarget self) => EventName self Event-pointerlockerror = unsafeEventName (toJSString "pointerlockerror")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onsecuritypolicyviolation Mozilla Document.onsecuritypolicyviolation documentation> -securitypolicyviolation ::-                        (IsDocument self, IsEventTarget self) =>-                          EventName self onsecuritypolicyviolation-securitypolicyviolation-  = unsafeEventName (toJSString "securitypolicyviolation")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onwebkitwillrevealbottom Mozilla Document.onwebkitwillrevealbottom documentation> -webKitWillRevealBottom ::-                       (IsDocument self, IsEventTarget self) => EventName self Event-webKitWillRevealBottom-  = unsafeEventName (toJSString "webkitwillrevealbottom")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onwebkitwillrevealleft Mozilla Document.onwebkitwillrevealleft documentation> -webKitWillRevealLeft ::-                     (IsDocument self, IsEventTarget self) => EventName self Event-webKitWillRevealLeft-  = unsafeEventName (toJSString "webkitwillrevealleft")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onwebkitwillrevealright Mozilla Document.onwebkitwillrevealright documentation> -webKitWillRevealRight ::-                      (IsDocument self, IsEventTarget self) => EventName self Event-webKitWillRevealRight-  = unsafeEventName (toJSString "webkitwillrevealright")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onwebkitwillrevealtop Mozilla Document.onwebkitwillrevealtop documentation> -webKitWillRevealTop ::-                    (IsDocument self, IsEventTarget self) => EventName self Event-webKitWillRevealTop-  = unsafeEventName (toJSString "webkitwillrevealtop")- -foreign import javascript unsafe "$1[\"visibilityState\"]"-        js_getVisibilityState :: Document -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.visibilityState Mozilla Document.visibilityState documentation> -getVisibilityState ::-                   (MonadIO m, IsDocument self, FromJSString result) =>-                     self -> m result-getVisibilityState self-  = liftIO-      (fromJSString <$> (js_getVisibilityState (toDocument self)))- -foreign import javascript unsafe "($1[\"hidden\"] ? 1 : 0)"-        js_getHidden :: Document -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.hidden Mozilla Document.hidden documentation> -getHidden :: (MonadIO m, IsDocument self) => self -> m Bool-getHidden self = liftIO (js_getHidden (toDocument self))- -foreign import javascript unsafe "$1[\"securityPolicy\"]"-        js_getSecurityPolicy :: Document -> IO (Nullable SecurityPolicy)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.securityPolicy Mozilla Document.securityPolicy documentation> -getSecurityPolicy ::-                  (MonadIO m, IsDocument self) => self -> m (Maybe SecurityPolicy)-getSecurityPolicy self-  = liftIO-      (nullableToMaybe <$> (js_getSecurityPolicy (toDocument self)))- -foreign import javascript unsafe "$1[\"currentScript\"]"-        js_getCurrentScript :: Document -> IO (Nullable HTMLScriptElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.currentScript Mozilla Document.currentScript documentation> -getCurrentScript ::-                 (MonadIO m, IsDocument self) => self -> m (Maybe HTMLScriptElement)-getCurrentScript self-  = liftIO-      (nullableToMaybe <$> (js_getCurrentScript (toDocument self)))- -foreign import javascript unsafe "$1[\"origin\"]" js_getOrigin ::-        Document -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.origin Mozilla Document.origin documentation> -getOrigin ::-          (MonadIO m, IsDocument self, FromJSString result) =>-            self -> m result-getOrigin self-  = liftIO (fromJSString <$> (js_getOrigin (toDocument self)))

− src/GHCJS/DOM/JSFFI/Generated/DocumentFragment.hs

@@ -1,54 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.DocumentFragment-       (js_newDocumentFragment, newDocumentFragment, js_querySelector,-        querySelector, js_querySelectorAll, querySelectorAll,-        DocumentFragment, castToDocumentFragment, gTypeDocumentFragment)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe-        "new window[\"DocumentFragment\"]()" js_newDocumentFragment ::-        IO DocumentFragment---- | <https://developer.mozilla.org/en-US/docs/Web/API/DocumentFragment Mozilla DocumentFragment documentation> -newDocumentFragment :: (MonadIO m) => m DocumentFragment-newDocumentFragment = liftIO (js_newDocumentFragment)- -foreign import javascript unsafe "$1[\"querySelector\"]($2)"-        js_querySelector ::-        DocumentFragment -> JSString -> IO (Nullable Element)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DocumentFragment.querySelector Mozilla DocumentFragment.querySelector documentation> -querySelector ::-              (MonadIO m, ToJSString selectors) =>-                DocumentFragment -> selectors -> m (Maybe Element)-querySelector self selectors-  = liftIO-      (nullableToMaybe <$>-         (js_querySelector (self) (toJSString selectors)))- -foreign import javascript unsafe "$1[\"querySelectorAll\"]($2)"-        js_querySelectorAll ::-        DocumentFragment -> JSString -> IO (Nullable NodeList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DocumentFragment.querySelectorAll Mozilla DocumentFragment.querySelectorAll documentation> -querySelectorAll ::-                 (MonadIO m, ToJSString selectors) =>-                   DocumentFragment -> selectors -> m (Maybe NodeList)-querySelectorAll self selectors-  = liftIO-      (nullableToMaybe <$>-         (js_querySelectorAll (self) (toJSString selectors)))

− src/GHCJS/DOM/JSFFI/Generated/DocumentType.hs

@@ -1,77 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.DocumentType-       (js_getName, getName, js_getEntities, getEntities, js_getNotations,-        getNotations, js_getPublicId, getPublicId, js_getSystemId,-        getSystemId, js_getInternalSubset, getInternalSubset, DocumentType,-        castToDocumentType, gTypeDocumentType)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"name\"]" js_getName ::-        DocumentType -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/DocumentType.name Mozilla DocumentType.name documentation> -getName ::-        (MonadIO m, FromJSString result) => DocumentType -> m result-getName self = liftIO (fromJSString <$> (js_getName (self)))- -foreign import javascript unsafe "$1[\"entities\"]" js_getEntities-        :: DocumentType -> IO (Nullable NamedNodeMap)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DocumentType.entities Mozilla DocumentType.entities documentation> -getEntities ::-            (MonadIO m) => DocumentType -> m (Maybe NamedNodeMap)-getEntities self-  = liftIO (nullableToMaybe <$> (js_getEntities (self)))- -foreign import javascript unsafe "$1[\"notations\"]"-        js_getNotations :: DocumentType -> IO (Nullable NamedNodeMap)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DocumentType.notations Mozilla DocumentType.notations documentation> -getNotations ::-             (MonadIO m) => DocumentType -> m (Maybe NamedNodeMap)-getNotations self-  = liftIO (nullableToMaybe <$> (js_getNotations (self)))- -foreign import javascript unsafe "$1[\"publicId\"]" js_getPublicId-        :: DocumentType -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DocumentType.publicId Mozilla DocumentType.publicId documentation> -getPublicId ::-            (MonadIO m, FromJSString result) =>-              DocumentType -> m (Maybe result)-getPublicId self-  = liftIO (fromMaybeJSString <$> (js_getPublicId (self)))- -foreign import javascript unsafe "$1[\"systemId\"]" js_getSystemId-        :: DocumentType -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DocumentType.systemId Mozilla DocumentType.systemId documentation> -getSystemId ::-            (MonadIO m, FromJSString result) =>-              DocumentType -> m (Maybe result)-getSystemId self-  = liftIO (fromMaybeJSString <$> (js_getSystemId (self)))- -foreign import javascript unsafe "$1[\"internalSubset\"]"-        js_getInternalSubset :: DocumentType -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DocumentType.internalSubset Mozilla DocumentType.internalSubset documentation> -getInternalSubset ::-                  (MonadIO m, FromJSString result) =>-                    DocumentType -> m (Maybe result)-getInternalSubset self-  = liftIO (fromMaybeJSString <$> (js_getInternalSubset (self)))

− src/GHCJS/DOM/JSFFI/Generated/DynamicsCompressorNode.hs

@@ -1,74 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.DynamicsCompressorNode-       (js_getThreshold, getThreshold, js_getKnee, getKnee, js_getRatio,-        getRatio, js_getReduction, getReduction, js_getAttack, getAttack,-        js_getRelease, getRelease, DynamicsCompressorNode,-        castToDynamicsCompressorNode, gTypeDynamicsCompressorNode)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"threshold\"]"-        js_getThreshold ::-        DynamicsCompressorNode -> IO (Nullable AudioParam)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DynamicsCompressorNode.threshold Mozilla DynamicsCompressorNode.threshold documentation> -getThreshold ::-             (MonadIO m) => DynamicsCompressorNode -> m (Maybe AudioParam)-getThreshold self-  = liftIO (nullableToMaybe <$> (js_getThreshold (self)))- -foreign import javascript unsafe "$1[\"knee\"]" js_getKnee ::-        DynamicsCompressorNode -> IO (Nullable AudioParam)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DynamicsCompressorNode.knee Mozilla DynamicsCompressorNode.knee documentation> -getKnee ::-        (MonadIO m) => DynamicsCompressorNode -> m (Maybe AudioParam)-getKnee self = liftIO (nullableToMaybe <$> (js_getKnee (self)))- -foreign import javascript unsafe "$1[\"ratio\"]" js_getRatio ::-        DynamicsCompressorNode -> IO (Nullable AudioParam)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DynamicsCompressorNode.ratio Mozilla DynamicsCompressorNode.ratio documentation> -getRatio ::-         (MonadIO m) => DynamicsCompressorNode -> m (Maybe AudioParam)-getRatio self = liftIO (nullableToMaybe <$> (js_getRatio (self)))- -foreign import javascript unsafe "$1[\"reduction\"]"-        js_getReduction ::-        DynamicsCompressorNode -> IO (Nullable AudioParam)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DynamicsCompressorNode.reduction Mozilla DynamicsCompressorNode.reduction documentation> -getReduction ::-             (MonadIO m) => DynamicsCompressorNode -> m (Maybe AudioParam)-getReduction self-  = liftIO (nullableToMaybe <$> (js_getReduction (self)))- -foreign import javascript unsafe "$1[\"attack\"]" js_getAttack ::-        DynamicsCompressorNode -> IO (Nullable AudioParam)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DynamicsCompressorNode.attack Mozilla DynamicsCompressorNode.attack documentation> -getAttack ::-          (MonadIO m) => DynamicsCompressorNode -> m (Maybe AudioParam)-getAttack self = liftIO (nullableToMaybe <$> (js_getAttack (self)))- -foreign import javascript unsafe "$1[\"release\"]" js_getRelease ::-        DynamicsCompressorNode -> IO (Nullable AudioParam)---- | <https://developer.mozilla.org/en-US/docs/Web/API/DynamicsCompressorNode.release Mozilla DynamicsCompressorNode.release documentation> -getRelease ::-           (MonadIO m) => DynamicsCompressorNode -> m (Maybe AudioParam)-getRelease self-  = liftIO (nullableToMaybe <$> (js_getRelease (self)))

− src/GHCJS/DOM/JSFFI/Generated/EXTBlendMinMax.hs

@@ -1,21 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.EXTBlendMinMax-       (pattern MIN_EXT, pattern MAX_EXT, EXTBlendMinMax,-        castToEXTBlendMinMax, gTypeEXTBlendMinMax)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums-pattern MIN_EXT = 32775-pattern MAX_EXT = 32776

− src/GHCJS/DOM/JSFFI/Generated/EXTTextureFilterAnisotropic.hs

@@ -1,23 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.EXTTextureFilterAnisotropic-       (pattern TEXTURE_MAX_ANISOTROPY_EXT,-        pattern MAX_TEXTURE_MAX_ANISOTROPY_EXT,-        EXTTextureFilterAnisotropic, castToEXTTextureFilterAnisotropic,-        gTypeEXTTextureFilterAnisotropic)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums-pattern TEXTURE_MAX_ANISOTROPY_EXT = 34046-pattern MAX_TEXTURE_MAX_ANISOTROPY_EXT = 34047

− src/GHCJS/DOM/JSFFI/Generated/EXTsRGB.hs

@@ -1,25 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.EXTsRGB-       (pattern SRGB_EXT, pattern SRGB_ALPHA_EXT,-        pattern SRGB8_ALPHA8_EXT,-        pattern FRAMEBUFFER_ATTACHMENT_COLOR_ENCODING_EXT, EXTsRGB,-        castToEXTsRGB, gTypeEXTsRGB)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums-pattern SRGB_EXT = 35904-pattern SRGB_ALPHA_EXT = 35906-pattern SRGB8_ALPHA8_EXT = 35907-pattern FRAMEBUFFER_ATTACHMENT_COLOR_ENCODING_EXT = 33296

− src/GHCJS/DOM/JSFFI/Generated/Element.hs

@@ -1,1045 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.Element-       (js_getAttribute, getAttribute, js_setAttribute, setAttribute,-        js_removeAttribute, removeAttribute, js_getAttributeNode,-        getAttributeNode, js_setAttributeNode, setAttributeNode,-        js_removeAttributeNode, removeAttributeNode,-        js_getElementsByTagName, getElementsByTagName, js_hasAttributes,-        hasAttributes, js_getAttributeNS, getAttributeNS,-        js_setAttributeNS, setAttributeNS, js_removeAttributeNS,-        removeAttributeNS, js_getElementsByTagNameNS,-        getElementsByTagNameNS, js_getAttributeNodeNS, getAttributeNodeNS,-        js_setAttributeNodeNS, setAttributeNodeNS, js_hasAttribute,-        hasAttribute, js_hasAttributeNS, hasAttributeNS, js_focus, focus,-        js_blur, blur, js_scrollIntoView, scrollIntoView,-        js_scrollIntoViewIfNeeded, scrollIntoViewIfNeeded,-        js_scrollByLines, scrollByLines, js_scrollByPages, scrollByPages,-        js_getElementsByClassName, getElementsByClassName,-        js_querySelector, querySelector, js_querySelectorAll,-        querySelectorAll, js_matches, matches, js_closest, closest,-        js_webkitMatchesSelector, webkitMatchesSelector, js_getClientRects,-        getClientRects, js_getBoundingClientRect, getBoundingClientRect,-        js_webkitRequestFullScreen, webkitRequestFullScreen,-        js_webkitRequestFullscreen, webkitRequestFullscreen,-        js_requestPointerLock, requestPointerLock,-        js_webkitGetRegionFlowRanges, webkitGetRegionFlowRanges,-        pattern ALLOW_KEYBOARD_INPUT, js_getTagName, getTagName,-        js_getAttributes, getAttributes, js_getStyle, getStyle, js_setId,-        setId, js_getId, getId, js_getOffsetLeft, getOffsetLeft,-        js_getOffsetTop, getOffsetTop, js_getOffsetWidth, getOffsetWidth,-        js_getOffsetHeight, getOffsetHeight, js_getClientLeft,-        getClientLeft, js_getClientTop, getClientTop, js_getClientWidth,-        getClientWidth, js_getClientHeight, getClientHeight,-        js_setScrollLeft, setScrollLeft, js_getScrollLeft, getScrollLeft,-        js_setScrollTop, setScrollTop, js_getScrollTop, getScrollTop,-        js_getScrollWidth, getScrollWidth, js_getScrollHeight,-        getScrollHeight, js_getOffsetParent, getOffsetParent,-        js_setInnerHTML, setInnerHTML, js_getInnerHTML, getInnerHTML,-        js_setOuterHTML, setOuterHTML, js_getOuterHTML, getOuterHTML,-        js_setClassName, setClassName, js_getClassName, getClassName,-        js_getClassList, getClassList, js_getDataset, getDataset,-        js_getFirstElementChild, getFirstElementChild,-        js_getLastElementChild, getLastElementChild,-        js_getPreviousElementSibling, getPreviousElementSibling,-        js_getNextElementSibling, getNextElementSibling,-        js_getChildElementCount, getChildElementCount, js_setUiactions,-        setUiactions, js_getUiactions, getUiactions,-        js_getWebkitRegionOverset, getWebkitRegionOverset, abort,-        blurEvent, change, click, contextMenu, dblClick, drag, dragEnd,-        dragEnter, dragLeave, dragOver, dragStart, drop, error, focusEvent,-        input, invalid, keyDown, keyPress, keyUp, load, mouseDown,-        mouseEnter, mouseLeave, mouseMove, mouseOut, mouseOver, mouseUp,-        mouseWheel, scroll, select, submit, wheel, beforeCut, cut,-        beforeCopy, copy, beforePaste, paste, reset, search, selectStart,-        touchStart, touchMove, touchEnd, touchCancel,-        webKitFullscreenChange, webKitFullscreenError,-        webKitWillRevealBottom, webKitWillRevealLeft,-        webKitWillRevealRight, webKitWillRevealTop, Element, castToElement,-        gTypeElement, IsElement, toElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"getAttribute\"]($2)"-        js_getAttribute :: Element -> JSString -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.getAttribute Mozilla Element.getAttribute documentation> -getAttribute ::-             (MonadIO m, IsElement self, ToJSString name,-              FromJSString result) =>-               self -> name -> m (Maybe result)-getAttribute self name-  = liftIO-      (fromMaybeJSString <$>-         (js_getAttribute (toElement self) (toJSString name)))- -foreign import javascript unsafe "$1[\"setAttribute\"]($2, $3)"-        js_setAttribute :: Element -> JSString -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.setAttribute Mozilla Element.setAttribute documentation> -setAttribute ::-             (MonadIO m, IsElement self, ToJSString name, ToJSString value) =>-               self -> name -> value -> m ()-setAttribute self name value-  = liftIO-      (js_setAttribute (toElement self) (toJSString name)-         (toJSString value))- -foreign import javascript unsafe "$1[\"removeAttribute\"]($2)"-        js_removeAttribute :: Element -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.removeAttribute Mozilla Element.removeAttribute documentation> -removeAttribute ::-                (MonadIO m, IsElement self, ToJSString name) =>-                  self -> name -> m ()-removeAttribute self name-  = liftIO (js_removeAttribute (toElement self) (toJSString name))- -foreign import javascript unsafe "$1[\"getAttributeNode\"]($2)"-        js_getAttributeNode :: Element -> JSString -> IO (Nullable Attr)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.getAttributeNode Mozilla Element.getAttributeNode documentation> -getAttributeNode ::-                 (MonadIO m, IsElement self, ToJSString name) =>-                   self -> name -> m (Maybe Attr)-getAttributeNode self name-  = liftIO-      (nullableToMaybe <$>-         (js_getAttributeNode (toElement self) (toJSString name)))- -foreign import javascript unsafe "$1[\"setAttributeNode\"]($2)"-        js_setAttributeNode ::-        Element -> Nullable Attr -> IO (Nullable Attr)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.setAttributeNode Mozilla Element.setAttributeNode documentation> -setAttributeNode ::-                 (MonadIO m, IsElement self) => self -> Maybe Attr -> m (Maybe Attr)-setAttributeNode self newAttr-  = liftIO-      (nullableToMaybe <$>-         (js_setAttributeNode (toElement self) (maybeToNullable newAttr)))- -foreign import javascript unsafe "$1[\"removeAttributeNode\"]($2)"-        js_removeAttributeNode ::-        Element -> Nullable Attr -> IO (Nullable Attr)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.removeAttributeNode Mozilla Element.removeAttributeNode documentation> -removeAttributeNode ::-                    (MonadIO m, IsElement self) => self -> Maybe Attr -> m (Maybe Attr)-removeAttributeNode self oldAttr-  = liftIO-      (nullableToMaybe <$>-         (js_removeAttributeNode (toElement self)-            (maybeToNullable oldAttr)))- -foreign import javascript unsafe "$1[\"getElementsByTagName\"]($2)"-        js_getElementsByTagName ::-        Element -> JSString -> IO (Nullable NodeList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.getElementsByTagName Mozilla Element.getElementsByTagName documentation> -getElementsByTagName ::-                     (MonadIO m, IsElement self, ToJSString name) =>-                       self -> name -> m (Maybe NodeList)-getElementsByTagName self name-  = liftIO-      (nullableToMaybe <$>-         (js_getElementsByTagName (toElement self) (toJSString name)))- -foreign import javascript unsafe-        "($1[\"hasAttributes\"]() ? 1 : 0)" js_hasAttributes ::-        Element -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.hasAttributes Mozilla Element.hasAttributes documentation> -hasAttributes :: (MonadIO m, IsElement self) => self -> m Bool-hasAttributes self = liftIO (js_hasAttributes (toElement self))- -foreign import javascript unsafe "$1[\"getAttributeNS\"]($2, $3)"-        js_getAttributeNS ::-        Element -> Nullable JSString -> JSString -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.getAttributeNS Mozilla Element.getAttributeNS documentation> -getAttributeNS ::-               (MonadIO m, IsElement self, ToJSString namespaceURI,-                ToJSString localName, FromJSString result) =>-                 self -> Maybe namespaceURI -> localName -> m result-getAttributeNS self namespaceURI localName-  = liftIO-      (fromJSString <$>-         (js_getAttributeNS (toElement self) (toMaybeJSString namespaceURI)-            (toJSString localName)))- -foreign import javascript unsafe-        "$1[\"setAttributeNS\"]($2, $3, $4)" js_setAttributeNS ::-        Element -> Nullable JSString -> JSString -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.setAttributeNS Mozilla Element.setAttributeNS documentation> -setAttributeNS ::-               (MonadIO m, IsElement self, ToJSString namespaceURI,-                ToJSString qualifiedName, ToJSString value) =>-                 self -> Maybe namespaceURI -> qualifiedName -> value -> m ()-setAttributeNS self namespaceURI qualifiedName value-  = liftIO-      (js_setAttributeNS (toElement self) (toMaybeJSString namespaceURI)-         (toJSString qualifiedName)-         (toJSString value))- -foreign import javascript unsafe-        "$1[\"removeAttributeNS\"]($2, $3)" js_removeAttributeNS ::-        Element -> Nullable JSString -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.removeAttributeNS Mozilla Element.removeAttributeNS documentation> -removeAttributeNS ::-                  (MonadIO m, IsElement self, ToJSString namespaceURI,-                   ToJSString localName) =>-                    self -> Maybe namespaceURI -> localName -> m ()-removeAttributeNS self namespaceURI localName-  = liftIO-      (js_removeAttributeNS (toElement self)-         (toMaybeJSString namespaceURI)-         (toJSString localName))- -foreign import javascript unsafe-        "$1[\"getElementsByTagNameNS\"]($2,\n$3)" js_getElementsByTagNameNS-        ::-        Element -> Nullable JSString -> JSString -> IO (Nullable NodeList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.getElementsByTagNameNS Mozilla Element.getElementsByTagNameNS documentation> -getElementsByTagNameNS ::-                       (MonadIO m, IsElement self, ToJSString namespaceURI,-                        ToJSString localName) =>-                         self -> Maybe namespaceURI -> localName -> m (Maybe NodeList)-getElementsByTagNameNS self namespaceURI localName-  = liftIO-      (nullableToMaybe <$>-         (js_getElementsByTagNameNS (toElement self)-            (toMaybeJSString namespaceURI)-            (toJSString localName)))- -foreign import javascript unsafe-        "$1[\"getAttributeNodeNS\"]($2, $3)" js_getAttributeNodeNS ::-        Element -> Nullable JSString -> JSString -> IO (Nullable Attr)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.getAttributeNodeNS Mozilla Element.getAttributeNodeNS documentation> -getAttributeNodeNS ::-                   (MonadIO m, IsElement self, ToJSString namespaceURI,-                    ToJSString localName) =>-                     self -> Maybe namespaceURI -> localName -> m (Maybe Attr)-getAttributeNodeNS self namespaceURI localName-  = liftIO-      (nullableToMaybe <$>-         (js_getAttributeNodeNS (toElement self)-            (toMaybeJSString namespaceURI)-            (toJSString localName)))- -foreign import javascript unsafe "$1[\"setAttributeNodeNS\"]($2)"-        js_setAttributeNodeNS ::-        Element -> Nullable Attr -> IO (Nullable Attr)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.setAttributeNodeNS Mozilla Element.setAttributeNodeNS documentation> -setAttributeNodeNS ::-                   (MonadIO m, IsElement self) => self -> Maybe Attr -> m (Maybe Attr)-setAttributeNodeNS self newAttr-  = liftIO-      (nullableToMaybe <$>-         (js_setAttributeNodeNS (toElement self) (maybeToNullable newAttr)))- -foreign import javascript unsafe-        "($1[\"hasAttribute\"]($2) ? 1 : 0)" js_hasAttribute ::-        Element -> JSString -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.hasAttribute Mozilla Element.hasAttribute documentation> -hasAttribute ::-             (MonadIO m, IsElement self, ToJSString name) =>-               self -> name -> m Bool-hasAttribute self name-  = liftIO (js_hasAttribute (toElement self) (toJSString name))- -foreign import javascript unsafe-        "($1[\"hasAttributeNS\"]($2,\n$3) ? 1 : 0)" js_hasAttributeNS ::-        Element -> Nullable JSString -> JSString -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.hasAttributeNS Mozilla Element.hasAttributeNS documentation> -hasAttributeNS ::-               (MonadIO m, IsElement self, ToJSString namespaceURI,-                ToJSString localName) =>-                 self -> Maybe namespaceURI -> localName -> m Bool-hasAttributeNS self namespaceURI localName-  = liftIO-      (js_hasAttributeNS (toElement self) (toMaybeJSString namespaceURI)-         (toJSString localName))- -foreign import javascript unsafe "$1[\"focus\"]()" js_focus ::-        Element -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.focus Mozilla Element.focus documentation> -focus :: (MonadIO m, IsElement self) => self -> m ()-focus self = liftIO (js_focus (toElement self))- -foreign import javascript unsafe "$1[\"blur\"]()" js_blur ::-        Element -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.blur Mozilla Element.blur documentation> -blur :: (MonadIO m, IsElement self) => self -> m ()-blur self = liftIO (js_blur (toElement self))- -foreign import javascript unsafe "$1[\"scrollIntoView\"]($2)"-        js_scrollIntoView :: Element -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.scrollIntoView Mozilla Element.scrollIntoView documentation> -scrollIntoView ::-               (MonadIO m, IsElement self) => self -> Bool -> m ()-scrollIntoView self alignWithTop-  = liftIO (js_scrollIntoView (toElement self) alignWithTop)- -foreign import javascript unsafe-        "$1[\"scrollIntoViewIfNeeded\"]($2)" js_scrollIntoViewIfNeeded ::-        Element -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.scrollIntoViewIfNeeded Mozilla Element.scrollIntoViewIfNeeded documentation> -scrollIntoViewIfNeeded ::-                       (MonadIO m, IsElement self) => self -> Bool -> m ()-scrollIntoViewIfNeeded self centerIfNeeded-  = liftIO-      (js_scrollIntoViewIfNeeded (toElement self) centerIfNeeded)- -foreign import javascript unsafe "$1[\"scrollByLines\"]($2)"-        js_scrollByLines :: Element -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.scrollByLines Mozilla Element.scrollByLines documentation> -scrollByLines :: (MonadIO m, IsElement self) => self -> Int -> m ()-scrollByLines self lines-  = liftIO (js_scrollByLines (toElement self) lines)- -foreign import javascript unsafe "$1[\"scrollByPages\"]($2)"-        js_scrollByPages :: Element -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.scrollByPages Mozilla Element.scrollByPages documentation> -scrollByPages :: (MonadIO m, IsElement self) => self -> Int -> m ()-scrollByPages self pages-  = liftIO (js_scrollByPages (toElement self) pages)- -foreign import javascript unsafe-        "$1[\"getElementsByClassName\"]($2)" js_getElementsByClassName ::-        Element -> JSString -> IO (Nullable NodeList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.getElementsByClassName Mozilla Element.getElementsByClassName documentation> -getElementsByClassName ::-                       (MonadIO m, IsElement self, ToJSString name) =>-                         self -> name -> m (Maybe NodeList)-getElementsByClassName self name-  = liftIO-      (nullableToMaybe <$>-         (js_getElementsByClassName (toElement self) (toJSString name)))- -foreign import javascript unsafe "$1[\"querySelector\"]($2)"-        js_querySelector :: Element -> JSString -> IO (Nullable Element)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.querySelector Mozilla Element.querySelector documentation> -querySelector ::-              (MonadIO m, IsElement self, ToJSString selectors) =>-                self -> selectors -> m (Maybe Element)-querySelector self selectors-  = liftIO-      (nullableToMaybe <$>-         (js_querySelector (toElement self) (toJSString selectors)))- -foreign import javascript unsafe "$1[\"querySelectorAll\"]($2)"-        js_querySelectorAll ::-        Element -> JSString -> IO (Nullable NodeList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.querySelectorAll Mozilla Element.querySelectorAll documentation> -querySelectorAll ::-                 (MonadIO m, IsElement self, ToJSString selectors) =>-                   self -> selectors -> m (Maybe NodeList)-querySelectorAll self selectors-  = liftIO-      (nullableToMaybe <$>-         (js_querySelectorAll (toElement self) (toJSString selectors)))- -foreign import javascript unsafe "($1[\"matches\"]($2) ? 1 : 0)"-        js_matches :: Element -> JSString -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.matches Mozilla Element.matches documentation> -matches ::-        (MonadIO m, IsElement self, ToJSString selectors) =>-          self -> selectors -> m Bool-matches self selectors-  = liftIO (js_matches (toElement self) (toJSString selectors))- -foreign import javascript unsafe "$1[\"closest\"]($2)" js_closest-        :: Element -> JSString -> IO (Nullable Element)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.closest Mozilla Element.closest documentation> -closest ::-        (MonadIO m, IsElement self, ToJSString selectors) =>-          self -> selectors -> m (Maybe Element)-closest self selectors-  = liftIO-      (nullableToMaybe <$>-         (js_closest (toElement self) (toJSString selectors)))- -foreign import javascript unsafe-        "($1[\"webkitMatchesSelector\"]($2) ? 1 : 0)"-        js_webkitMatchesSelector :: Element -> JSString -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.webkitMatchesSelector Mozilla Element.webkitMatchesSelector documentation> -webkitMatchesSelector ::-                      (MonadIO m, IsElement self, ToJSString selectors) =>-                        self -> selectors -> m Bool-webkitMatchesSelector self selectors-  = liftIO-      (js_webkitMatchesSelector (toElement self) (toJSString selectors))- -foreign import javascript unsafe "$1[\"getClientRects\"]()"-        js_getClientRects :: Element -> IO (Nullable ClientRectList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.getClientRects Mozilla Element.getClientRects documentation> -getClientRects ::-               (MonadIO m, IsElement self) => self -> m (Maybe ClientRectList)-getClientRects self-  = liftIO (nullableToMaybe <$> (js_getClientRects (toElement self)))- -foreign import javascript unsafe "$1[\"getBoundingClientRect\"]()"-        js_getBoundingClientRect :: Element -> IO (Nullable ClientRect)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.getBoundingClientRect Mozilla Element.getBoundingClientRect documentation> -getBoundingClientRect ::-                      (MonadIO m, IsElement self) => self -> m (Maybe ClientRect)-getBoundingClientRect self-  = liftIO-      (nullableToMaybe <$> (js_getBoundingClientRect (toElement self)))- -foreign import javascript unsafe-        "$1[\"webkitRequestFullScreen\"]($2)" js_webkitRequestFullScreen ::-        Element -> Word -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.webkitRequestFullScreen Mozilla Element.webkitRequestFullScreen documentation> -webkitRequestFullScreen ::-                        (MonadIO m, IsElement self) => self -> Word -> m ()-webkitRequestFullScreen self flags-  = liftIO (js_webkitRequestFullScreen (toElement self) flags)- -foreign import javascript unsafe-        "$1[\"webkitRequestFullscreen\"]()" js_webkitRequestFullscreen ::-        Element -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.webkitRequestFullscreen Mozilla Element.webkitRequestFullscreen documentation> -webkitRequestFullscreen ::-                        (MonadIO m, IsElement self) => self -> m ()-webkitRequestFullscreen self-  = liftIO (js_webkitRequestFullscreen (toElement self))- -foreign import javascript unsafe "$1[\"requestPointerLock\"]()"-        js_requestPointerLock :: Element -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.requestPointerLock Mozilla Element.requestPointerLock documentation> -requestPointerLock :: (MonadIO m, IsElement self) => self -> m ()-requestPointerLock self-  = liftIO (js_requestPointerLock (toElement self))- -foreign import javascript unsafe-        "$1[\"webkitGetRegionFlowRanges\"]()" js_webkitGetRegionFlowRanges-        :: Element -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.webkitGetRegionFlowRanges Mozilla Element.webkitGetRegionFlowRanges documentation> -webkitGetRegionFlowRanges ::-                          (MonadIO m, IsElement self) => self -> m [Maybe Range]-webkitGetRegionFlowRanges self-  = liftIO-      ((js_webkitGetRegionFlowRanges (toElement self)) >>=-         fromJSValUnchecked)-pattern ALLOW_KEYBOARD_INPUT = 1- -foreign import javascript unsafe "$1[\"tagName\"]" js_getTagName ::-        Element -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.tagName Mozilla Element.tagName documentation> -getTagName ::-           (MonadIO m, IsElement self, FromJSString result) =>-             self -> m (Maybe result)-getTagName self-  = liftIO (fromMaybeJSString <$> (js_getTagName (toElement self)))- -foreign import javascript unsafe "$1[\"attributes\"]"-        js_getAttributes :: Element -> IO (Nullable NamedNodeMap)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.attributes Mozilla Element.attributes documentation> -getAttributes ::-              (MonadIO m, IsElement self) => self -> m (Maybe NamedNodeMap)-getAttributes self-  = liftIO (nullableToMaybe <$> (js_getAttributes (toElement self)))- -foreign import javascript unsafe "$1[\"style\"]" js_getStyle ::-        Element -> IO (Nullable CSSStyleDeclaration)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.style Mozilla Element.style documentation> -getStyle ::-         (MonadIO m, IsElement self) =>-           self -> m (Maybe CSSStyleDeclaration)-getStyle self-  = liftIO (nullableToMaybe <$> (js_getStyle (toElement self)))- -foreign import javascript unsafe "$1[\"id\"] = $2;" js_setId ::-        Element -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.id Mozilla Element.id documentation> -setId ::-      (MonadIO m, IsElement self, ToJSString val) => self -> val -> m ()-setId self val-  = liftIO (js_setId (toElement self) (toJSString val))- -foreign import javascript unsafe "$1[\"id\"]" js_getId ::-        Element -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.id Mozilla Element.id documentation> -getId ::-      (MonadIO m, IsElement self, FromJSString result) =>-        self -> m result-getId self = liftIO (fromJSString <$> (js_getId (toElement self)))- -foreign import javascript unsafe "$1[\"offsetLeft\"]"-        js_getOffsetLeft :: Element -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.offsetLeft Mozilla Element.offsetLeft documentation> -getOffsetLeft :: (MonadIO m, IsElement self) => self -> m Double-getOffsetLeft self = liftIO (js_getOffsetLeft (toElement self))- -foreign import javascript unsafe "$1[\"offsetTop\"]"-        js_getOffsetTop :: Element -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.offsetTop Mozilla Element.offsetTop documentation> -getOffsetTop :: (MonadIO m, IsElement self) => self -> m Double-getOffsetTop self = liftIO (js_getOffsetTop (toElement self))- -foreign import javascript unsafe "$1[\"offsetWidth\"]"-        js_getOffsetWidth :: Element -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.offsetWidth Mozilla Element.offsetWidth documentation> -getOffsetWidth :: (MonadIO m, IsElement self) => self -> m Double-getOffsetWidth self = liftIO (js_getOffsetWidth (toElement self))- -foreign import javascript unsafe "$1[\"offsetHeight\"]"-        js_getOffsetHeight :: Element -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.offsetHeight Mozilla Element.offsetHeight documentation> -getOffsetHeight :: (MonadIO m, IsElement self) => self -> m Double-getOffsetHeight self = liftIO (js_getOffsetHeight (toElement self))- -foreign import javascript unsafe "$1[\"clientLeft\"]"-        js_getClientLeft :: Element -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.clientLeft Mozilla Element.clientLeft documentation> -getClientLeft :: (MonadIO m, IsElement self) => self -> m Double-getClientLeft self = liftIO (js_getClientLeft (toElement self))- -foreign import javascript unsafe "$1[\"clientTop\"]"-        js_getClientTop :: Element -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.clientTop Mozilla Element.clientTop documentation> -getClientTop :: (MonadIO m, IsElement self) => self -> m Double-getClientTop self = liftIO (js_getClientTop (toElement self))- -foreign import javascript unsafe "$1[\"clientWidth\"]"-        js_getClientWidth :: Element -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.clientWidth Mozilla Element.clientWidth documentation> -getClientWidth :: (MonadIO m, IsElement self) => self -> m Double-getClientWidth self = liftIO (js_getClientWidth (toElement self))- -foreign import javascript unsafe "$1[\"clientHeight\"]"-        js_getClientHeight :: Element -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.clientHeight Mozilla Element.clientHeight documentation> -getClientHeight :: (MonadIO m, IsElement self) => self -> m Double-getClientHeight self = liftIO (js_getClientHeight (toElement self))- -foreign import javascript unsafe "$1[\"scrollLeft\"] = $2;"-        js_setScrollLeft :: Element -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.scrollLeft Mozilla Element.scrollLeft documentation> -setScrollLeft :: (MonadIO m, IsElement self) => self -> Int -> m ()-setScrollLeft self val-  = liftIO (js_setScrollLeft (toElement self) val)- -foreign import javascript unsafe "$1[\"scrollLeft\"]"-        js_getScrollLeft :: Element -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.scrollLeft Mozilla Element.scrollLeft documentation> -getScrollLeft :: (MonadIO m, IsElement self) => self -> m Int-getScrollLeft self = liftIO (js_getScrollLeft (toElement self))- -foreign import javascript unsafe "$1[\"scrollTop\"] = $2;"-        js_setScrollTop :: Element -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.scrollTop Mozilla Element.scrollTop documentation> -setScrollTop :: (MonadIO m, IsElement self) => self -> Int -> m ()-setScrollTop self val-  = liftIO (js_setScrollTop (toElement self) val)- -foreign import javascript unsafe "$1[\"scrollTop\"]"-        js_getScrollTop :: Element -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.scrollTop Mozilla Element.scrollTop documentation> -getScrollTop :: (MonadIO m, IsElement self) => self -> m Int-getScrollTop self = liftIO (js_getScrollTop (toElement self))- -foreign import javascript unsafe "$1[\"scrollWidth\"]"-        js_getScrollWidth :: Element -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.scrollWidth Mozilla Element.scrollWidth documentation> -getScrollWidth :: (MonadIO m, IsElement self) => self -> m Int-getScrollWidth self = liftIO (js_getScrollWidth (toElement self))- -foreign import javascript unsafe "$1[\"scrollHeight\"]"-        js_getScrollHeight :: Element -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.scrollHeight Mozilla Element.scrollHeight documentation> -getScrollHeight :: (MonadIO m, IsElement self) => self -> m Int-getScrollHeight self = liftIO (js_getScrollHeight (toElement self))- -foreign import javascript unsafe "$1[\"offsetParent\"]"-        js_getOffsetParent :: Element -> IO (Nullable Element)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.offsetParent Mozilla Element.offsetParent documentation> -getOffsetParent ::-                (MonadIO m, IsElement self) => self -> m (Maybe Element)-getOffsetParent self-  = liftIO-      (nullableToMaybe <$> (js_getOffsetParent (toElement self)))- -foreign import javascript unsafe "$1[\"innerHTML\"] = $2;"-        js_setInnerHTML :: Element -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.innerHTML Mozilla Element.innerHTML documentation> -setInnerHTML ::-             (MonadIO m, IsElement self, ToJSString val) =>-               self -> Maybe val -> m ()-setInnerHTML self val-  = liftIO (js_setInnerHTML (toElement self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"innerHTML\"]"-        js_getInnerHTML :: Element -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.innerHTML Mozilla Element.innerHTML documentation> -getInnerHTML ::-             (MonadIO m, IsElement self, FromJSString result) =>-               self -> m (Maybe result)-getInnerHTML self-  = liftIO (fromMaybeJSString <$> (js_getInnerHTML (toElement self)))- -foreign import javascript unsafe "$1[\"outerHTML\"] = $2;"-        js_setOuterHTML :: Element -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.outerHTML Mozilla Element.outerHTML documentation> -setOuterHTML ::-             (MonadIO m, IsElement self, ToJSString val) =>-               self -> Maybe val -> m ()-setOuterHTML self val-  = liftIO (js_setOuterHTML (toElement self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"outerHTML\"]"-        js_getOuterHTML :: Element -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.outerHTML Mozilla Element.outerHTML documentation> -getOuterHTML ::-             (MonadIO m, IsElement self, FromJSString result) =>-               self -> m (Maybe result)-getOuterHTML self-  = liftIO (fromMaybeJSString <$> (js_getOuterHTML (toElement self)))- -foreign import javascript unsafe "$1[\"className\"] = $2;"-        js_setClassName :: Element -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.className Mozilla Element.className documentation> -setClassName ::-             (MonadIO m, IsElement self, ToJSString val) => self -> val -> m ()-setClassName self val-  = liftIO (js_setClassName (toElement self) (toJSString val))- -foreign import javascript unsafe "$1[\"className\"]"-        js_getClassName :: Element -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.className Mozilla Element.className documentation> -getClassName ::-             (MonadIO m, IsElement self, FromJSString result) =>-               self -> m result-getClassName self-  = liftIO (fromJSString <$> (js_getClassName (toElement self)))- -foreign import javascript unsafe "$1[\"classList\"]"-        js_getClassList :: Element -> IO (Nullable DOMTokenList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.classList Mozilla Element.classList documentation> -getClassList ::-             (MonadIO m, IsElement self) => self -> m (Maybe DOMTokenList)-getClassList self-  = liftIO (nullableToMaybe <$> (js_getClassList (toElement self)))- -foreign import javascript unsafe "$1[\"dataset\"]" js_getDataset ::-        Element -> IO (Nullable DOMStringMap)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.dataset Mozilla Element.dataset documentation> -getDataset ::-           (MonadIO m, IsElement self) => self -> m (Maybe DOMStringMap)-getDataset self-  = liftIO (nullableToMaybe <$> (js_getDataset (toElement self)))- -foreign import javascript unsafe "$1[\"firstElementChild\"]"-        js_getFirstElementChild :: Element -> IO (Nullable Element)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.firstElementChild Mozilla Element.firstElementChild documentation> -getFirstElementChild ::-                     (MonadIO m, IsElement self) => self -> m (Maybe Element)-getFirstElementChild self-  = liftIO-      (nullableToMaybe <$> (js_getFirstElementChild (toElement self)))- -foreign import javascript unsafe "$1[\"lastElementChild\"]"-        js_getLastElementChild :: Element -> IO (Nullable Element)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.lastElementChild Mozilla Element.lastElementChild documentation> -getLastElementChild ::-                    (MonadIO m, IsElement self) => self -> m (Maybe Element)-getLastElementChild self-  = liftIO-      (nullableToMaybe <$> (js_getLastElementChild (toElement self)))- -foreign import javascript unsafe "$1[\"previousElementSibling\"]"-        js_getPreviousElementSibling :: Element -> IO (Nullable Element)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.previousElementSibling Mozilla Element.previousElementSibling documentation> -getPreviousElementSibling ::-                          (MonadIO m, IsElement self) => self -> m (Maybe Element)-getPreviousElementSibling self-  = liftIO-      (nullableToMaybe <$>-         (js_getPreviousElementSibling (toElement self)))- -foreign import javascript unsafe "$1[\"nextElementSibling\"]"-        js_getNextElementSibling :: Element -> IO (Nullable Element)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.nextElementSibling Mozilla Element.nextElementSibling documentation> -getNextElementSibling ::-                      (MonadIO m, IsElement self) => self -> m (Maybe Element)-getNextElementSibling self-  = liftIO-      (nullableToMaybe <$> (js_getNextElementSibling (toElement self)))- -foreign import javascript unsafe "$1[\"childElementCount\"]"-        js_getChildElementCount :: Element -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.childElementCount Mozilla Element.childElementCount documentation> -getChildElementCount ::-                     (MonadIO m, IsElement self) => self -> m Word-getChildElementCount self-  = liftIO (js_getChildElementCount (toElement self))- -foreign import javascript unsafe "$1[\"uiactions\"] = $2;"-        js_setUiactions :: Element -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.uiactions Mozilla Element.uiactions documentation> -setUiactions ::-             (MonadIO m, IsElement self, ToJSString val) => self -> val -> m ()-setUiactions self val-  = liftIO (js_setUiactions (toElement self) (toJSString val))- -foreign import javascript unsafe "$1[\"uiactions\"]"-        js_getUiactions :: Element -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.uiactions Mozilla Element.uiactions documentation> -getUiactions ::-             (MonadIO m, IsElement self, FromJSString result) =>-               self -> m result-getUiactions self-  = liftIO (fromJSString <$> (js_getUiactions (toElement self)))- -foreign import javascript unsafe "$1[\"webkitRegionOverset\"]"-        js_getWebkitRegionOverset :: Element -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.webkitRegionOverset Mozilla Element.webkitRegionOverset documentation> -getWebkitRegionOverset ::-                       (MonadIO m, IsElement self, FromJSString result) =>-                         self -> m result-getWebkitRegionOverset self-  = liftIO-      (fromJSString <$> (js_getWebkitRegionOverset (toElement self)))---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onabort Mozilla Element.onabort documentation> -abort ::-      (IsElement self, IsEventTarget self) => EventName self UIEvent-abort = unsafeEventName (toJSString "abort")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onblur Mozilla Element.onblur documentation> -blurEvent ::-          (IsElement self, IsEventTarget self) => EventName self FocusEvent-blurEvent = unsafeEventName (toJSString "blur")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onchange Mozilla Element.onchange documentation> -change ::-       (IsElement self, IsEventTarget self) => EventName self Event-change = unsafeEventName (toJSString "change")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onclick Mozilla Element.onclick documentation> -click ::-      (IsElement self, IsEventTarget self) => EventName self MouseEvent-click = unsafeEventName (toJSString "click")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.oncontextmenu Mozilla Element.oncontextmenu documentation> -contextMenu ::-            (IsElement self, IsEventTarget self) => EventName self MouseEvent-contextMenu = unsafeEventName (toJSString "contextmenu")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.ondblclick Mozilla Element.ondblclick documentation> -dblClick ::-         (IsElement self, IsEventTarget self) => EventName self MouseEvent-dblClick = unsafeEventName (toJSString "dblclick")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.ondrag Mozilla Element.ondrag documentation> -drag ::-     (IsElement self, IsEventTarget self) => EventName self MouseEvent-drag = unsafeEventName (toJSString "drag")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.ondragend Mozilla Element.ondragend documentation> -dragEnd ::-        (IsElement self, IsEventTarget self) => EventName self MouseEvent-dragEnd = unsafeEventName (toJSString "dragend")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.ondragenter Mozilla Element.ondragenter documentation> -dragEnter ::-          (IsElement self, IsEventTarget self) => EventName self MouseEvent-dragEnter = unsafeEventName (toJSString "dragenter")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.ondragleave Mozilla Element.ondragleave documentation> -dragLeave ::-          (IsElement self, IsEventTarget self) => EventName self MouseEvent-dragLeave = unsafeEventName (toJSString "dragleave")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.ondragover Mozilla Element.ondragover documentation> -dragOver ::-         (IsElement self, IsEventTarget self) => EventName self MouseEvent-dragOver = unsafeEventName (toJSString "dragover")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.ondragstart Mozilla Element.ondragstart documentation> -dragStart ::-          (IsElement self, IsEventTarget self) => EventName self MouseEvent-dragStart = unsafeEventName (toJSString "dragstart")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.ondrop Mozilla Element.ondrop documentation> -drop ::-     (IsElement self, IsEventTarget self) => EventName self MouseEvent-drop = unsafeEventName (toJSString "drop")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onerror Mozilla Element.onerror documentation> -error ::-      (IsElement self, IsEventTarget self) => EventName self UIEvent-error = unsafeEventName (toJSString "error")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onfocus Mozilla Element.onfocus documentation> -focusEvent ::-           (IsElement self, IsEventTarget self) => EventName self FocusEvent-focusEvent = unsafeEventName (toJSString "focus")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.oninput Mozilla Element.oninput documentation> -input ::-      (IsElement self, IsEventTarget self) => EventName self Event-input = unsafeEventName (toJSString "input")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.oninvalid Mozilla Element.oninvalid documentation> -invalid ::-        (IsElement self, IsEventTarget self) => EventName self Event-invalid = unsafeEventName (toJSString "invalid")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onkeydown Mozilla Element.onkeydown documentation> -keyDown ::-        (IsElement self, IsEventTarget self) =>-          EventName self KeyboardEvent-keyDown = unsafeEventName (toJSString "keydown")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onkeypress Mozilla Element.onkeypress documentation> -keyPress ::-         (IsElement self, IsEventTarget self) =>-           EventName self KeyboardEvent-keyPress = unsafeEventName (toJSString "keypress")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onkeyup Mozilla Element.onkeyup documentation> -keyUp ::-      (IsElement self, IsEventTarget self) =>-        EventName self KeyboardEvent-keyUp = unsafeEventName (toJSString "keyup")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onload Mozilla Element.onload documentation> -load ::-     (IsElement self, IsEventTarget self) => EventName self UIEvent-load = unsafeEventName (toJSString "load")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onmousedown Mozilla Element.onmousedown documentation> -mouseDown ::-          (IsElement self, IsEventTarget self) => EventName self MouseEvent-mouseDown = unsafeEventName (toJSString "mousedown")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onmouseenter Mozilla Element.onmouseenter documentation> -mouseEnter ::-           (IsElement self, IsEventTarget self) => EventName self MouseEvent-mouseEnter = unsafeEventName (toJSString "mouseenter")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onmouseleave Mozilla Element.onmouseleave documentation> -mouseLeave ::-           (IsElement self, IsEventTarget self) => EventName self MouseEvent-mouseLeave = unsafeEventName (toJSString "mouseleave")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onmousemove Mozilla Element.onmousemove documentation> -mouseMove ::-          (IsElement self, IsEventTarget self) => EventName self MouseEvent-mouseMove = unsafeEventName (toJSString "mousemove")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onmouseout Mozilla Element.onmouseout documentation> -mouseOut ::-         (IsElement self, IsEventTarget self) => EventName self MouseEvent-mouseOut = unsafeEventName (toJSString "mouseout")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onmouseover Mozilla Element.onmouseover documentation> -mouseOver ::-          (IsElement self, IsEventTarget self) => EventName self MouseEvent-mouseOver = unsafeEventName (toJSString "mouseover")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onmouseup Mozilla Element.onmouseup documentation> -mouseUp ::-        (IsElement self, IsEventTarget self) => EventName self MouseEvent-mouseUp = unsafeEventName (toJSString "mouseup")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onmousewheel Mozilla Element.onmousewheel documentation> -mouseWheel ::-           (IsElement self, IsEventTarget self) => EventName self MouseEvent-mouseWheel = unsafeEventName (toJSString "mousewheel")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onscroll Mozilla Element.onscroll documentation> -scroll ::-       (IsElement self, IsEventTarget self) => EventName self UIEvent-scroll = unsafeEventName (toJSString "scroll")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onselect Mozilla Element.onselect documentation> -select ::-       (IsElement self, IsEventTarget self) => EventName self UIEvent-select = unsafeEventName (toJSString "select")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onsubmit Mozilla Element.onsubmit documentation> -submit ::-       (IsElement self, IsEventTarget self) => EventName self Event-submit = unsafeEventName (toJSString "submit")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onwheel Mozilla Element.onwheel documentation> -wheel ::-      (IsElement self, IsEventTarget self) => EventName self WheelEvent-wheel = unsafeEventName (toJSString "wheel")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onbeforecut Mozilla Element.onbeforecut documentation> -beforeCut ::-          (IsElement self, IsEventTarget self) => EventName self Event-beforeCut = unsafeEventName (toJSString "beforecut")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.oncut Mozilla Element.oncut documentation> -cut :: (IsElement self, IsEventTarget self) => EventName self Event-cut = unsafeEventName (toJSString "cut")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onbeforecopy Mozilla Element.onbeforecopy documentation> -beforeCopy ::-           (IsElement self, IsEventTarget self) => EventName self Event-beforeCopy = unsafeEventName (toJSString "beforecopy")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.oncopy Mozilla Element.oncopy documentation> -copy ::-     (IsElement self, IsEventTarget self) => EventName self Event-copy = unsafeEventName (toJSString "copy")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onbeforepaste Mozilla Element.onbeforepaste documentation> -beforePaste ::-            (IsElement self, IsEventTarget self) => EventName self Event-beforePaste = unsafeEventName (toJSString "beforepaste")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onpaste Mozilla Element.onpaste documentation> -paste ::-      (IsElement self, IsEventTarget self) => EventName self Event-paste = unsafeEventName (toJSString "paste")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onreset Mozilla Element.onreset documentation> -reset ::-      (IsElement self, IsEventTarget self) => EventName self Event-reset = unsafeEventName (toJSString "reset")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onsearch Mozilla Element.onsearch documentation> -search ::-       (IsElement self, IsEventTarget self) => EventName self Event-search = unsafeEventName (toJSString "search")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onselectstart Mozilla Element.onselectstart documentation> -selectStart ::-            (IsElement self, IsEventTarget self) => EventName self Event-selectStart = unsafeEventName (toJSString "selectstart")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.ontouchstart Mozilla Element.ontouchstart documentation> -touchStart ::-           (IsElement self, IsEventTarget self) => EventName self TouchEvent-touchStart = unsafeEventName (toJSString "touchstart")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.ontouchmove Mozilla Element.ontouchmove documentation> -touchMove ::-          (IsElement self, IsEventTarget self) => EventName self TouchEvent-touchMove = unsafeEventName (toJSString "touchmove")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.ontouchend Mozilla Element.ontouchend documentation> -touchEnd ::-         (IsElement self, IsEventTarget self) => EventName self TouchEvent-touchEnd = unsafeEventName (toJSString "touchend")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.ontouchcancel Mozilla Element.ontouchcancel documentation> -touchCancel ::-            (IsElement self, IsEventTarget self) => EventName self TouchEvent-touchCancel = unsafeEventName (toJSString "touchcancel")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onwebkitfullscreenchange Mozilla Element.onwebkitfullscreenchange documentation> -webKitFullscreenChange ::-                       (IsElement self, IsEventTarget self) => EventName self Event-webKitFullscreenChange-  = unsafeEventName (toJSString "webkitfullscreenchange")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onwebkitfullscreenerror Mozilla Element.onwebkitfullscreenerror documentation> -webKitFullscreenError ::-                      (IsElement self, IsEventTarget self) => EventName self Event-webKitFullscreenError-  = unsafeEventName (toJSString "webkitfullscreenerror")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onwebkitwillrevealbottom Mozilla Element.onwebkitwillrevealbottom documentation> -webKitWillRevealBottom ::-                       (IsElement self, IsEventTarget self) => EventName self Event-webKitWillRevealBottom-  = unsafeEventName (toJSString "webkitwillrevealbottom")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onwebkitwillrevealleft Mozilla Element.onwebkitwillrevealleft documentation> -webKitWillRevealLeft ::-                     (IsElement self, IsEventTarget self) => EventName self Event-webKitWillRevealLeft-  = unsafeEventName (toJSString "webkitwillrevealleft")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onwebkitwillrevealright Mozilla Element.onwebkitwillrevealright documentation> -webKitWillRevealRight ::-                      (IsElement self, IsEventTarget self) => EventName self Event-webKitWillRevealRight-  = unsafeEventName (toJSString "webkitwillrevealright")---- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.onwebkitwillrevealtop Mozilla Element.onwebkitwillrevealtop documentation> -webKitWillRevealTop ::-                    (IsElement self, IsEventTarget self) => EventName self Event-webKitWillRevealTop-  = unsafeEventName (toJSString "webkitwillrevealtop")

− src/GHCJS/DOM/JSFFI/Generated/Entity.hs

@@ -1,47 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.Entity-       (js_getPublicId, getPublicId, js_getSystemId, getSystemId,-        js_getNotationName, getNotationName, Entity, castToEntity,-        gTypeEntity)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"publicId\"]" js_getPublicId-        :: Entity -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Entity.publicId Mozilla Entity.publicId documentation> -getPublicId ::-            (MonadIO m, FromJSString result) => Entity -> m (Maybe result)-getPublicId self-  = liftIO (fromMaybeJSString <$> (js_getPublicId (self)))- -foreign import javascript unsafe "$1[\"systemId\"]" js_getSystemId-        :: Entity -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Entity.systemId Mozilla Entity.systemId documentation> -getSystemId ::-            (MonadIO m, FromJSString result) => Entity -> m (Maybe result)-getSystemId self-  = liftIO (fromMaybeJSString <$> (js_getSystemId (self)))- -foreign import javascript unsafe "$1[\"notationName\"]"-        js_getNotationName :: Entity -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Entity.notationName Mozilla Entity.notationName documentation> -getNotationName ::-                (MonadIO m, FromJSString result) => Entity -> m (Maybe result)-getNotationName self-  = liftIO (fromMaybeJSString <$> (js_getNotationName (self)))

− src/GHCJS/DOM/JSFFI/Generated/Enums.hs

@@ -1,771 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.Enums-       (KeyType(..), PToJSVal, ToJSVal, PFromJSVal, FromJSVal,-        js_KeyTypeSecret, js_KeyTypePublic, js_KeyTypePrivate,-        KeyUsage(..), js_KeyUsageEncrypt, js_KeyUsageDecrypt,-        js_KeyUsageSign, js_KeyUsageVerify, js_KeyUsageDeriveKey,-        js_KeyUsageDeriveBits, js_KeyUsageWrapKey, js_KeyUsageUnwrapKey,-        CanvasWindingRule(..), js_CanvasWindingRuleNonzero,-        js_CanvasWindingRuleEvenodd, VideoPresentationMode(..),-        js_VideoPresentationModeFullscreen,-        js_VideoPresentationModeOptimized, js_VideoPresentationModeInline,-        TextTrackMode(..), js_TextTrackModeDisabled,-        js_TextTrackModeHidden, js_TextTrackModeShowing, TextTrackKind(..),-        js_TextTrackKindSubtitles, js_TextTrackKindCaptions,-        js_TextTrackKindDescriptions, js_TextTrackKindChapters,-        js_TextTrackKindMetadata, DeviceType(..), js_DeviceTypeNone,-        js_DeviceTypeAirplay, js_DeviceTypeTvout, MediaUIPartID(..),-        js_MediaUIPartIDOptimizedFullscreenButton,-        js_MediaUIPartIDOptimizedFullscreenPlaceholder,-        EndOfStreamError(..), js_EndOfStreamErrorNetwork,-        js_EndOfStreamErrorDecode, AppendMode(..), js_AppendModeSegments,-        js_AppendModeSequence, SourceTypeEnum(..), js_SourceTypeEnumNone,-        js_SourceTypeEnumCamera, js_SourceTypeEnumMicrophone,-        VideoFacingModeEnum(..), js_VideoFacingModeEnumUser,-        js_VideoFacingModeEnumEnvironment, js_VideoFacingModeEnumLeft,-        js_VideoFacingModeEnumRight, MediaStreamTrackState(..),-        js_MediaStreamTrackStateNew, js_MediaStreamTrackStateLive,-        js_MediaStreamTrackStateEnded, RTCIceTransportsEnum(..),-        js_RTCIceTransportsEnumNone, js_RTCIceTransportsEnumRelay,-        js_RTCIceTransportsEnumAll, RTCIdentityOptionEnum(..),-        js_RTCIdentityOptionEnumYes, js_RTCIdentityOptionEnumNo,-        js_RTCIdentityOptionEnumIfconfigured, ReadableStreamStateType(..),-        js_ReadableStreamStateTypeReadable,-        js_ReadableStreamStateTypeWaiting,-        js_ReadableStreamStateTypeClosed,-        js_ReadableStreamStateTypeErrored, OverSampleType(..),-        js_OverSampleTypeNone, js_OverSampleType2x, js_OverSampleType4x,-        PageOverlayType(..), js_PageOverlayTypeView,-        js_PageOverlayTypeDocument, XMLHttpRequestResponseType(..),-        js_XMLHttpRequestResponseType,-        js_XMLHttpRequestResponseTypeArraybuffer,-        js_XMLHttpRequestResponseTypeBlob,-        js_XMLHttpRequestResponseTypeDocument,-        js_XMLHttpRequestResponseTypeJson,-        js_XMLHttpRequestResponseTypeText)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))- -data KeyType = KeyTypeSecret-             | KeyTypePublic-             | KeyTypePrivate-             deriving (Show, Read, Eq, Ord, Typeable)- -instance PToJSVal KeyType where-        pToJSVal KeyTypeSecret = js_KeyTypeSecret-        pToJSVal KeyTypePublic = js_KeyTypePublic-        pToJSVal KeyTypePrivate = js_KeyTypePrivate- -instance ToJSVal KeyType where-        toJSVal = return . pToJSVal- -instance PFromJSVal KeyType where-        pFromJSVal x | x `js_eq` js_KeyTypeSecret = KeyTypeSecret-        pFromJSVal x | x `js_eq` js_KeyTypePublic = KeyTypePublic-        pFromJSVal x | x `js_eq` js_KeyTypePrivate = KeyTypePrivate- -instance FromJSVal KeyType where-        fromJSValUnchecked = return . pFromJSVal-        fromJSVal = return . pFromJSVal- -foreign import javascript unsafe "\"secret\"" js_KeyTypeSecret ::-        JSVal- -foreign import javascript unsafe "\"public\"" js_KeyTypePublic ::-        JSVal- -foreign import javascript unsafe "\"private\"" js_KeyTypePrivate ::-        JSVal- -data KeyUsage = KeyUsageEncrypt-              | KeyUsageDecrypt-              | KeyUsageSign-              | KeyUsageVerify-              | KeyUsageDeriveKey-              | KeyUsageDeriveBits-              | KeyUsageWrapKey-              | KeyUsageUnwrapKey-              deriving (Show, Read, Eq, Ord, Typeable)- -instance PToJSVal KeyUsage where-        pToJSVal KeyUsageEncrypt = js_KeyUsageEncrypt-        pToJSVal KeyUsageDecrypt = js_KeyUsageDecrypt-        pToJSVal KeyUsageSign = js_KeyUsageSign-        pToJSVal KeyUsageVerify = js_KeyUsageVerify-        pToJSVal KeyUsageDeriveKey = js_KeyUsageDeriveKey-        pToJSVal KeyUsageDeriveBits = js_KeyUsageDeriveBits-        pToJSVal KeyUsageWrapKey = js_KeyUsageWrapKey-        pToJSVal KeyUsageUnwrapKey = js_KeyUsageUnwrapKey- -instance ToJSVal KeyUsage where-        toJSVal = return . pToJSVal- -instance PFromJSVal KeyUsage where-        pFromJSVal x | x `js_eq` js_KeyUsageEncrypt = KeyUsageEncrypt-        pFromJSVal x | x `js_eq` js_KeyUsageDecrypt = KeyUsageDecrypt-        pFromJSVal x | x `js_eq` js_KeyUsageSign = KeyUsageSign-        pFromJSVal x | x `js_eq` js_KeyUsageVerify = KeyUsageVerify-        pFromJSVal x | x `js_eq` js_KeyUsageDeriveKey = KeyUsageDeriveKey-        pFromJSVal x | x `js_eq` js_KeyUsageDeriveBits = KeyUsageDeriveBits-        pFromJSVal x | x `js_eq` js_KeyUsageWrapKey = KeyUsageWrapKey-        pFromJSVal x | x `js_eq` js_KeyUsageUnwrapKey = KeyUsageUnwrapKey- -instance FromJSVal KeyUsage where-        fromJSValUnchecked = return . pFromJSVal-        fromJSVal = return . pFromJSVal- -foreign import javascript unsafe "\"encrypt\"" js_KeyUsageEncrypt-        :: JSVal- -foreign import javascript unsafe "\"decrypt\"" js_KeyUsageDecrypt-        :: JSVal- -foreign import javascript unsafe "\"sign\"" js_KeyUsageSign ::-        JSVal- -foreign import javascript unsafe "\"verify\"" js_KeyUsageVerify ::-        JSVal- -foreign import javascript unsafe "\"deriveKey\""-        js_KeyUsageDeriveKey :: JSVal- -foreign import javascript unsafe "\"deriveBits\""-        js_KeyUsageDeriveBits :: JSVal- -foreign import javascript unsafe "\"wrapKey\"" js_KeyUsageWrapKey-        :: JSVal- -foreign import javascript unsafe "\"unwrapKey\""-        js_KeyUsageUnwrapKey :: JSVal- -data CanvasWindingRule = CanvasWindingRuleNonzero-                       | CanvasWindingRuleEvenodd-                       deriving (Show, Read, Eq, Ord, Typeable)- -instance PToJSVal CanvasWindingRule where-        pToJSVal CanvasWindingRuleNonzero = js_CanvasWindingRuleNonzero-        pToJSVal CanvasWindingRuleEvenodd = js_CanvasWindingRuleEvenodd- -instance ToJSVal CanvasWindingRule where-        toJSVal = return . pToJSVal- -instance PFromJSVal CanvasWindingRule where-        pFromJSVal x-          | x `js_eq` js_CanvasWindingRuleNonzero = CanvasWindingRuleNonzero-        pFromJSVal x-          | x `js_eq` js_CanvasWindingRuleEvenodd = CanvasWindingRuleEvenodd- -instance FromJSVal CanvasWindingRule where-        fromJSValUnchecked = return . pFromJSVal-        fromJSVal = return . pFromJSVal- -foreign import javascript unsafe "\"nonzero\""-        js_CanvasWindingRuleNonzero :: JSVal- -foreign import javascript unsafe "\"evenodd\""-        js_CanvasWindingRuleEvenodd :: JSVal- -data VideoPresentationMode = VideoPresentationModeFullscreen-                           | VideoPresentationModeOptimized-                           | VideoPresentationModeInline-                           deriving (Show, Read, Eq, Ord, Typeable)- -instance PToJSVal VideoPresentationMode where-        pToJSVal VideoPresentationModeFullscreen-          = js_VideoPresentationModeFullscreen-        pToJSVal VideoPresentationModeOptimized-          = js_VideoPresentationModeOptimized-        pToJSVal VideoPresentationModeInline-          = js_VideoPresentationModeInline- -instance ToJSVal VideoPresentationMode where-        toJSVal = return . pToJSVal- -instance PFromJSVal VideoPresentationMode where-        pFromJSVal x-          | x `js_eq` js_VideoPresentationModeFullscreen =-            VideoPresentationModeFullscreen-        pFromJSVal x-          | x `js_eq` js_VideoPresentationModeOptimized =-            VideoPresentationModeOptimized-        pFromJSVal x-          | x `js_eq` js_VideoPresentationModeInline =-            VideoPresentationModeInline- -instance FromJSVal VideoPresentationMode where-        fromJSValUnchecked = return . pFromJSVal-        fromJSVal = return . pFromJSVal- -foreign import javascript unsafe "\"fullscreen\""-        js_VideoPresentationModeFullscreen :: JSVal- -foreign import javascript unsafe "\"optimized\""-        js_VideoPresentationModeOptimized :: JSVal- -foreign import javascript unsafe "\"inline\""-        js_VideoPresentationModeInline :: JSVal- -data TextTrackMode = TextTrackModeDisabled-                   | TextTrackModeHidden-                   | TextTrackModeShowing-                   deriving (Show, Read, Eq, Ord, Typeable)- -instance PToJSVal TextTrackMode where-        pToJSVal TextTrackModeDisabled = js_TextTrackModeDisabled-        pToJSVal TextTrackModeHidden = js_TextTrackModeHidden-        pToJSVal TextTrackModeShowing = js_TextTrackModeShowing- -instance ToJSVal TextTrackMode where-        toJSVal = return . pToJSVal- -instance PFromJSVal TextTrackMode where-        pFromJSVal x-          | x `js_eq` js_TextTrackModeDisabled = TextTrackModeDisabled-        pFromJSVal x-          | x `js_eq` js_TextTrackModeHidden = TextTrackModeHidden-        pFromJSVal x-          | x `js_eq` js_TextTrackModeShowing = TextTrackModeShowing- -instance FromJSVal TextTrackMode where-        fromJSValUnchecked = return . pFromJSVal-        fromJSVal = return . pFromJSVal- -foreign import javascript unsafe "\"disabled\""-        js_TextTrackModeDisabled :: JSVal- -foreign import javascript unsafe "\"hidden\""-        js_TextTrackModeHidden :: JSVal- -foreign import javascript unsafe "\"showing\""-        js_TextTrackModeShowing :: JSVal- -data TextTrackKind = TextTrackKindSubtitles-                   | TextTrackKindCaptions-                   | TextTrackKindDescriptions-                   | TextTrackKindChapters-                   | TextTrackKindMetadata-                   deriving (Show, Read, Eq, Ord, Typeable)- -instance PToJSVal TextTrackKind where-        pToJSVal TextTrackKindSubtitles = js_TextTrackKindSubtitles-        pToJSVal TextTrackKindCaptions = js_TextTrackKindCaptions-        pToJSVal TextTrackKindDescriptions = js_TextTrackKindDescriptions-        pToJSVal TextTrackKindChapters = js_TextTrackKindChapters-        pToJSVal TextTrackKindMetadata = js_TextTrackKindMetadata- -instance ToJSVal TextTrackKind where-        toJSVal = return . pToJSVal- -instance PFromJSVal TextTrackKind where-        pFromJSVal x-          | x `js_eq` js_TextTrackKindSubtitles = TextTrackKindSubtitles-        pFromJSVal x-          | x `js_eq` js_TextTrackKindCaptions = TextTrackKindCaptions-        pFromJSVal x-          | x `js_eq` js_TextTrackKindDescriptions =-            TextTrackKindDescriptions-        pFromJSVal x-          | x `js_eq` js_TextTrackKindChapters = TextTrackKindChapters-        pFromJSVal x-          | x `js_eq` js_TextTrackKindMetadata = TextTrackKindMetadata- -instance FromJSVal TextTrackKind where-        fromJSValUnchecked = return . pFromJSVal-        fromJSVal = return . pFromJSVal- -foreign import javascript unsafe "\"subtitles\""-        js_TextTrackKindSubtitles :: JSVal- -foreign import javascript unsafe "\"captions\""-        js_TextTrackKindCaptions :: JSVal- -foreign import javascript unsafe "\"descriptions\""-        js_TextTrackKindDescriptions :: JSVal- -foreign import javascript unsafe "\"chapters\""-        js_TextTrackKindChapters :: JSVal- -foreign import javascript unsafe "\"metadata\""-        js_TextTrackKindMetadata :: JSVal- -data DeviceType = DeviceTypeNone-                | DeviceTypeAirplay-                | DeviceTypeTvout-                deriving (Show, Read, Eq, Ord, Typeable)- -instance PToJSVal DeviceType where-        pToJSVal DeviceTypeNone = js_DeviceTypeNone-        pToJSVal DeviceTypeAirplay = js_DeviceTypeAirplay-        pToJSVal DeviceTypeTvout = js_DeviceTypeTvout- -instance ToJSVal DeviceType where-        toJSVal = return . pToJSVal- -instance PFromJSVal DeviceType where-        pFromJSVal x | x `js_eq` js_DeviceTypeNone = DeviceTypeNone-        pFromJSVal x | x `js_eq` js_DeviceTypeAirplay = DeviceTypeAirplay-        pFromJSVal x | x `js_eq` js_DeviceTypeTvout = DeviceTypeTvout- -instance FromJSVal DeviceType where-        fromJSValUnchecked = return . pFromJSVal-        fromJSVal = return . pFromJSVal- -foreign import javascript unsafe "\"none\"" js_DeviceTypeNone ::-        JSVal- -foreign import javascript unsafe "\"airplay\"" js_DeviceTypeAirplay-        :: JSVal- -foreign import javascript unsafe "\"tvout\"" js_DeviceTypeTvout ::-        JSVal- -data MediaUIPartID = MediaUIPartIDOptimizedFullscreenButton-                   | MediaUIPartIDOptimizedFullscreenPlaceholder-                   deriving (Show, Read, Eq, Ord, Typeable)- -instance PToJSVal MediaUIPartID where-        pToJSVal MediaUIPartIDOptimizedFullscreenButton-          = js_MediaUIPartIDOptimizedFullscreenButton-        pToJSVal MediaUIPartIDOptimizedFullscreenPlaceholder-          = js_MediaUIPartIDOptimizedFullscreenPlaceholder- -instance ToJSVal MediaUIPartID where-        toJSVal = return . pToJSVal- -instance PFromJSVal MediaUIPartID where-        pFromJSVal x-          | x `js_eq` js_MediaUIPartIDOptimizedFullscreenButton =-            MediaUIPartIDOptimizedFullscreenButton-        pFromJSVal x-          | x `js_eq` js_MediaUIPartIDOptimizedFullscreenPlaceholder =-            MediaUIPartIDOptimizedFullscreenPlaceholder- -instance FromJSVal MediaUIPartID where-        fromJSValUnchecked = return . pFromJSVal-        fromJSVal = return . pFromJSVal- -foreign import javascript unsafe "\"optimized-fullscreen-button\""-        js_MediaUIPartIDOptimizedFullscreenButton :: JSVal- -foreign import javascript unsafe-        "\"optimized-fullscreen-placeholder\""-        js_MediaUIPartIDOptimizedFullscreenPlaceholder :: JSVal- -data EndOfStreamError = EndOfStreamErrorNetwork-                      | EndOfStreamErrorDecode-                      deriving (Show, Read, Eq, Ord, Typeable)- -instance PToJSVal EndOfStreamError where-        pToJSVal EndOfStreamErrorNetwork = js_EndOfStreamErrorNetwork-        pToJSVal EndOfStreamErrorDecode = js_EndOfStreamErrorDecode- -instance ToJSVal EndOfStreamError where-        toJSVal = return . pToJSVal- -instance PFromJSVal EndOfStreamError where-        pFromJSVal x-          | x `js_eq` js_EndOfStreamErrorNetwork = EndOfStreamErrorNetwork-        pFromJSVal x-          | x `js_eq` js_EndOfStreamErrorDecode = EndOfStreamErrorDecode- -instance FromJSVal EndOfStreamError where-        fromJSValUnchecked = return . pFromJSVal-        fromJSVal = return . pFromJSVal- -foreign import javascript unsafe "\"network\""-        js_EndOfStreamErrorNetwork :: JSVal- -foreign import javascript unsafe "\"decode\""-        js_EndOfStreamErrorDecode :: JSVal- -data AppendMode = AppendModeSegments-                | AppendModeSequence-                deriving (Show, Read, Eq, Ord, Typeable)- -instance PToJSVal AppendMode where-        pToJSVal AppendModeSegments = js_AppendModeSegments-        pToJSVal AppendModeSequence = js_AppendModeSequence- -instance ToJSVal AppendMode where-        toJSVal = return . pToJSVal- -instance PFromJSVal AppendMode where-        pFromJSVal x | x `js_eq` js_AppendModeSegments = AppendModeSegments-        pFromJSVal x | x `js_eq` js_AppendModeSequence = AppendModeSequence- -instance FromJSVal AppendMode where-        fromJSValUnchecked = return . pFromJSVal-        fromJSVal = return . pFromJSVal- -foreign import javascript unsafe "\"segments\""-        js_AppendModeSegments :: JSVal- -foreign import javascript unsafe "\"sequence\""-        js_AppendModeSequence :: JSVal- -data SourceTypeEnum = SourceTypeEnumNone-                    | SourceTypeEnumCamera-                    | SourceTypeEnumMicrophone-                    deriving (Show, Read, Eq, Ord, Typeable)- -instance PToJSVal SourceTypeEnum where-        pToJSVal SourceTypeEnumNone = js_SourceTypeEnumNone-        pToJSVal SourceTypeEnumCamera = js_SourceTypeEnumCamera-        pToJSVal SourceTypeEnumMicrophone = js_SourceTypeEnumMicrophone- -instance ToJSVal SourceTypeEnum where-        toJSVal = return . pToJSVal- -instance PFromJSVal SourceTypeEnum where-        pFromJSVal x | x `js_eq` js_SourceTypeEnumNone = SourceTypeEnumNone-        pFromJSVal x-          | x `js_eq` js_SourceTypeEnumCamera = SourceTypeEnumCamera-        pFromJSVal x-          | x `js_eq` js_SourceTypeEnumMicrophone = SourceTypeEnumMicrophone- -instance FromJSVal SourceTypeEnum where-        fromJSValUnchecked = return . pFromJSVal-        fromJSVal = return . pFromJSVal- -foreign import javascript unsafe "\"none\"" js_SourceTypeEnumNone-        :: JSVal- -foreign import javascript unsafe "\"camera\""-        js_SourceTypeEnumCamera :: JSVal- -foreign import javascript unsafe "\"microphone\""-        js_SourceTypeEnumMicrophone :: JSVal- -data VideoFacingModeEnum = VideoFacingModeEnumUser-                         | VideoFacingModeEnumEnvironment-                         | VideoFacingModeEnumLeft-                         | VideoFacingModeEnumRight-                         deriving (Show, Read, Eq, Ord, Typeable)- -instance PToJSVal VideoFacingModeEnum where-        pToJSVal VideoFacingModeEnumUser = js_VideoFacingModeEnumUser-        pToJSVal VideoFacingModeEnumEnvironment-          = js_VideoFacingModeEnumEnvironment-        pToJSVal VideoFacingModeEnumLeft = js_VideoFacingModeEnumLeft-        pToJSVal VideoFacingModeEnumRight = js_VideoFacingModeEnumRight- -instance ToJSVal VideoFacingModeEnum where-        toJSVal = return . pToJSVal- -instance PFromJSVal VideoFacingModeEnum where-        pFromJSVal x-          | x `js_eq` js_VideoFacingModeEnumUser = VideoFacingModeEnumUser-        pFromJSVal x-          | x `js_eq` js_VideoFacingModeEnumEnvironment =-            VideoFacingModeEnumEnvironment-        pFromJSVal x-          | x `js_eq` js_VideoFacingModeEnumLeft = VideoFacingModeEnumLeft-        pFromJSVal x-          | x `js_eq` js_VideoFacingModeEnumRight = VideoFacingModeEnumRight- -instance FromJSVal VideoFacingModeEnum where-        fromJSValUnchecked = return . pFromJSVal-        fromJSVal = return . pFromJSVal- -foreign import javascript unsafe "\"user\""-        js_VideoFacingModeEnumUser :: JSVal- -foreign import javascript unsafe "\"environment\""-        js_VideoFacingModeEnumEnvironment :: JSVal- -foreign import javascript unsafe "\"left\""-        js_VideoFacingModeEnumLeft :: JSVal- -foreign import javascript unsafe "\"right\""-        js_VideoFacingModeEnumRight :: JSVal- -data MediaStreamTrackState = MediaStreamTrackStateNew-                           | MediaStreamTrackStateLive-                           | MediaStreamTrackStateEnded-                           deriving (Show, Read, Eq, Ord, Typeable)- -instance PToJSVal MediaStreamTrackState where-        pToJSVal MediaStreamTrackStateNew = js_MediaStreamTrackStateNew-        pToJSVal MediaStreamTrackStateLive = js_MediaStreamTrackStateLive-        pToJSVal MediaStreamTrackStateEnded = js_MediaStreamTrackStateEnded- -instance ToJSVal MediaStreamTrackState where-        toJSVal = return . pToJSVal- -instance PFromJSVal MediaStreamTrackState where-        pFromJSVal x-          | x `js_eq` js_MediaStreamTrackStateNew = MediaStreamTrackStateNew-        pFromJSVal x-          | x `js_eq` js_MediaStreamTrackStateLive =-            MediaStreamTrackStateLive-        pFromJSVal x-          | x `js_eq` js_MediaStreamTrackStateEnded =-            MediaStreamTrackStateEnded- -instance FromJSVal MediaStreamTrackState where-        fromJSValUnchecked = return . pFromJSVal-        fromJSVal = return . pFromJSVal- -foreign import javascript unsafe "\"new\""-        js_MediaStreamTrackStateNew :: JSVal- -foreign import javascript unsafe "\"live\""-        js_MediaStreamTrackStateLive :: JSVal- -foreign import javascript unsafe "\"ended\""-        js_MediaStreamTrackStateEnded :: JSVal- -data RTCIceTransportsEnum = RTCIceTransportsEnumNone-                          | RTCIceTransportsEnumRelay-                          | RTCIceTransportsEnumAll-                          deriving (Show, Read, Eq, Ord, Typeable)- -instance PToJSVal RTCIceTransportsEnum where-        pToJSVal RTCIceTransportsEnumNone = js_RTCIceTransportsEnumNone-        pToJSVal RTCIceTransportsEnumRelay = js_RTCIceTransportsEnumRelay-        pToJSVal RTCIceTransportsEnumAll = js_RTCIceTransportsEnumAll- -instance ToJSVal RTCIceTransportsEnum where-        toJSVal = return . pToJSVal- -instance PFromJSVal RTCIceTransportsEnum where-        pFromJSVal x-          | x `js_eq` js_RTCIceTransportsEnumNone = RTCIceTransportsEnumNone-        pFromJSVal x-          | x `js_eq` js_RTCIceTransportsEnumRelay =-            RTCIceTransportsEnumRelay-        pFromJSVal x-          | x `js_eq` js_RTCIceTransportsEnumAll = RTCIceTransportsEnumAll- -instance FromJSVal RTCIceTransportsEnum where-        fromJSValUnchecked = return . pFromJSVal-        fromJSVal = return . pFromJSVal- -foreign import javascript unsafe "\"none\""-        js_RTCIceTransportsEnumNone :: JSVal- -foreign import javascript unsafe "\"relay\""-        js_RTCIceTransportsEnumRelay :: JSVal- -foreign import javascript unsafe "\"all\""-        js_RTCIceTransportsEnumAll :: JSVal- -data RTCIdentityOptionEnum = RTCIdentityOptionEnumYes-                           | RTCIdentityOptionEnumNo-                           | RTCIdentityOptionEnumIfconfigured-                           deriving (Show, Read, Eq, Ord, Typeable)- -instance PToJSVal RTCIdentityOptionEnum where-        pToJSVal RTCIdentityOptionEnumYes = js_RTCIdentityOptionEnumYes-        pToJSVal RTCIdentityOptionEnumNo = js_RTCIdentityOptionEnumNo-        pToJSVal RTCIdentityOptionEnumIfconfigured-          = js_RTCIdentityOptionEnumIfconfigured- -instance ToJSVal RTCIdentityOptionEnum where-        toJSVal = return . pToJSVal- -instance PFromJSVal RTCIdentityOptionEnum where-        pFromJSVal x-          | x `js_eq` js_RTCIdentityOptionEnumYes = RTCIdentityOptionEnumYes-        pFromJSVal x-          | x `js_eq` js_RTCIdentityOptionEnumNo = RTCIdentityOptionEnumNo-        pFromJSVal x-          | x `js_eq` js_RTCIdentityOptionEnumIfconfigured =-            RTCIdentityOptionEnumIfconfigured- -instance FromJSVal RTCIdentityOptionEnum where-        fromJSValUnchecked = return . pFromJSVal-        fromJSVal = return . pFromJSVal- -foreign import javascript unsafe "\"yes\""-        js_RTCIdentityOptionEnumYes :: JSVal- -foreign import javascript unsafe "\"no\""-        js_RTCIdentityOptionEnumNo :: JSVal- -foreign import javascript unsafe "\"ifconfigured\""-        js_RTCIdentityOptionEnumIfconfigured :: JSVal- -data ReadableStreamStateType = ReadableStreamStateTypeReadable-                             | ReadableStreamStateTypeWaiting-                             | ReadableStreamStateTypeClosed-                             | ReadableStreamStateTypeErrored-                             deriving (Show, Read, Eq, Ord, Typeable)- -instance PToJSVal ReadableStreamStateType where-        pToJSVal ReadableStreamStateTypeReadable-          = js_ReadableStreamStateTypeReadable-        pToJSVal ReadableStreamStateTypeWaiting-          = js_ReadableStreamStateTypeWaiting-        pToJSVal ReadableStreamStateTypeClosed-          = js_ReadableStreamStateTypeClosed-        pToJSVal ReadableStreamStateTypeErrored-          = js_ReadableStreamStateTypeErrored- -instance ToJSVal ReadableStreamStateType where-        toJSVal = return . pToJSVal- -instance PFromJSVal ReadableStreamStateType where-        pFromJSVal x-          | x `js_eq` js_ReadableStreamStateTypeReadable =-            ReadableStreamStateTypeReadable-        pFromJSVal x-          | x `js_eq` js_ReadableStreamStateTypeWaiting =-            ReadableStreamStateTypeWaiting-        pFromJSVal x-          | x `js_eq` js_ReadableStreamStateTypeClosed =-            ReadableStreamStateTypeClosed-        pFromJSVal x-          | x `js_eq` js_ReadableStreamStateTypeErrored =-            ReadableStreamStateTypeErrored- -instance FromJSVal ReadableStreamStateType where-        fromJSValUnchecked = return . pFromJSVal-        fromJSVal = return . pFromJSVal- -foreign import javascript unsafe "\"readable\""-        js_ReadableStreamStateTypeReadable :: JSVal- -foreign import javascript unsafe "\"waiting\""-        js_ReadableStreamStateTypeWaiting :: JSVal- -foreign import javascript unsafe "\"closed\""-        js_ReadableStreamStateTypeClosed :: JSVal- -foreign import javascript unsafe "\"errored\""-        js_ReadableStreamStateTypeErrored :: JSVal- -data OverSampleType = OverSampleTypeNone-                    | OverSampleType2x-                    | OverSampleType4x-                    deriving (Show, Read, Eq, Ord, Typeable)- -instance PToJSVal OverSampleType where-        pToJSVal OverSampleTypeNone = js_OverSampleTypeNone-        pToJSVal OverSampleType2x = js_OverSampleType2x-        pToJSVal OverSampleType4x = js_OverSampleType4x- -instance ToJSVal OverSampleType where-        toJSVal = return . pToJSVal- -instance PFromJSVal OverSampleType where-        pFromJSVal x | x `js_eq` js_OverSampleTypeNone = OverSampleTypeNone-        pFromJSVal x | x `js_eq` js_OverSampleType2x = OverSampleType2x-        pFromJSVal x | x `js_eq` js_OverSampleType4x = OverSampleType4x- -instance FromJSVal OverSampleType where-        fromJSValUnchecked = return . pFromJSVal-        fromJSVal = return . pFromJSVal- -foreign import javascript unsafe "\"none\"" js_OverSampleTypeNone-        :: JSVal- -foreign import javascript unsafe "\"2x\"" js_OverSampleType2x ::-        JSVal- -foreign import javascript unsafe "\"4x\"" js_OverSampleType4x ::-        JSVal- -data PageOverlayType = PageOverlayTypeView-                     | PageOverlayTypeDocument-                     deriving (Show, Read, Eq, Ord, Typeable)- -instance PToJSVal PageOverlayType where-        pToJSVal PageOverlayTypeView = js_PageOverlayTypeView-        pToJSVal PageOverlayTypeDocument = js_PageOverlayTypeDocument- -instance ToJSVal PageOverlayType where-        toJSVal = return . pToJSVal- -instance PFromJSVal PageOverlayType where-        pFromJSVal x-          | x `js_eq` js_PageOverlayTypeView = PageOverlayTypeView-        pFromJSVal x-          | x `js_eq` js_PageOverlayTypeDocument = PageOverlayTypeDocument- -instance FromJSVal PageOverlayType where-        fromJSValUnchecked = return . pFromJSVal-        fromJSVal = return . pFromJSVal- -foreign import javascript unsafe "\"view\"" js_PageOverlayTypeView-        :: JSVal- -foreign import javascript unsafe "\"document\""-        js_PageOverlayTypeDocument :: JSVal- -data XMLHttpRequestResponseType = XMLHttpRequestResponseType-                                | XMLHttpRequestResponseTypeArraybuffer-                                | XMLHttpRequestResponseTypeBlob-                                | XMLHttpRequestResponseTypeDocument-                                | XMLHttpRequestResponseTypeJson-                                | XMLHttpRequestResponseTypeText-                                deriving (Show, Read, Eq, Ord, Typeable)- -instance PToJSVal XMLHttpRequestResponseType where-        pToJSVal XMLHttpRequestResponseType = js_XMLHttpRequestResponseType-        pToJSVal XMLHttpRequestResponseTypeArraybuffer-          = js_XMLHttpRequestResponseTypeArraybuffer-        pToJSVal XMLHttpRequestResponseTypeBlob-          = js_XMLHttpRequestResponseTypeBlob-        pToJSVal XMLHttpRequestResponseTypeDocument-          = js_XMLHttpRequestResponseTypeDocument-        pToJSVal XMLHttpRequestResponseTypeJson-          = js_XMLHttpRequestResponseTypeJson-        pToJSVal XMLHttpRequestResponseTypeText-          = js_XMLHttpRequestResponseTypeText- -instance ToJSVal XMLHttpRequestResponseType where-        toJSVal = return . pToJSVal- -instance PFromJSVal XMLHttpRequestResponseType where-        pFromJSVal x-          | x `js_eq` js_XMLHttpRequestResponseType =-            XMLHttpRequestResponseType-        pFromJSVal x-          | x `js_eq` js_XMLHttpRequestResponseTypeArraybuffer =-            XMLHttpRequestResponseTypeArraybuffer-        pFromJSVal x-          | x `js_eq` js_XMLHttpRequestResponseTypeBlob =-            XMLHttpRequestResponseTypeBlob-        pFromJSVal x-          | x `js_eq` js_XMLHttpRequestResponseTypeDocument =-            XMLHttpRequestResponseTypeDocument-        pFromJSVal x-          | x `js_eq` js_XMLHttpRequestResponseTypeJson =-            XMLHttpRequestResponseTypeJson-        pFromJSVal x-          | x `js_eq` js_XMLHttpRequestResponseTypeText =-            XMLHttpRequestResponseTypeText- -instance FromJSVal XMLHttpRequestResponseType where-        fromJSValUnchecked = return . pFromJSVal-        fromJSVal = return . pFromJSVal- -foreign import javascript unsafe "\"\""-        js_XMLHttpRequestResponseType :: JSVal- -foreign import javascript unsafe "\"arraybuffer\""-        js_XMLHttpRequestResponseTypeArraybuffer :: JSVal- -foreign import javascript unsafe "\"blob\""-        js_XMLHttpRequestResponseTypeBlob :: JSVal- -foreign import javascript unsafe "\"document\""-        js_XMLHttpRequestResponseTypeDocument :: JSVal- -foreign import javascript unsafe "\"json\""-        js_XMLHttpRequestResponseTypeJson :: JSVal- -foreign import javascript unsafe "\"text\""-        js_XMLHttpRequestResponseTypeText :: JSVal

− src/GHCJS/DOM/JSFFI/Generated/ErrorEvent.hs

@@ -1,51 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.ErrorEvent-       (js_getMessage, getMessage, js_getFilename, getFilename,-        js_getLineno, getLineno, js_getColno, getColno, ErrorEvent,-        castToErrorEvent, gTypeErrorEvent)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"message\"]" js_getMessage ::-        ErrorEvent -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/ErrorEvent.message Mozilla ErrorEvent.message documentation> -getMessage ::-           (MonadIO m, FromJSString result) => ErrorEvent -> m result-getMessage self = liftIO (fromJSString <$> (js_getMessage (self)))- -foreign import javascript unsafe "$1[\"filename\"]" js_getFilename-        :: ErrorEvent -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/ErrorEvent.filename Mozilla ErrorEvent.filename documentation> -getFilename ::-            (MonadIO m, FromJSString result) => ErrorEvent -> m result-getFilename self-  = liftIO (fromJSString <$> (js_getFilename (self)))- -foreign import javascript unsafe "$1[\"lineno\"]" js_getLineno ::-        ErrorEvent -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/ErrorEvent.lineno Mozilla ErrorEvent.lineno documentation> -getLineno :: (MonadIO m) => ErrorEvent -> m Word-getLineno self = liftIO (js_getLineno (self))- -foreign import javascript unsafe "$1[\"colno\"]" js_getColno ::-        ErrorEvent -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/ErrorEvent.colno Mozilla ErrorEvent.colno documentation> -getColno :: (MonadIO m) => ErrorEvent -> m Word-getColno self = liftIO (js_getColno (self))

− src/GHCJS/DOM/JSFFI/Generated/Event.hs

@@ -1,203 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.Event-       (js_stopPropagation, stopPropagation, js_preventDefault,-        preventDefault, js_initEvent, initEvent,-        js_stopImmediatePropagation, stopImmediatePropagation,-        pattern NONE, pattern CAPTURING_PHASE, pattern AT_TARGET,-        pattern BUBBLING_PHASE, pattern MOUSEDOWN, pattern MOUSEUP,-        pattern MOUSEOVER, pattern MOUSEOUT, pattern MOUSEMOVE,-        pattern MOUSEDRAG, pattern CLICK, pattern DBLCLICK,-        pattern KEYDOWN, pattern KEYUP, pattern KEYPRESS, pattern DRAGDROP,-        pattern FOCUS, pattern BLUR, pattern SELECT, pattern CHANGE,-        js_getType, getType, js_getTarget, getTarget, js_getCurrentTarget,-        getCurrentTarget, js_getEventPhase, getEventPhase, js_getBubbles,-        getBubbles, js_getCancelable, getCancelable, js_getTimeStamp,-        getTimeStamp, js_getDefaultPrevented, getDefaultPrevented,-        js_getSrcElement, getSrcElement, js_setReturnValue, setReturnValue,-        js_getReturnValue, getReturnValue, js_setCancelBubble,-        setCancelBubble, js_getCancelBubble, getCancelBubble,-        js_getClipboardData, getClipboardData, Event, castToEvent,-        gTypeEvent, IsEvent, toEvent)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"stopPropagation\"]()"-        js_stopPropagation :: Event -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Event.stopPropagation Mozilla Event.stopPropagation documentation> -stopPropagation :: (MonadIO m, IsEvent self) => self -> m ()-stopPropagation self = liftIO (js_stopPropagation (toEvent self))- -foreign import javascript unsafe "$1[\"preventDefault\"]()"-        js_preventDefault :: Event -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Event.preventDefault Mozilla Event.preventDefault documentation> -preventDefault :: (MonadIO m, IsEvent self) => self -> m ()-preventDefault self = liftIO (js_preventDefault (toEvent self))- -foreign import javascript unsafe "$1[\"initEvent\"]($2, $3, $4)"-        js_initEvent :: Event -> JSString -> Bool -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Event.initEvent Mozilla Event.initEvent documentation> -initEvent ::-          (MonadIO m, IsEvent self, ToJSString eventTypeArg) =>-            self -> eventTypeArg -> Bool -> Bool -> m ()-initEvent self eventTypeArg canBubbleArg cancelableArg-  = liftIO-      (js_initEvent (toEvent self) (toJSString eventTypeArg) canBubbleArg-         cancelableArg)- -foreign import javascript unsafe-        "$1[\"stopImmediatePropagation\"]()" js_stopImmediatePropagation ::-        Event -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Event.stopImmediatePropagation Mozilla Event.stopImmediatePropagation documentation> -stopImmediatePropagation ::-                         (MonadIO m, IsEvent self) => self -> m ()-stopImmediatePropagation self-  = liftIO (js_stopImmediatePropagation (toEvent self))-pattern NONE = 0-pattern CAPTURING_PHASE = 1-pattern AT_TARGET = 2-pattern BUBBLING_PHASE = 3-pattern MOUSEDOWN = 1-pattern MOUSEUP = 2-pattern MOUSEOVER = 4-pattern MOUSEOUT = 8-pattern MOUSEMOVE = 16-pattern MOUSEDRAG = 32-pattern CLICK = 64-pattern DBLCLICK = 128-pattern KEYDOWN = 256-pattern KEYUP = 512-pattern KEYPRESS = 1024-pattern DRAGDROP = 2048-pattern FOCUS = 4096-pattern BLUR = 8192-pattern SELECT = 16384-pattern CHANGE = 32768- -foreign import javascript unsafe "$1[\"type\"]" js_getType ::-        Event -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/Event.type Mozilla Event.type documentation> -getType ::-        (MonadIO m, IsEvent self, FromJSString result) => self -> m result-getType self-  = liftIO (fromJSString <$> (js_getType (toEvent self)))- -foreign import javascript unsafe "$1[\"target\"]" js_getTarget ::-        Event -> IO (Nullable EventTarget)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Event.target Mozilla Event.target documentation> -getTarget ::-          (MonadIO m, IsEvent self) => self -> m (Maybe EventTarget)-getTarget self-  = liftIO (nullableToMaybe <$> (js_getTarget (toEvent self)))- -foreign import javascript unsafe "$1[\"currentTarget\"]"-        js_getCurrentTarget :: Event -> IO (Nullable EventTarget)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Event.currentTarget Mozilla Event.currentTarget documentation> -getCurrentTarget ::-                 (MonadIO m, IsEvent self) => self -> m (Maybe EventTarget)-getCurrentTarget self-  = liftIO (nullableToMaybe <$> (js_getCurrentTarget (toEvent self)))- -foreign import javascript unsafe "$1[\"eventPhase\"]"-        js_getEventPhase :: Event -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/Event.eventPhase Mozilla Event.eventPhase documentation> -getEventPhase :: (MonadIO m, IsEvent self) => self -> m Word-getEventPhase self = liftIO (js_getEventPhase (toEvent self))- -foreign import javascript unsafe "($1[\"bubbles\"] ? 1 : 0)"-        js_getBubbles :: Event -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/Event.bubbles Mozilla Event.bubbles documentation> -getBubbles :: (MonadIO m, IsEvent self) => self -> m Bool-getBubbles self = liftIO (js_getBubbles (toEvent self))- -foreign import javascript unsafe "($1[\"cancelable\"] ? 1 : 0)"-        js_getCancelable :: Event -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/Event.cancelable Mozilla Event.cancelable documentation> -getCancelable :: (MonadIO m, IsEvent self) => self -> m Bool-getCancelable self = liftIO (js_getCancelable (toEvent self))- -foreign import javascript unsafe "$1[\"timeStamp\"]"-        js_getTimeStamp :: Event -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/Event.timeStamp Mozilla Event.timeStamp documentation> -getTimeStamp :: (MonadIO m, IsEvent self) => self -> m Word-getTimeStamp self = liftIO (js_getTimeStamp (toEvent self))- -foreign import javascript unsafe-        "($1[\"defaultPrevented\"] ? 1 : 0)" js_getDefaultPrevented ::-        Event -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/Event.defaultPrevented Mozilla Event.defaultPrevented documentation> -getDefaultPrevented :: (MonadIO m, IsEvent self) => self -> m Bool-getDefaultPrevented self-  = liftIO (js_getDefaultPrevented (toEvent self))- -foreign import javascript unsafe "$1[\"srcElement\"]"-        js_getSrcElement :: Event -> IO (Nullable EventTarget)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Event.srcElement Mozilla Event.srcElement documentation> -getSrcElement ::-              (MonadIO m, IsEvent self) => self -> m (Maybe EventTarget)-getSrcElement self-  = liftIO (nullableToMaybe <$> (js_getSrcElement (toEvent self)))- -foreign import javascript unsafe "$1[\"returnValue\"] = $2;"-        js_setReturnValue :: Event -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Event.returnValue Mozilla Event.returnValue documentation> -setReturnValue :: (MonadIO m, IsEvent self) => self -> Bool -> m ()-setReturnValue self val-  = liftIO (js_setReturnValue (toEvent self) val)- -foreign import javascript unsafe "($1[\"returnValue\"] ? 1 : 0)"-        js_getReturnValue :: Event -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/Event.returnValue Mozilla Event.returnValue documentation> -getReturnValue :: (MonadIO m, IsEvent self) => self -> m Bool-getReturnValue self = liftIO (js_getReturnValue (toEvent self))- -foreign import javascript unsafe "$1[\"cancelBubble\"] = $2;"-        js_setCancelBubble :: Event -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Event.cancelBubble Mozilla Event.cancelBubble documentation> -setCancelBubble ::-                (MonadIO m, IsEvent self) => self -> Bool -> m ()-setCancelBubble self val-  = liftIO (js_setCancelBubble (toEvent self) val)- -foreign import javascript unsafe "($1[\"cancelBubble\"] ? 1 : 0)"-        js_getCancelBubble :: Event -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/Event.cancelBubble Mozilla Event.cancelBubble documentation> -getCancelBubble :: (MonadIO m, IsEvent self) => self -> m Bool-getCancelBubble self = liftIO (js_getCancelBubble (toEvent self))- -foreign import javascript unsafe "$1[\"clipboardData\"]"-        js_getClipboardData :: Event -> IO (Nullable DataTransfer)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Event.clipboardData Mozilla Event.clipboardData documentation> -getClipboardData ::-                 (MonadIO m, IsEvent self) => self -> m (Maybe DataTransfer)-getClipboardData self-  = liftIO (nullableToMaybe <$> (js_getClipboardData (toEvent self)))

− src/GHCJS/DOM/JSFFI/Generated/EventListener.hs

@@ -1,29 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.EventListener-       (js_handleEvent, handleEvent, EventListener, castToEventListener,-        gTypeEventListener)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"handleEvent\"]($2)"-        js_handleEvent :: EventListener -> Nullable Event -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/EventListener.handleEvent Mozilla EventListener.handleEvent documentation> -handleEvent ::-            (MonadIO m, IsEvent evt) => EventListener -> Maybe evt -> m ()-handleEvent self evt-  = liftIO-      (js_handleEvent (self) (maybeToNullable (fmap toEvent evt)))

− src/GHCJS/DOM/JSFFI/Generated/EventSource.hs

@@ -1,80 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.EventSource-       (js_newEventSource, newEventSource, js_close, close,-        pattern CONNECTING, pattern OPEN, pattern CLOSED, js_getUrl,-        getUrl, js_getWithCredentials, getWithCredentials,-        js_getReadyState, getReadyState, open, message, error, EventSource,-        castToEventSource, gTypeEventSource)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe-        "new window[\"EventSource\"]($1,\n$2)" js_newEventSource ::-        JSString -> Nullable Dictionary -> IO EventSource---- | <https://developer.mozilla.org/en-US/docs/Web/API/EventSource Mozilla EventSource documentation> -newEventSource ::-               (MonadIO m, ToJSString url, IsDictionary eventSourceInit) =>-                 url -> Maybe eventSourceInit -> m EventSource-newEventSource url eventSourceInit-  = liftIO-      (js_newEventSource (toJSString url)-         (maybeToNullable (fmap toDictionary eventSourceInit)))- -foreign import javascript unsafe "$1[\"close\"]()" js_close ::-        EventSource -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/EventSource.close Mozilla EventSource.close documentation> -close :: (MonadIO m) => EventSource -> m ()-close self = liftIO (js_close (self))-pattern CONNECTING = 0-pattern OPEN = 1-pattern CLOSED = 2- -foreign import javascript unsafe "$1[\"url\"]" js_getUrl ::-        EventSource -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/EventSource.url Mozilla EventSource.url documentation> -getUrl ::-       (MonadIO m, FromJSString result) => EventSource -> m result-getUrl self = liftIO (fromJSString <$> (js_getUrl (self)))- -foreign import javascript unsafe-        "($1[\"withCredentials\"] ? 1 : 0)" js_getWithCredentials ::-        EventSource -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/EventSource.withCredentials Mozilla EventSource.withCredentials documentation> -getWithCredentials :: (MonadIO m) => EventSource -> m Bool-getWithCredentials self = liftIO (js_getWithCredentials (self))- -foreign import javascript unsafe "$1[\"readyState\"]"-        js_getReadyState :: EventSource -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/EventSource.readyState Mozilla EventSource.readyState documentation> -getReadyState :: (MonadIO m) => EventSource -> m Word-getReadyState self = liftIO (js_getReadyState (self))---- | <https://developer.mozilla.org/en-US/docs/Web/API/EventSource.onopen Mozilla EventSource.onopen documentation> -open :: EventName EventSource Event-open = unsafeEventName (toJSString "open")---- | <https://developer.mozilla.org/en-US/docs/Web/API/EventSource.onmessage Mozilla EventSource.onmessage documentation> -message :: EventName EventSource MessageEvent-message = unsafeEventName (toJSString "message")---- | <https://developer.mozilla.org/en-US/docs/Web/API/EventSource.onerror Mozilla EventSource.onerror documentation> -error :: EventName EventSource UIEvent-error = unsafeEventName (toJSString "error")

− src/GHCJS/DOM/JSFFI/Generated/EventTarget.hs

@@ -1,61 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.EventTarget-       (js_addEventListener, addEventListener, js_removeEventListener,-        removeEventListener, js_dispatchEvent, dispatchEvent, EventTarget,-        castToEventTarget, gTypeEventTarget, IsEventTarget, toEventTarget)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.Enums- -foreign import javascript unsafe-        "$1[\"addEventListener\"]($2, $3,\n$4)" js_addEventListener ::-        EventTarget -> JSString -> Nullable EventListener -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/EventTarget.addEventListener Mozilla EventTarget.addEventListener documentation> -addEventListener ::-                 (MonadIO m, IsEventTarget self, ToJSString type') =>-                   self -> type' -> Maybe EventListener -> Bool -> m ()-addEventListener self type' listener useCapture-  = liftIO-      (js_addEventListener (toEventTarget self) (toJSString type')-         (maybeToNullable listener)-         useCapture)- -foreign import javascript unsafe-        "$1[\"removeEventListener\"]($2,\n$3, $4)" js_removeEventListener-        ::-        EventTarget -> JSString -> Nullable EventListener -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/EventTarget.removeEventListener Mozilla EventTarget.removeEventListener documentation> -removeEventListener ::-                    (MonadIO m, IsEventTarget self, ToJSString type') =>-                      self -> type' -> Maybe EventListener -> Bool -> m ()-removeEventListener self type' listener useCapture-  = liftIO-      (js_removeEventListener (toEventTarget self) (toJSString type')-         (maybeToNullable listener)-         useCapture)- -foreign import javascript unsafe-        "($1[\"dispatchEvent\"]($2) ? 1 : 0)" js_dispatchEvent ::-        EventTarget -> Nullable Event -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/EventTarget.dispatchEvent Mozilla EventTarget.dispatchEvent documentation> -dispatchEvent ::-              (MonadIO m, IsEventTarget self, IsEvent event) =>-                self -> Maybe event -> m Bool-dispatchEvent self event-  = liftIO-      (js_dispatchEvent (toEventTarget self)-         (maybeToNullable (fmap toEvent event)))

− src/GHCJS/DOM/JSFFI/Generated/File.hs

@@ -1,34 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.File-       (js_getName, getName, js_getLastModifiedDate, getLastModifiedDate,-        File, castToFile, gTypeFile)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"name\"]" js_getName ::-        File -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/File.name Mozilla File.name documentation> -getName :: (MonadIO m, FromJSString result) => File -> m result-getName self = liftIO (fromJSString <$> (js_getName (self)))- -foreign import javascript unsafe "$1[\"lastModifiedDate\"]"-        js_getLastModifiedDate :: File -> IO (Nullable Date)---- | <https://developer.mozilla.org/en-US/docs/Web/API/File.lastModifiedDate Mozilla File.lastModifiedDate documentation> -getLastModifiedDate :: (MonadIO m) => File -> m (Maybe Date)-getLastModifiedDate self-  = liftIO (nullableToMaybe <$> (js_getLastModifiedDate (self)))

− src/GHCJS/DOM/JSFFI/Generated/FileError.hs

@@ -1,43 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.FileError-       (pattern NOT_FOUND_ERR, pattern SECURITY_ERR, pattern ABORT_ERR,-        pattern NOT_READABLE_ERR, pattern ENCODING_ERR,-        pattern NO_MODIFICATION_ALLOWED_ERR, pattern INVALID_STATE_ERR,-        pattern SYNTAX_ERR, pattern INVALID_MODIFICATION_ERR,-        pattern QUOTA_EXCEEDED_ERR, pattern TYPE_MISMATCH_ERR,-        pattern PATH_EXISTS_ERR, js_getCode, getCode, FileError,-        castToFileError, gTypeFileError)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums-pattern NOT_FOUND_ERR = 1-pattern SECURITY_ERR = 2-pattern ABORT_ERR = 3-pattern NOT_READABLE_ERR = 4-pattern ENCODING_ERR = 5-pattern NO_MODIFICATION_ALLOWED_ERR = 6-pattern INVALID_STATE_ERR = 7-pattern SYNTAX_ERR = 8-pattern INVALID_MODIFICATION_ERR = 9-pattern QUOTA_EXCEEDED_ERR = 10-pattern TYPE_MISMATCH_ERR = 11-pattern PATH_EXISTS_ERR = 12- -foreign import javascript unsafe "$1[\"code\"]" js_getCode ::-        FileError -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/FileError.code Mozilla FileError.code documentation> -getCode :: (MonadIO m) => FileError -> m Word-getCode self = liftIO (js_getCode (self))

− src/GHCJS/DOM/JSFFI/Generated/FileList.hs

@@ -1,34 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.FileList-       (js_item, item, js_getLength, getLength, FileList, castToFileList,-        gTypeFileList)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"item\"]($2)" js_item ::-        FileList -> Word -> IO (Nullable File)---- | <https://developer.mozilla.org/en-US/docs/Web/API/FileList.item Mozilla FileList.item documentation> -item :: (MonadIO m) => FileList -> Word -> m (Maybe File)-item self index-  = liftIO (nullableToMaybe <$> (js_item (self) index))- -foreign import javascript unsafe "$1[\"length\"]" js_getLength ::-        FileList -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/FileList.length Mozilla FileList.length documentation> -getLength :: (MonadIO m) => FileList -> m Word-getLength self = liftIO (js_getLength (self))

− src/GHCJS/DOM/JSFFI/Generated/FileReader.hs

@@ -1,128 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.FileReader-       (js_newFileReader, newFileReader, js_readAsArrayBuffer,-        readAsArrayBuffer, js_readAsBinaryString, readAsBinaryString,-        js_readAsText, readAsText, js_readAsDataURL, readAsDataURL,-        js_abort, abort, pattern EMPTY, pattern LOADING, pattern DONE,-        js_getReadyState, getReadyState, js_getResult, getResult,-        js_getError, getError, loadStart, progress, load, abortEvent,-        error, loadEnd, FileReader, castToFileReader, gTypeFileReader)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "new window[\"FileReader\"]()"-        js_newFileReader :: IO FileReader---- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReader Mozilla FileReader documentation> -newFileReader :: (MonadIO m) => m FileReader-newFileReader = liftIO (js_newFileReader)- -foreign import javascript unsafe "$1[\"readAsArrayBuffer\"]($2)"-        js_readAsArrayBuffer :: FileReader -> Nullable Blob -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReader.readAsArrayBuffer Mozilla FileReader.readAsArrayBuffer documentation> -readAsArrayBuffer ::-                  (MonadIO m, IsBlob blob) => FileReader -> Maybe blob -> m ()-readAsArrayBuffer self blob-  = liftIO-      (js_readAsArrayBuffer (self) (maybeToNullable (fmap toBlob blob)))- -foreign import javascript unsafe "$1[\"readAsBinaryString\"]($2)"-        js_readAsBinaryString :: FileReader -> Nullable Blob -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReader.readAsBinaryString Mozilla FileReader.readAsBinaryString documentation> -readAsBinaryString ::-                   (MonadIO m, IsBlob blob) => FileReader -> Maybe blob -> m ()-readAsBinaryString self blob-  = liftIO-      (js_readAsBinaryString (self) (maybeToNullable (fmap toBlob blob)))- -foreign import javascript unsafe "$1[\"readAsText\"]($2, $3)"-        js_readAsText :: FileReader -> Nullable Blob -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReader.readAsText Mozilla FileReader.readAsText documentation> -readAsText ::-           (MonadIO m, IsBlob blob, ToJSString encoding) =>-             FileReader -> Maybe blob -> encoding -> m ()-readAsText self blob encoding-  = liftIO-      (js_readAsText (self) (maybeToNullable (fmap toBlob blob))-         (toJSString encoding))- -foreign import javascript unsafe "$1[\"readAsDataURL\"]($2)"-        js_readAsDataURL :: FileReader -> Nullable Blob -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReader.readAsDataURL Mozilla FileReader.readAsDataURL documentation> -readAsDataURL ::-              (MonadIO m, IsBlob blob) => FileReader -> Maybe blob -> m ()-readAsDataURL self blob-  = liftIO-      (js_readAsDataURL (self) (maybeToNullable (fmap toBlob blob)))- -foreign import javascript unsafe "$1[\"abort\"]()" js_abort ::-        FileReader -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReader.abort Mozilla FileReader.abort documentation> -abort :: (MonadIO m) => FileReader -> m ()-abort self = liftIO (js_abort (self))-pattern EMPTY = 0-pattern LOADING = 1-pattern DONE = 2- -foreign import javascript unsafe "$1[\"readyState\"]"-        js_getReadyState :: FileReader -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReader.readyState Mozilla FileReader.readyState documentation> -getReadyState :: (MonadIO m) => FileReader -> m Word-getReadyState self = liftIO (js_getReadyState (self))- -foreign import javascript unsafe "$1[\"result\"]" js_getResult ::-        FileReader -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReader.result Mozilla FileReader.result documentation> -getResult :: (MonadIO m) => FileReader -> m JSVal-getResult self = liftIO (js_getResult (self))- -foreign import javascript unsafe "$1[\"error\"]" js_getError ::-        FileReader -> IO (Nullable FileError)---- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReader.error Mozilla FileReader.error documentation> -getError :: (MonadIO m) => FileReader -> m (Maybe FileError)-getError self = liftIO (nullableToMaybe <$> (js_getError (self)))---- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReader.onloadstart Mozilla FileReader.onloadstart documentation> -loadStart :: EventName FileReader ProgressEvent-loadStart = unsafeEventName (toJSString "loadstart")---- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReader.onprogress Mozilla FileReader.onprogress documentation> -progress :: EventName FileReader ProgressEvent-progress = unsafeEventName (toJSString "progress")---- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReader.onload Mozilla FileReader.onload documentation> -load :: EventName FileReader UIEvent-load = unsafeEventName (toJSString "load")---- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReader.onabort Mozilla FileReader.onabort documentation> -abortEvent :: EventName FileReader UIEvent-abortEvent = unsafeEventName (toJSString "abort")---- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReader.onerror Mozilla FileReader.onerror documentation> -error :: EventName FileReader UIEvent-error = unsafeEventName (toJSString "error")---- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReader.onloadend Mozilla FileReader.onloadend documentation> -loadEnd :: EventName FileReader ProgressEvent-loadEnd = unsafeEventName (toJSString "loadend")

− src/GHCJS/DOM/JSFFI/Generated/FileReaderSync.hs

@@ -1,82 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.FileReaderSync-       (js_newFileReaderSync, newFileReaderSync, js_readAsArrayBuffer,-        readAsArrayBuffer, js_readAsBinaryString, readAsBinaryString,-        js_readAsText, readAsText, js_readAsDataURL, readAsDataURL,-        FileReaderSync, castToFileReaderSync, gTypeFileReaderSync)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "new window[\"FileReaderSync\"]()"-        js_newFileReaderSync :: IO FileReaderSync---- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReaderSync Mozilla FileReaderSync documentation> -newFileReaderSync :: (MonadIO m) => m FileReaderSync-newFileReaderSync = liftIO (js_newFileReaderSync)- -foreign import javascript unsafe "$1[\"readAsArrayBuffer\"]($2)"-        js_readAsArrayBuffer ::-        FileReaderSync -> Nullable Blob -> IO (Nullable ArrayBuffer)---- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReaderSync.readAsArrayBuffer Mozilla FileReaderSync.readAsArrayBuffer documentation> -readAsArrayBuffer ::-                  (MonadIO m, IsBlob blob) =>-                    FileReaderSync -> Maybe blob -> m (Maybe ArrayBuffer)-readAsArrayBuffer self blob-  = liftIO-      (nullableToMaybe <$>-         (js_readAsArrayBuffer (self) (maybeToNullable (fmap toBlob blob))))- -foreign import javascript unsafe "$1[\"readAsBinaryString\"]($2)"-        js_readAsBinaryString ::-        FileReaderSync -> Nullable Blob -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReaderSync.readAsBinaryString Mozilla FileReaderSync.readAsBinaryString documentation> -readAsBinaryString ::-                   (MonadIO m, IsBlob blob, FromJSString result) =>-                     FileReaderSync -> Maybe blob -> m result-readAsBinaryString self blob-  = liftIO-      (fromJSString <$>-         (js_readAsBinaryString (self)-            (maybeToNullable (fmap toBlob blob))))- -foreign import javascript unsafe "$1[\"readAsText\"]($2, $3)"-        js_readAsText ::-        FileReaderSync -> Nullable Blob -> JSString -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReaderSync.readAsText Mozilla FileReaderSync.readAsText documentation> -readAsText ::-           (MonadIO m, IsBlob blob, ToJSString encoding,-            FromJSString result) =>-             FileReaderSync -> Maybe blob -> encoding -> m result-readAsText self blob encoding-  = liftIO-      (fromJSString <$>-         (js_readAsText (self) (maybeToNullable (fmap toBlob blob))-            (toJSString encoding)))- -foreign import javascript unsafe "$1[\"readAsDataURL\"]($2)"-        js_readAsDataURL :: FileReaderSync -> Nullable Blob -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReaderSync.readAsDataURL Mozilla FileReaderSync.readAsDataURL documentation> -readAsDataURL ::-              (MonadIO m, IsBlob blob, FromJSString result) =>-                FileReaderSync -> Maybe blob -> m result-readAsDataURL self blob-  = liftIO-      (fromJSString <$>-         (js_readAsDataURL (self) (maybeToNullable (fmap toBlob blob))))

− src/GHCJS/DOM/JSFFI/Generated/FocusEvent.hs

@@ -1,28 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.FocusEvent-       (js_getRelatedTarget, getRelatedTarget, FocusEvent,-        castToFocusEvent, gTypeFocusEvent)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"relatedTarget\"]"-        js_getRelatedTarget :: FocusEvent -> IO (Nullable EventTarget)---- | <https://developer.mozilla.org/en-US/docs/Web/API/FocusEvent.relatedTarget Mozilla FocusEvent.relatedTarget documentation> -getRelatedTarget ::-                 (MonadIO m) => FocusEvent -> m (Maybe EventTarget)-getRelatedTarget self-  = liftIO (nullableToMaybe <$> (js_getRelatedTarget (self)))

− src/GHCJS/DOM/JSFFI/Generated/FontLoader.hs

@@ -1,81 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.FontLoader-       (js_checkFont, checkFont, js_loadFont, loadFont,-        js_notifyWhenFontsReady, notifyWhenFontsReady, loading,-        loadingDone, loadStart, load, error, js_getLoading, getLoading,-        FontLoader, castToFontLoader, gTypeFontLoader)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe-        "($1[\"checkFont\"]($2,\n$3) ? 1 : 0)" js_checkFont ::-        FontLoader -> JSString -> JSString -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/FontLoader.checkFont Mozilla FontLoader.checkFont documentation> -checkFont ::-          (MonadIO m, ToJSString font, ToJSString text) =>-            FontLoader -> font -> text -> m Bool-checkFont self font text-  = liftIO (js_checkFont (self) (toJSString font) (toJSString text))- -foreign import javascript unsafe "$1[\"loadFont\"]($2)" js_loadFont-        :: FontLoader -> Nullable Dictionary -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/FontLoader.loadFont Mozilla FontLoader.loadFont documentation> -loadFont ::-         (MonadIO m, IsDictionary params) =>-           FontLoader -> Maybe params -> m ()-loadFont self params-  = liftIO-      (js_loadFont (self) (maybeToNullable (fmap toDictionary params)))- -foreign import javascript unsafe "$1[\"notifyWhenFontsReady\"]($2)"-        js_notifyWhenFontsReady ::-        FontLoader -> Nullable VoidCallback -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/FontLoader.notifyWhenFontsReady Mozilla FontLoader.notifyWhenFontsReady documentation> -notifyWhenFontsReady ::-                     (MonadIO m) => FontLoader -> Maybe VoidCallback -> m ()-notifyWhenFontsReady self callback-  = liftIO-      (js_notifyWhenFontsReady (self) (maybeToNullable callback))---- | <https://developer.mozilla.org/en-US/docs/Web/API/FontLoader.onloading Mozilla FontLoader.onloading documentation> -loading :: EventName FontLoader Event-loading = unsafeEventName (toJSString "loading")---- | <https://developer.mozilla.org/en-US/docs/Web/API/FontLoader.onloadingdone Mozilla FontLoader.onloadingdone documentation> -loadingDone :: EventName FontLoader Event-loadingDone = unsafeEventName (toJSString "loadingdone")---- | <https://developer.mozilla.org/en-US/docs/Web/API/FontLoader.onloadstart Mozilla FontLoader.onloadstart documentation> -loadStart :: EventName FontLoader ProgressEvent-loadStart = unsafeEventName (toJSString "loadstart")---- | <https://developer.mozilla.org/en-US/docs/Web/API/FontLoader.onload Mozilla FontLoader.onload documentation> -load :: EventName FontLoader UIEvent-load = unsafeEventName (toJSString "load")---- | <https://developer.mozilla.org/en-US/docs/Web/API/FontLoader.onerror Mozilla FontLoader.onerror documentation> -error :: EventName FontLoader UIEvent-error = unsafeEventName (toJSString "error")- -foreign import javascript unsafe "($1[\"loading\"] ? 1 : 0)"-        js_getLoading :: FontLoader -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/FontLoader.loading Mozilla FontLoader.loading documentation> -getLoading :: (MonadIO m) => FontLoader -> m Bool-getLoading self = liftIO (js_getLoading (self))

− src/GHCJS/DOM/JSFFI/Generated/FormData.hs

@@ -1,39 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.FormData-       (js_newFormData, newFormData, js_append, append, FormData,-        castToFormData, gTypeFormData)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "new window[\"FormData\"]($1)"-        js_newFormData :: Nullable HTMLFormElement -> IO FormData---- | <https://developer.mozilla.org/en-US/docs/Web/API/FormData Mozilla FormData documentation> -newFormData :: (MonadIO m) => Maybe HTMLFormElement -> m FormData-newFormData form = liftIO (js_newFormData (maybeToNullable form))- -foreign import javascript unsafe "$1[\"append\"]($2, $3, $4)"-        js_append :: FormData -> JSString -> JSString -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/FormData.append Mozilla FormData.append documentation> -append ::-       (MonadIO m, ToJSString name, ToJSString value,-        ToJSString filename) =>-         FormData -> name -> value -> filename -> m ()-append self name value filename-  = liftIO-      (js_append (self) (toJSString name) (toJSString value)-         (toJSString filename))

− src/GHCJS/DOM/JSFFI/Generated/GainNode.hs

@@ -1,25 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.GainNode-       (js_getGain, getGain, GainNode, castToGainNode, gTypeGainNode)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"gain\"]" js_getGain ::-        GainNode -> IO (Nullable AudioParam)---- | <https://developer.mozilla.org/en-US/docs/Web/API/GainNode.gain Mozilla GainNode.gain documentation> -getGain :: (MonadIO m) => GainNode -> m (Maybe AudioParam)-getGain self = liftIO (nullableToMaybe <$> (js_getGain (self)))

− src/GHCJS/DOM/JSFFI/Generated/Gamepad.hs

@@ -1,72 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.Gamepad-       (js_getId, getId, js_getIndex, getIndex, js_getConnected,-        getConnected, js_getTimestamp, getTimestamp, js_getMapping,-        getMapping, js_getAxes, getAxes, js_getButtons, getButtons,-        Gamepad, castToGamepad, gTypeGamepad)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"id\"]" js_getId ::-        Gamepad -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/Gamepad.id Mozilla Gamepad.id documentation> -getId :: (MonadIO m, FromJSString result) => Gamepad -> m result-getId self = liftIO (fromJSString <$> (js_getId (self)))- -foreign import javascript unsafe "$1[\"index\"]" js_getIndex ::-        Gamepad -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/Gamepad.index Mozilla Gamepad.index documentation> -getIndex :: (MonadIO m) => Gamepad -> m Word-getIndex self = liftIO (js_getIndex (self))- -foreign import javascript unsafe "($1[\"connected\"] ? 1 : 0)"-        js_getConnected :: Gamepad -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/Gamepad.connected Mozilla Gamepad.connected documentation> -getConnected :: (MonadIO m) => Gamepad -> m Bool-getConnected self = liftIO (js_getConnected (self))- -foreign import javascript unsafe "$1[\"timestamp\"]"-        js_getTimestamp :: Gamepad -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/Gamepad.timestamp Mozilla Gamepad.timestamp documentation> -getTimestamp :: (MonadIO m) => Gamepad -> m Double-getTimestamp self = liftIO (js_getTimestamp (self))- -foreign import javascript unsafe "$1[\"mapping\"]" js_getMapping ::-        Gamepad -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/Gamepad.mapping Mozilla Gamepad.mapping documentation> -getMapping ::-           (MonadIO m, FromJSString result) => Gamepad -> m result-getMapping self = liftIO (fromJSString <$> (js_getMapping (self)))- -foreign import javascript unsafe "$1[\"axes\"]" js_getAxes ::-        Gamepad -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/Gamepad.axes Mozilla Gamepad.axes documentation> -getAxes :: (MonadIO m) => Gamepad -> m [Double]-getAxes self = liftIO ((js_getAxes (self)) >>= fromJSValUnchecked)- -foreign import javascript unsafe "$1[\"buttons\"]" js_getButtons ::-        Gamepad -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/Gamepad.buttons Mozilla Gamepad.buttons documentation> -getButtons :: (MonadIO m) => Gamepad -> m [Maybe GamepadButton]-getButtons self-  = liftIO ((js_getButtons (self)) >>= fromJSValUnchecked)

− src/GHCJS/DOM/JSFFI/Generated/GamepadButton.hs

@@ -1,33 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.GamepadButton-       (js_getPressed, getPressed, js_getValue, getValue, GamepadButton,-        castToGamepadButton, gTypeGamepadButton)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "($1[\"pressed\"] ? 1 : 0)"-        js_getPressed :: GamepadButton -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/GamepadButton.pressed Mozilla GamepadButton.pressed documentation> -getPressed :: (MonadIO m) => GamepadButton -> m Bool-getPressed self = liftIO (js_getPressed (self))- -foreign import javascript unsafe "$1[\"value\"]" js_getValue ::-        GamepadButton -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/GamepadButton.value Mozilla GamepadButton.value documentation> -getValue :: (MonadIO m) => GamepadButton -> m Double-getValue self = liftIO (js_getValue (self))

− src/GHCJS/DOM/JSFFI/Generated/GamepadEvent.hs

@@ -1,27 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.GamepadEvent-       (js_getGamepad, getGamepad, GamepadEvent, castToGamepadEvent,-        gTypeGamepadEvent)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"gamepad\"]" js_getGamepad ::-        GamepadEvent -> IO (Nullable Gamepad)---- | <https://developer.mozilla.org/en-US/docs/Web/API/GamepadEvent.gamepad Mozilla GamepadEvent.gamepad documentation> -getGamepad :: (MonadIO m) => GamepadEvent -> m (Maybe Gamepad)-getGamepad self-  = liftIO (nullableToMaybe <$> (js_getGamepad (self)))

− src/GHCJS/DOM/JSFFI/Generated/Geolocation.hs

@@ -1,64 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.Geolocation-       (js_getCurrentPosition, getCurrentPosition, js_watchPosition,-        watchPosition, js_clearWatch, clearWatch, Geolocation,-        castToGeolocation, gTypeGeolocation)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe-        "$1[\"getCurrentPosition\"]($2, $3,\n$4)" js_getCurrentPosition ::-        Geolocation ->-          Nullable PositionCallback ->-            Nullable PositionErrorCallback -> Nullable PositionOptions -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Geolocation.getCurrentPosition Mozilla Geolocation.getCurrentPosition documentation> -getCurrentPosition ::-                   (MonadIO m, IsPositionOptions options) =>-                     Geolocation ->-                       Maybe PositionCallback ->-                         Maybe PositionErrorCallback -> Maybe options -> m ()-getCurrentPosition self successCallback errorCallback options-  = liftIO-      (js_getCurrentPosition (self) (maybeToNullable successCallback)-         (maybeToNullable errorCallback)-         (maybeToNullable (fmap toPositionOptions options)))- -foreign import javascript unsafe-        "$1[\"watchPosition\"]($2, $3, $4)" js_watchPosition ::-        Geolocation ->-          Nullable PositionCallback ->-            Nullable PositionErrorCallback ->-              Nullable PositionOptions -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/Geolocation.watchPosition Mozilla Geolocation.watchPosition documentation> -watchPosition ::-              (MonadIO m, IsPositionOptions options) =>-                Geolocation ->-                  Maybe PositionCallback ->-                    Maybe PositionErrorCallback -> Maybe options -> m Int-watchPosition self successCallback errorCallback options-  = liftIO-      (js_watchPosition (self) (maybeToNullable successCallback)-         (maybeToNullable errorCallback)-         (maybeToNullable (fmap toPositionOptions options)))- -foreign import javascript unsafe "$1[\"clearWatch\"]($2)"-        js_clearWatch :: Geolocation -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/Geolocation.clearWatch Mozilla Geolocation.clearWatch documentation> -clearWatch :: (MonadIO m) => Geolocation -> Int -> m ()-clearWatch self watchID = liftIO (js_clearWatch (self) watchID)

− src/GHCJS/DOM/JSFFI/Generated/Geoposition.hs

@@ -1,33 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.Geoposition-       (js_getCoords, getCoords, js_getTimestamp, getTimestamp,-        Geoposition, castToGeoposition, gTypeGeoposition)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"coords\"]" js_getCoords ::-        Geoposition -> IO (Nullable Coordinates)---- | <https://developer.mozilla.org/en-US/docs/Web/API/Geoposition.coords Mozilla Geoposition.coords documentation> -getCoords :: (MonadIO m) => Geoposition -> m (Maybe Coordinates)-getCoords self = liftIO (nullableToMaybe <$> (js_getCoords (self)))- -foreign import javascript unsafe "$1[\"timestamp\"]"-        js_getTimestamp :: Geoposition -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/Geoposition.timestamp Mozilla Geoposition.timestamp documentation> -getTimestamp :: (MonadIO m) => Geoposition -> m Word-getTimestamp self = liftIO (js_getTimestamp (self))

− src/GHCJS/DOM/JSFFI/Generated/HTMLAllCollection.hs

@@ -1,56 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLAllCollection-       (js_item, item, js_namedItem, namedItem, js_tags, tags,-        js_getLength, getLength, HTMLAllCollection,-        castToHTMLAllCollection, gTypeHTMLAllCollection)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"item\"]($2)" js_item ::-        HTMLAllCollection -> Word -> IO (Nullable Node)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAllCollection.item Mozilla HTMLAllCollection.item documentation> -item :: (MonadIO m) => HTMLAllCollection -> Word -> m (Maybe Node)-item self index-  = liftIO (nullableToMaybe <$> (js_item (self) index))- -foreign import javascript unsafe "$1[\"namedItem\"]($2)"-        js_namedItem :: HTMLAllCollection -> JSString -> IO (Nullable Node)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAllCollection.namedItem Mozilla HTMLAllCollection.namedItem documentation> -namedItem ::-          (MonadIO m, ToJSString name) =>-            HTMLAllCollection -> name -> m (Maybe Node)-namedItem self name-  = liftIO-      (nullableToMaybe <$> (js_namedItem (self) (toJSString name)))- -foreign import javascript unsafe "$1[\"tags\"]($2)" js_tags ::-        HTMLAllCollection -> JSString -> IO (Nullable NodeList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAllCollection.tags Mozilla HTMLAllCollection.tags documentation> -tags ::-     (MonadIO m, ToJSString name) =>-       HTMLAllCollection -> name -> m (Maybe NodeList)-tags self name-  = liftIO (nullableToMaybe <$> (js_tags (self) (toJSString name)))- -foreign import javascript unsafe "$1[\"length\"]" js_getLength ::-        HTMLAllCollection -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAllCollection.length Mozilla HTMLAllCollection.length documentation> -getLength :: (MonadIO m) => HTMLAllCollection -> m Word-getLength self = liftIO (js_getLength (self))

− src/GHCJS/DOM/JSFFI/Generated/HTMLAnchorElement.hs

@@ -1,409 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLAnchorElement-       (js_toString, toString, js_setCharset, setCharset, js_getCharset,-        getCharset, js_setCoords, setCoords, js_getCoords, getCoords,-        js_setDownload, setDownload, js_getDownload, getDownload,-        js_setHref, setHref, js_getHref, getHref, js_setHreflang,-        setHreflang, js_getHreflang, getHreflang, js_setName, setName,-        js_getName, getName, js_setPing, setPing, js_getPing, getPing,-        js_setRel, setRel, js_getRel, getRel, js_setRev, setRev, js_getRev,-        getRev, js_setShape, setShape, js_getShape, getShape, js_setTarget,-        setTarget, js_getTarget, getTarget, js_setType, setType,-        js_getType, getType, js_setHash, setHash, js_getHash, getHash,-        js_setHost, setHost, js_getHost, getHost, js_setHostname,-        setHostname, js_getHostname, getHostname, js_setPathname,-        setPathname, js_getPathname, getPathname, js_setPort, setPort,-        js_getPort, getPort, js_setProtocol, setProtocol, js_getProtocol,-        getProtocol, js_setSearch, setSearch, js_getSearch, getSearch,-        js_getOrigin, getOrigin, js_setText, setText, js_getText, getText,-        js_getRelList, getRelList, HTMLAnchorElement,-        castToHTMLAnchorElement, gTypeHTMLAnchorElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"toString\"]()" js_toString-        :: HTMLAnchorElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.toString Mozilla HTMLAnchorElement.toString documentation> -toString ::-         (MonadIO m, FromJSString result) => HTMLAnchorElement -> m result-toString self = liftIO (fromJSString <$> (js_toString (self)))- -foreign import javascript unsafe "$1[\"charset\"] = $2;"-        js_setCharset :: HTMLAnchorElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.charset Mozilla HTMLAnchorElement.charset documentation> -setCharset ::-           (MonadIO m, ToJSString val) => HTMLAnchorElement -> val -> m ()-setCharset self val-  = liftIO (js_setCharset (self) (toJSString val))- -foreign import javascript unsafe "$1[\"charset\"]" js_getCharset ::-        HTMLAnchorElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.charset Mozilla HTMLAnchorElement.charset documentation> -getCharset ::-           (MonadIO m, FromJSString result) => HTMLAnchorElement -> m result-getCharset self = liftIO (fromJSString <$> (js_getCharset (self)))- -foreign import javascript unsafe "$1[\"coords\"] = $2;"-        js_setCoords :: HTMLAnchorElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.coords Mozilla HTMLAnchorElement.coords documentation> -setCoords ::-          (MonadIO m, ToJSString val) => HTMLAnchorElement -> val -> m ()-setCoords self val = liftIO (js_setCoords (self) (toJSString val))- -foreign import javascript unsafe "$1[\"coords\"]" js_getCoords ::-        HTMLAnchorElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.coords Mozilla HTMLAnchorElement.coords documentation> -getCoords ::-          (MonadIO m, FromJSString result) => HTMLAnchorElement -> m result-getCoords self = liftIO (fromJSString <$> (js_getCoords (self)))- -foreign import javascript unsafe "$1[\"download\"] = $2;"-        js_setDownload :: HTMLAnchorElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.download Mozilla HTMLAnchorElement.download documentation> -setDownload ::-            (MonadIO m, ToJSString val) => HTMLAnchorElement -> val -> m ()-setDownload self val-  = liftIO (js_setDownload (self) (toJSString val))- -foreign import javascript unsafe "$1[\"download\"]" js_getDownload-        :: HTMLAnchorElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.download Mozilla HTMLAnchorElement.download documentation> -getDownload ::-            (MonadIO m, FromJSString result) => HTMLAnchorElement -> m result-getDownload self-  = liftIO (fromJSString <$> (js_getDownload (self)))- -foreign import javascript unsafe "$1[\"href\"] = $2;" js_setHref ::-        HTMLAnchorElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.href Mozilla HTMLAnchorElement.href documentation> -setHref ::-        (MonadIO m, ToJSString val) => HTMLAnchorElement -> val -> m ()-setHref self val = liftIO (js_setHref (self) (toJSString val))- -foreign import javascript unsafe "$1[\"href\"]" js_getHref ::-        HTMLAnchorElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.href Mozilla HTMLAnchorElement.href documentation> -getHref ::-        (MonadIO m, FromJSString result) => HTMLAnchorElement -> m result-getHref self = liftIO (fromJSString <$> (js_getHref (self)))- -foreign import javascript unsafe "$1[\"hreflang\"] = $2;"-        js_setHreflang :: HTMLAnchorElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.hreflang Mozilla HTMLAnchorElement.hreflang documentation> -setHreflang ::-            (MonadIO m, ToJSString val) => HTMLAnchorElement -> val -> m ()-setHreflang self val-  = liftIO (js_setHreflang (self) (toJSString val))- -foreign import javascript unsafe "$1[\"hreflang\"]" js_getHreflang-        :: HTMLAnchorElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.hreflang Mozilla HTMLAnchorElement.hreflang documentation> -getHreflang ::-            (MonadIO m, FromJSString result) => HTMLAnchorElement -> m result-getHreflang self-  = liftIO (fromJSString <$> (js_getHreflang (self)))- -foreign import javascript unsafe "$1[\"name\"] = $2;" js_setName ::-        HTMLAnchorElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.name Mozilla HTMLAnchorElement.name documentation> -setName ::-        (MonadIO m, ToJSString val) => HTMLAnchorElement -> val -> m ()-setName self val = liftIO (js_setName (self) (toJSString val))- -foreign import javascript unsafe "$1[\"name\"]" js_getName ::-        HTMLAnchorElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.name Mozilla HTMLAnchorElement.name documentation> -getName ::-        (MonadIO m, FromJSString result) => HTMLAnchorElement -> m result-getName self = liftIO (fromJSString <$> (js_getName (self)))- -foreign import javascript unsafe "$1[\"ping\"] = $2;" js_setPing ::-        HTMLAnchorElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.ping Mozilla HTMLAnchorElement.ping documentation> -setPing ::-        (MonadIO m, ToJSString val) => HTMLAnchorElement -> val -> m ()-setPing self val = liftIO (js_setPing (self) (toJSString val))- -foreign import javascript unsafe "$1[\"ping\"]" js_getPing ::-        HTMLAnchorElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.ping Mozilla HTMLAnchorElement.ping documentation> -getPing ::-        (MonadIO m, FromJSString result) => HTMLAnchorElement -> m result-getPing self = liftIO (fromJSString <$> (js_getPing (self)))- -foreign import javascript unsafe "$1[\"rel\"] = $2;" js_setRel ::-        HTMLAnchorElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.rel Mozilla HTMLAnchorElement.rel documentation> -setRel ::-       (MonadIO m, ToJSString val) => HTMLAnchorElement -> val -> m ()-setRel self val = liftIO (js_setRel (self) (toJSString val))- -foreign import javascript unsafe "$1[\"rel\"]" js_getRel ::-        HTMLAnchorElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.rel Mozilla HTMLAnchorElement.rel documentation> -getRel ::-       (MonadIO m, FromJSString result) => HTMLAnchorElement -> m result-getRel self = liftIO (fromJSString <$> (js_getRel (self)))- -foreign import javascript unsafe "$1[\"rev\"] = $2;" js_setRev ::-        HTMLAnchorElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.rev Mozilla HTMLAnchorElement.rev documentation> -setRev ::-       (MonadIO m, ToJSString val) => HTMLAnchorElement -> val -> m ()-setRev self val = liftIO (js_setRev (self) (toJSString val))- -foreign import javascript unsafe "$1[\"rev\"]" js_getRev ::-        HTMLAnchorElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.rev Mozilla HTMLAnchorElement.rev documentation> -getRev ::-       (MonadIO m, FromJSString result) => HTMLAnchorElement -> m result-getRev self = liftIO (fromJSString <$> (js_getRev (self)))- -foreign import javascript unsafe "$1[\"shape\"] = $2;" js_setShape-        :: HTMLAnchorElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.shape Mozilla HTMLAnchorElement.shape documentation> -setShape ::-         (MonadIO m, ToJSString val) => HTMLAnchorElement -> val -> m ()-setShape self val = liftIO (js_setShape (self) (toJSString val))- -foreign import javascript unsafe "$1[\"shape\"]" js_getShape ::-        HTMLAnchorElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.shape Mozilla HTMLAnchorElement.shape documentation> -getShape ::-         (MonadIO m, FromJSString result) => HTMLAnchorElement -> m result-getShape self = liftIO (fromJSString <$> (js_getShape (self)))- -foreign import javascript unsafe "$1[\"target\"] = $2;"-        js_setTarget :: HTMLAnchorElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.target Mozilla HTMLAnchorElement.target documentation> -setTarget ::-          (MonadIO m, ToJSString val) => HTMLAnchorElement -> val -> m ()-setTarget self val = liftIO (js_setTarget (self) (toJSString val))- -foreign import javascript unsafe "$1[\"target\"]" js_getTarget ::-        HTMLAnchorElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.target Mozilla HTMLAnchorElement.target documentation> -getTarget ::-          (MonadIO m, FromJSString result) => HTMLAnchorElement -> m result-getTarget self = liftIO (fromJSString <$> (js_getTarget (self)))- -foreign import javascript unsafe "$1[\"type\"] = $2;" js_setType ::-        HTMLAnchorElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.type Mozilla HTMLAnchorElement.type documentation> -setType ::-        (MonadIO m, ToJSString val) => HTMLAnchorElement -> val -> m ()-setType self val = liftIO (js_setType (self) (toJSString val))- -foreign import javascript unsafe "$1[\"type\"]" js_getType ::-        HTMLAnchorElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.type Mozilla HTMLAnchorElement.type documentation> -getType ::-        (MonadIO m, FromJSString result) => HTMLAnchorElement -> m result-getType self = liftIO (fromJSString <$> (js_getType (self)))- -foreign import javascript unsafe "$1[\"hash\"] = $2;" js_setHash ::-        HTMLAnchorElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.hash Mozilla HTMLAnchorElement.hash documentation> -setHash ::-        (MonadIO m, ToJSString val) =>-          HTMLAnchorElement -> Maybe val -> m ()-setHash self val = liftIO (js_setHash (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"hash\"]" js_getHash ::-        HTMLAnchorElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.hash Mozilla HTMLAnchorElement.hash documentation> -getHash ::-        (MonadIO m, FromJSString result) =>-          HTMLAnchorElement -> m (Maybe result)-getHash self = liftIO (fromMaybeJSString <$> (js_getHash (self)))- -foreign import javascript unsafe "$1[\"host\"] = $2;" js_setHost ::-        HTMLAnchorElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.host Mozilla HTMLAnchorElement.host documentation> -setHost ::-        (MonadIO m, ToJSString val) =>-          HTMLAnchorElement -> Maybe val -> m ()-setHost self val = liftIO (js_setHost (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"host\"]" js_getHost ::-        HTMLAnchorElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.host Mozilla HTMLAnchorElement.host documentation> -getHost ::-        (MonadIO m, FromJSString result) =>-          HTMLAnchorElement -> m (Maybe result)-getHost self = liftIO (fromMaybeJSString <$> (js_getHost (self)))- -foreign import javascript unsafe "$1[\"hostname\"] = $2;"-        js_setHostname :: HTMLAnchorElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.hostname Mozilla HTMLAnchorElement.hostname documentation> -setHostname ::-            (MonadIO m, ToJSString val) =>-              HTMLAnchorElement -> Maybe val -> m ()-setHostname self val-  = liftIO (js_setHostname (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"hostname\"]" js_getHostname-        :: HTMLAnchorElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.hostname Mozilla HTMLAnchorElement.hostname documentation> -getHostname ::-            (MonadIO m, FromJSString result) =>-              HTMLAnchorElement -> m (Maybe result)-getHostname self-  = liftIO (fromMaybeJSString <$> (js_getHostname (self)))- -foreign import javascript unsafe "$1[\"pathname\"] = $2;"-        js_setPathname :: HTMLAnchorElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.pathname Mozilla HTMLAnchorElement.pathname documentation> -setPathname ::-            (MonadIO m, ToJSString val) =>-              HTMLAnchorElement -> Maybe val -> m ()-setPathname self val-  = liftIO (js_setPathname (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"pathname\"]" js_getPathname-        :: HTMLAnchorElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.pathname Mozilla HTMLAnchorElement.pathname documentation> -getPathname ::-            (MonadIO m, FromJSString result) =>-              HTMLAnchorElement -> m (Maybe result)-getPathname self-  = liftIO (fromMaybeJSString <$> (js_getPathname (self)))- -foreign import javascript unsafe "$1[\"port\"] = $2;" js_setPort ::-        HTMLAnchorElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.port Mozilla HTMLAnchorElement.port documentation> -setPort ::-        (MonadIO m, ToJSString val) =>-          HTMLAnchorElement -> Maybe val -> m ()-setPort self val = liftIO (js_setPort (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"port\"]" js_getPort ::-        HTMLAnchorElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.port Mozilla HTMLAnchorElement.port documentation> -getPort ::-        (MonadIO m, FromJSString result) =>-          HTMLAnchorElement -> m (Maybe result)-getPort self = liftIO (fromMaybeJSString <$> (js_getPort (self)))- -foreign import javascript unsafe "$1[\"protocol\"] = $2;"-        js_setProtocol :: HTMLAnchorElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.protocol Mozilla HTMLAnchorElement.protocol documentation> -setProtocol ::-            (MonadIO m, ToJSString val) =>-              HTMLAnchorElement -> Maybe val -> m ()-setProtocol self val-  = liftIO (js_setProtocol (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"protocol\"]" js_getProtocol-        :: HTMLAnchorElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.protocol Mozilla HTMLAnchorElement.protocol documentation> -getProtocol ::-            (MonadIO m, FromJSString result) =>-              HTMLAnchorElement -> m (Maybe result)-getProtocol self-  = liftIO (fromMaybeJSString <$> (js_getProtocol (self)))- -foreign import javascript unsafe "$1[\"search\"] = $2;"-        js_setSearch :: HTMLAnchorElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.search Mozilla HTMLAnchorElement.search documentation> -setSearch ::-          (MonadIO m, ToJSString val) =>-            HTMLAnchorElement -> Maybe val -> m ()-setSearch self val-  = liftIO (js_setSearch (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"search\"]" js_getSearch ::-        HTMLAnchorElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.search Mozilla HTMLAnchorElement.search documentation> -getSearch ::-          (MonadIO m, FromJSString result) =>-            HTMLAnchorElement -> m (Maybe result)-getSearch self-  = liftIO (fromMaybeJSString <$> (js_getSearch (self)))- -foreign import javascript unsafe "$1[\"origin\"]" js_getOrigin ::-        HTMLAnchorElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.origin Mozilla HTMLAnchorElement.origin documentation> -getOrigin ::-          (MonadIO m, FromJSString result) =>-            HTMLAnchorElement -> m (Maybe result)-getOrigin self-  = liftIO (fromMaybeJSString <$> (js_getOrigin (self)))- -foreign import javascript unsafe "$1[\"text\"] = $2;" js_setText ::-        HTMLAnchorElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.text Mozilla HTMLAnchorElement.text documentation> -setText ::-        (MonadIO m, ToJSString val) => HTMLAnchorElement -> val -> m ()-setText self val = liftIO (js_setText (self) (toJSString val))- -foreign import javascript unsafe "$1[\"text\"]" js_getText ::-        HTMLAnchorElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.text Mozilla HTMLAnchorElement.text documentation> -getText ::-        (MonadIO m, FromJSString result) => HTMLAnchorElement -> m result-getText self = liftIO (fromJSString <$> (js_getText (self)))- -foreign import javascript unsafe "$1[\"relList\"]" js_getRelList ::-        HTMLAnchorElement -> IO (Nullable DOMTokenList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAnchorElement.relList Mozilla HTMLAnchorElement.relList documentation> -getRelList ::-           (MonadIO m) => HTMLAnchorElement -> m (Maybe DOMTokenList)-getRelList self-  = liftIO (nullableToMaybe <$> (js_getRelList (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLAppletElement.hs

@@ -1,206 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLAppletElement-       (js_setAlign, setAlign, js_getAlign, getAlign, js_setAlt, setAlt,-        js_getAlt, getAlt, js_setArchive, setArchive, js_getArchive,-        getArchive, js_setCode, setCode, js_getCode, getCode,-        js_setCodeBase, setCodeBase, js_getCodeBase, getCodeBase,-        js_setHeight, setHeight, js_getHeight, getHeight, js_setHspace,-        setHspace, js_getHspace, getHspace, js_setName, setName,-        js_getName, getName, js_setObject, setObject, js_getObject,-        getObject, js_setVspace, setVspace, js_getVspace, getVspace,-        js_setWidth, setWidth, js_getWidth, getWidth, HTMLAppletElement,-        castToHTMLAppletElement, gTypeHTMLAppletElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign-        :: HTMLAppletElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAppletElement.align Mozilla HTMLAppletElement.align documentation> -setAlign ::-         (MonadIO m, ToJSString val) => HTMLAppletElement -> val -> m ()-setAlign self val = liftIO (js_setAlign (self) (toJSString val))- -foreign import javascript unsafe "$1[\"align\"]" js_getAlign ::-        HTMLAppletElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAppletElement.align Mozilla HTMLAppletElement.align documentation> -getAlign ::-         (MonadIO m, FromJSString result) => HTMLAppletElement -> m result-getAlign self = liftIO (fromJSString <$> (js_getAlign (self)))- -foreign import javascript unsafe "$1[\"alt\"] = $2;" js_setAlt ::-        HTMLAppletElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAppletElement.alt Mozilla HTMLAppletElement.alt documentation> -setAlt ::-       (MonadIO m, ToJSString val) => HTMLAppletElement -> val -> m ()-setAlt self val = liftIO (js_setAlt (self) (toJSString val))- -foreign import javascript unsafe "$1[\"alt\"]" js_getAlt ::-        HTMLAppletElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAppletElement.alt Mozilla HTMLAppletElement.alt documentation> -getAlt ::-       (MonadIO m, FromJSString result) => HTMLAppletElement -> m result-getAlt self = liftIO (fromJSString <$> (js_getAlt (self)))- -foreign import javascript unsafe "$1[\"archive\"] = $2;"-        js_setArchive :: HTMLAppletElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAppletElement.archive Mozilla HTMLAppletElement.archive documentation> -setArchive ::-           (MonadIO m, ToJSString val) => HTMLAppletElement -> val -> m ()-setArchive self val-  = liftIO (js_setArchive (self) (toJSString val))- -foreign import javascript unsafe "$1[\"archive\"]" js_getArchive ::-        HTMLAppletElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAppletElement.archive Mozilla HTMLAppletElement.archive documentation> -getArchive ::-           (MonadIO m, FromJSString result) => HTMLAppletElement -> m result-getArchive self = liftIO (fromJSString <$> (js_getArchive (self)))- -foreign import javascript unsafe "$1[\"code\"] = $2;" js_setCode ::-        HTMLAppletElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAppletElement.code Mozilla HTMLAppletElement.code documentation> -setCode ::-        (MonadIO m, ToJSString val) => HTMLAppletElement -> val -> m ()-setCode self val = liftIO (js_setCode (self) (toJSString val))- -foreign import javascript unsafe "$1[\"code\"]" js_getCode ::-        HTMLAppletElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAppletElement.code Mozilla HTMLAppletElement.code documentation> -getCode ::-        (MonadIO m, FromJSString result) => HTMLAppletElement -> m result-getCode self = liftIO (fromJSString <$> (js_getCode (self)))- -foreign import javascript unsafe "$1[\"codeBase\"] = $2;"-        js_setCodeBase :: HTMLAppletElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAppletElement.codeBase Mozilla HTMLAppletElement.codeBase documentation> -setCodeBase ::-            (MonadIO m, ToJSString val) => HTMLAppletElement -> val -> m ()-setCodeBase self val-  = liftIO (js_setCodeBase (self) (toJSString val))- -foreign import javascript unsafe "$1[\"codeBase\"]" js_getCodeBase-        :: HTMLAppletElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAppletElement.codeBase Mozilla HTMLAppletElement.codeBase documentation> -getCodeBase ::-            (MonadIO m, FromJSString result) => HTMLAppletElement -> m result-getCodeBase self-  = liftIO (fromJSString <$> (js_getCodeBase (self)))- -foreign import javascript unsafe "$1[\"height\"] = $2;"-        js_setHeight :: HTMLAppletElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAppletElement.height Mozilla HTMLAppletElement.height documentation> -setHeight ::-          (MonadIO m, ToJSString val) => HTMLAppletElement -> val -> m ()-setHeight self val = liftIO (js_setHeight (self) (toJSString val))- -foreign import javascript unsafe "$1[\"height\"]" js_getHeight ::-        HTMLAppletElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAppletElement.height Mozilla HTMLAppletElement.height documentation> -getHeight ::-          (MonadIO m, FromJSString result) => HTMLAppletElement -> m result-getHeight self = liftIO (fromJSString <$> (js_getHeight (self)))- -foreign import javascript unsafe "$1[\"hspace\"] = $2;"-        js_setHspace :: HTMLAppletElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAppletElement.hspace Mozilla HTMLAppletElement.hspace documentation> -setHspace ::-          (MonadIO m, ToJSString val) => HTMLAppletElement -> val -> m ()-setHspace self val = liftIO (js_setHspace (self) (toJSString val))- -foreign import javascript unsafe "$1[\"hspace\"]" js_getHspace ::-        HTMLAppletElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAppletElement.hspace Mozilla HTMLAppletElement.hspace documentation> -getHspace ::-          (MonadIO m, FromJSString result) => HTMLAppletElement -> m result-getHspace self = liftIO (fromJSString <$> (js_getHspace (self)))- -foreign import javascript unsafe "$1[\"name\"] = $2;" js_setName ::-        HTMLAppletElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAppletElement.name Mozilla HTMLAppletElement.name documentation> -setName ::-        (MonadIO m, ToJSString val) => HTMLAppletElement -> val -> m ()-setName self val = liftIO (js_setName (self) (toJSString val))- -foreign import javascript unsafe "$1[\"name\"]" js_getName ::-        HTMLAppletElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAppletElement.name Mozilla HTMLAppletElement.name documentation> -getName ::-        (MonadIO m, FromJSString result) => HTMLAppletElement -> m result-getName self = liftIO (fromJSString <$> (js_getName (self)))- -foreign import javascript unsafe "$1[\"object\"] = $2;"-        js_setObject :: HTMLAppletElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAppletElement.object Mozilla HTMLAppletElement.object documentation> -setObject ::-          (MonadIO m, ToJSString val) => HTMLAppletElement -> val -> m ()-setObject self val = liftIO (js_setObject (self) (toJSString val))- -foreign import javascript unsafe "$1[\"object\"]" js_getObject ::-        HTMLAppletElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAppletElement.object Mozilla HTMLAppletElement.object documentation> -getObject ::-          (MonadIO m, FromJSString result) => HTMLAppletElement -> m result-getObject self = liftIO (fromJSString <$> (js_getObject (self)))- -foreign import javascript unsafe "$1[\"vspace\"] = $2;"-        js_setVspace :: HTMLAppletElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAppletElement.vspace Mozilla HTMLAppletElement.vspace documentation> -setVspace ::-          (MonadIO m, ToJSString val) => HTMLAppletElement -> val -> m ()-setVspace self val = liftIO (js_setVspace (self) (toJSString val))- -foreign import javascript unsafe "$1[\"vspace\"]" js_getVspace ::-        HTMLAppletElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAppletElement.vspace Mozilla HTMLAppletElement.vspace documentation> -getVspace ::-          (MonadIO m, FromJSString result) => HTMLAppletElement -> m result-getVspace self = liftIO (fromJSString <$> (js_getVspace (self)))- -foreign import javascript unsafe "$1[\"width\"] = $2;" js_setWidth-        :: HTMLAppletElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAppletElement.width Mozilla HTMLAppletElement.width documentation> -setWidth ::-         (MonadIO m, ToJSString val) => HTMLAppletElement -> val -> m ()-setWidth self val = liftIO (js_setWidth (self) (toJSString val))- -foreign import javascript unsafe "$1[\"width\"]" js_getWidth ::-        HTMLAppletElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAppletElement.width Mozilla HTMLAppletElement.width documentation> -getWidth ::-         (MonadIO m, FromJSString result) => HTMLAppletElement -> m result-getWidth self = liftIO (fromJSString <$> (js_getWidth (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLAreaElement.hs

@@ -1,221 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLAreaElement-       (js_setAlt, setAlt, js_getAlt, getAlt, js_setCoords, setCoords,-        js_getCoords, getCoords, js_setHref, setHref, js_getHref, getHref,-        js_setNoHref, setNoHref, js_getNoHref, getNoHref, js_setPing,-        setPing, js_getPing, getPing, js_setRel, setRel, js_getRel, getRel,-        js_setShape, setShape, js_getShape, getShape, js_setTarget,-        setTarget, js_getTarget, getTarget, js_getHash, getHash,-        js_getHost, getHost, js_getHostname, getHostname, js_getPathname,-        getPathname, js_getPort, getPort, js_getProtocol, getProtocol,-        js_getSearch, getSearch, js_getRelList, getRelList,-        HTMLAreaElement, castToHTMLAreaElement, gTypeHTMLAreaElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"alt\"] = $2;" js_setAlt ::-        HTMLAreaElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAreaElement.alt Mozilla HTMLAreaElement.alt documentation> -setAlt ::-       (MonadIO m, ToJSString val) => HTMLAreaElement -> val -> m ()-setAlt self val = liftIO (js_setAlt (self) (toJSString val))- -foreign import javascript unsafe "$1[\"alt\"]" js_getAlt ::-        HTMLAreaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAreaElement.alt Mozilla HTMLAreaElement.alt documentation> -getAlt ::-       (MonadIO m, FromJSString result) => HTMLAreaElement -> m result-getAlt self = liftIO (fromJSString <$> (js_getAlt (self)))- -foreign import javascript unsafe "$1[\"coords\"] = $2;"-        js_setCoords :: HTMLAreaElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAreaElement.coords Mozilla HTMLAreaElement.coords documentation> -setCoords ::-          (MonadIO m, ToJSString val) => HTMLAreaElement -> val -> m ()-setCoords self val = liftIO (js_setCoords (self) (toJSString val))- -foreign import javascript unsafe "$1[\"coords\"]" js_getCoords ::-        HTMLAreaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAreaElement.coords Mozilla HTMLAreaElement.coords documentation> -getCoords ::-          (MonadIO m, FromJSString result) => HTMLAreaElement -> m result-getCoords self = liftIO (fromJSString <$> (js_getCoords (self)))- -foreign import javascript unsafe "$1[\"href\"] = $2;" js_setHref ::-        HTMLAreaElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAreaElement.href Mozilla HTMLAreaElement.href documentation> -setHref ::-        (MonadIO m, ToJSString val) => HTMLAreaElement -> val -> m ()-setHref self val = liftIO (js_setHref (self) (toJSString val))- -foreign import javascript unsafe "$1[\"href\"]" js_getHref ::-        HTMLAreaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAreaElement.href Mozilla HTMLAreaElement.href documentation> -getHref ::-        (MonadIO m, FromJSString result) => HTMLAreaElement -> m result-getHref self = liftIO (fromJSString <$> (js_getHref (self)))- -foreign import javascript unsafe "$1[\"noHref\"] = $2;"-        js_setNoHref :: HTMLAreaElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAreaElement.noHref Mozilla HTMLAreaElement.noHref documentation> -setNoHref :: (MonadIO m) => HTMLAreaElement -> Bool -> m ()-setNoHref self val = liftIO (js_setNoHref (self) val)- -foreign import javascript unsafe "($1[\"noHref\"] ? 1 : 0)"-        js_getNoHref :: HTMLAreaElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAreaElement.noHref Mozilla HTMLAreaElement.noHref documentation> -getNoHref :: (MonadIO m) => HTMLAreaElement -> m Bool-getNoHref self = liftIO (js_getNoHref (self))- -foreign import javascript unsafe "$1[\"ping\"] = $2;" js_setPing ::-        HTMLAreaElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAreaElement.ping Mozilla HTMLAreaElement.ping documentation> -setPing ::-        (MonadIO m, ToJSString val) => HTMLAreaElement -> val -> m ()-setPing self val = liftIO (js_setPing (self) (toJSString val))- -foreign import javascript unsafe "$1[\"ping\"]" js_getPing ::-        HTMLAreaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAreaElement.ping Mozilla HTMLAreaElement.ping documentation> -getPing ::-        (MonadIO m, FromJSString result) => HTMLAreaElement -> m result-getPing self = liftIO (fromJSString <$> (js_getPing (self)))- -foreign import javascript unsafe "$1[\"rel\"] = $2;" js_setRel ::-        HTMLAreaElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAreaElement.rel Mozilla HTMLAreaElement.rel documentation> -setRel ::-       (MonadIO m, ToJSString val) => HTMLAreaElement -> val -> m ()-setRel self val = liftIO (js_setRel (self) (toJSString val))- -foreign import javascript unsafe "$1[\"rel\"]" js_getRel ::-        HTMLAreaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAreaElement.rel Mozilla HTMLAreaElement.rel documentation> -getRel ::-       (MonadIO m, FromJSString result) => HTMLAreaElement -> m result-getRel self = liftIO (fromJSString <$> (js_getRel (self)))- -foreign import javascript unsafe "$1[\"shape\"] = $2;" js_setShape-        :: HTMLAreaElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAreaElement.shape Mozilla HTMLAreaElement.shape documentation> -setShape ::-         (MonadIO m, ToJSString val) => HTMLAreaElement -> val -> m ()-setShape self val = liftIO (js_setShape (self) (toJSString val))- -foreign import javascript unsafe "$1[\"shape\"]" js_getShape ::-        HTMLAreaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAreaElement.shape Mozilla HTMLAreaElement.shape documentation> -getShape ::-         (MonadIO m, FromJSString result) => HTMLAreaElement -> m result-getShape self = liftIO (fromJSString <$> (js_getShape (self)))- -foreign import javascript unsafe "$1[\"target\"] = $2;"-        js_setTarget :: HTMLAreaElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAreaElement.target Mozilla HTMLAreaElement.target documentation> -setTarget ::-          (MonadIO m, ToJSString val) => HTMLAreaElement -> val -> m ()-setTarget self val = liftIO (js_setTarget (self) (toJSString val))- -foreign import javascript unsafe "$1[\"target\"]" js_getTarget ::-        HTMLAreaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAreaElement.target Mozilla HTMLAreaElement.target documentation> -getTarget ::-          (MonadIO m, FromJSString result) => HTMLAreaElement -> m result-getTarget self = liftIO (fromJSString <$> (js_getTarget (self)))- -foreign import javascript unsafe "$1[\"hash\"]" js_getHash ::-        HTMLAreaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAreaElement.hash Mozilla HTMLAreaElement.hash documentation> -getHash ::-        (MonadIO m, FromJSString result) => HTMLAreaElement -> m result-getHash self = liftIO (fromJSString <$> (js_getHash (self)))- -foreign import javascript unsafe "$1[\"host\"]" js_getHost ::-        HTMLAreaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAreaElement.host Mozilla HTMLAreaElement.host documentation> -getHost ::-        (MonadIO m, FromJSString result) => HTMLAreaElement -> m result-getHost self = liftIO (fromJSString <$> (js_getHost (self)))- -foreign import javascript unsafe "$1[\"hostname\"]" js_getHostname-        :: HTMLAreaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAreaElement.hostname Mozilla HTMLAreaElement.hostname documentation> -getHostname ::-            (MonadIO m, FromJSString result) => HTMLAreaElement -> m result-getHostname self-  = liftIO (fromJSString <$> (js_getHostname (self)))- -foreign import javascript unsafe "$1[\"pathname\"]" js_getPathname-        :: HTMLAreaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAreaElement.pathname Mozilla HTMLAreaElement.pathname documentation> -getPathname ::-            (MonadIO m, FromJSString result) => HTMLAreaElement -> m result-getPathname self-  = liftIO (fromJSString <$> (js_getPathname (self)))- -foreign import javascript unsafe "$1[\"port\"]" js_getPort ::-        HTMLAreaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAreaElement.port Mozilla HTMLAreaElement.port documentation> -getPort ::-        (MonadIO m, FromJSString result) => HTMLAreaElement -> m result-getPort self = liftIO (fromJSString <$> (js_getPort (self)))- -foreign import javascript unsafe "$1[\"protocol\"]" js_getProtocol-        :: HTMLAreaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAreaElement.protocol Mozilla HTMLAreaElement.protocol documentation> -getProtocol ::-            (MonadIO m, FromJSString result) => HTMLAreaElement -> m result-getProtocol self-  = liftIO (fromJSString <$> (js_getProtocol (self)))- -foreign import javascript unsafe "$1[\"search\"]" js_getSearch ::-        HTMLAreaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAreaElement.search Mozilla HTMLAreaElement.search documentation> -getSearch ::-          (MonadIO m, FromJSString result) => HTMLAreaElement -> m result-getSearch self = liftIO (fromJSString <$> (js_getSearch (self)))- -foreign import javascript unsafe "$1[\"relList\"]" js_getRelList ::-        HTMLAreaElement -> IO (Nullable DOMTokenList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLAreaElement.relList Mozilla HTMLAreaElement.relList documentation> -getRelList ::-           (MonadIO m) => HTMLAreaElement -> m (Maybe DOMTokenList)-getRelList self-  = liftIO (nullableToMaybe <$> (js_getRelList (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLBRElement.hs

@@ -1,35 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLBRElement-       (js_setClear, setClear, js_getClear, getClear, HTMLBRElement,-        castToHTMLBRElement, gTypeHTMLBRElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"clear\"] = $2;" js_setClear-        :: HTMLBRElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBRElement.clear Mozilla HTMLBRElement.clear documentation> -setClear ::-         (MonadIO m, ToJSString val) => HTMLBRElement -> val -> m ()-setClear self val = liftIO (js_setClear (self) (toJSString val))- -foreign import javascript unsafe "$1[\"clear\"]" js_getClear ::-        HTMLBRElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBRElement.clear Mozilla HTMLBRElement.clear documentation> -getClear ::-         (MonadIO m, FromJSString result) => HTMLBRElement -> m result-getClear self = liftIO (fromJSString <$> (js_getClear (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLBaseElement.hs

@@ -1,53 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLBaseElement-       (js_setHref, setHref, js_getHref, getHref, js_setTarget, setTarget,-        js_getTarget, getTarget, HTMLBaseElement, castToHTMLBaseElement,-        gTypeHTMLBaseElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"href\"] = $2;" js_setHref ::-        HTMLBaseElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBaseElement.href Mozilla HTMLBaseElement.href documentation> -setHref ::-        (MonadIO m, ToJSString val) => HTMLBaseElement -> Maybe val -> m ()-setHref self val = liftIO (js_setHref (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"href\"]" js_getHref ::-        HTMLBaseElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBaseElement.href Mozilla HTMLBaseElement.href documentation> -getHref ::-        (MonadIO m, FromJSString result) =>-          HTMLBaseElement -> m (Maybe result)-getHref self = liftIO (fromMaybeJSString <$> (js_getHref (self)))- -foreign import javascript unsafe "$1[\"target\"] = $2;"-        js_setTarget :: HTMLBaseElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBaseElement.target Mozilla HTMLBaseElement.target documentation> -setTarget ::-          (MonadIO m, ToJSString val) => HTMLBaseElement -> val -> m ()-setTarget self val = liftIO (js_setTarget (self) (toJSString val))- -foreign import javascript unsafe "$1[\"target\"]" js_getTarget ::-        HTMLBaseElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBaseElement.target Mozilla HTMLBaseElement.target documentation> -getTarget ::-          (MonadIO m, FromJSString result) => HTMLBaseElement -> m result-getTarget self = liftIO (fromJSString <$> (js_getTarget (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLBaseFontElement.hs

@@ -1,67 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLBaseFontElement-       (js_setColor, setColor, js_getColor, getColor, js_setFace, setFace,-        js_getFace, getFace, js_setSize, setSize, js_getSize, getSize,-        HTMLBaseFontElement, castToHTMLBaseFontElement,-        gTypeHTMLBaseFontElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"color\"] = $2;" js_setColor-        :: HTMLBaseFontElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBaseFontElement.color Mozilla HTMLBaseFontElement.color documentation> -setColor ::-         (MonadIO m, ToJSString val) => HTMLBaseFontElement -> val -> m ()-setColor self val = liftIO (js_setColor (self) (toJSString val))- -foreign import javascript unsafe "$1[\"color\"]" js_getColor ::-        HTMLBaseFontElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBaseFontElement.color Mozilla HTMLBaseFontElement.color documentation> -getColor ::-         (MonadIO m, FromJSString result) => HTMLBaseFontElement -> m result-getColor self = liftIO (fromJSString <$> (js_getColor (self)))- -foreign import javascript unsafe "$1[\"face\"] = $2;" js_setFace ::-        HTMLBaseFontElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBaseFontElement.face Mozilla HTMLBaseFontElement.face documentation> -setFace ::-        (MonadIO m, ToJSString val) => HTMLBaseFontElement -> val -> m ()-setFace self val = liftIO (js_setFace (self) (toJSString val))- -foreign import javascript unsafe "$1[\"face\"]" js_getFace ::-        HTMLBaseFontElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBaseFontElement.face Mozilla HTMLBaseFontElement.face documentation> -getFace ::-        (MonadIO m, FromJSString result) => HTMLBaseFontElement -> m result-getFace self = liftIO (fromJSString <$> (js_getFace (self)))- -foreign import javascript unsafe "$1[\"size\"] = $2;" js_setSize ::-        HTMLBaseFontElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBaseFontElement.size Mozilla HTMLBaseFontElement.size documentation> -setSize :: (MonadIO m) => HTMLBaseFontElement -> Int -> m ()-setSize self val = liftIO (js_setSize (self) val)- -foreign import javascript unsafe "$1[\"size\"]" js_getSize ::-        HTMLBaseFontElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBaseFontElement.size Mozilla HTMLBaseFontElement.size documentation> -getSize :: (MonadIO m) => HTMLBaseFontElement -> m Int-getSize self = liftIO (js_getSize (self))

− src/GHCJS/DOM/JSFFI/Generated/HTMLBodyElement.hs

@@ -1,181 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLBodyElement-       (js_setALink, setALink, js_getALink, getALink, js_setBackground,-        setBackground, js_getBackground, getBackground, js_setBgColor,-        setBgColor, js_getBgColor, getBgColor, js_setLink, setLink,-        js_getLink, getLink, js_setText, setText, js_getText, getText,-        js_setVLink, setVLink, js_getVLink, getVLink, beforeUnload,-        hashChange, message, offline, online, popState, resize, storage,-        unload, orientationChange, blur, error, focus, load,-        HTMLBodyElement, castToHTMLBodyElement, gTypeHTMLBodyElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"aLink\"] = $2;" js_setALink-        :: HTMLBodyElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.aLink Mozilla HTMLBodyElement.aLink documentation> -setALink ::-         (MonadIO m, ToJSString val) => HTMLBodyElement -> val -> m ()-setALink self val = liftIO (js_setALink (self) (toJSString val))- -foreign import javascript unsafe "$1[\"aLink\"]" js_getALink ::-        HTMLBodyElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.aLink Mozilla HTMLBodyElement.aLink documentation> -getALink ::-         (MonadIO m, FromJSString result) => HTMLBodyElement -> m result-getALink self = liftIO (fromJSString <$> (js_getALink (self)))- -foreign import javascript unsafe "$1[\"background\"] = $2;"-        js_setBackground :: HTMLBodyElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.background Mozilla HTMLBodyElement.background documentation> -setBackground ::-              (MonadIO m, ToJSString val) => HTMLBodyElement -> val -> m ()-setBackground self val-  = liftIO (js_setBackground (self) (toJSString val))- -foreign import javascript unsafe "$1[\"background\"]"-        js_getBackground :: HTMLBodyElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.background Mozilla HTMLBodyElement.background documentation> -getBackground ::-              (MonadIO m, FromJSString result) => HTMLBodyElement -> m result-getBackground self-  = liftIO (fromJSString <$> (js_getBackground (self)))- -foreign import javascript unsafe "$1[\"bgColor\"] = $2;"-        js_setBgColor :: HTMLBodyElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.bgColor Mozilla HTMLBodyElement.bgColor documentation> -setBgColor ::-           (MonadIO m, ToJSString val) => HTMLBodyElement -> val -> m ()-setBgColor self val-  = liftIO (js_setBgColor (self) (toJSString val))- -foreign import javascript unsafe "$1[\"bgColor\"]" js_getBgColor ::-        HTMLBodyElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.bgColor Mozilla HTMLBodyElement.bgColor documentation> -getBgColor ::-           (MonadIO m, FromJSString result) => HTMLBodyElement -> m result-getBgColor self = liftIO (fromJSString <$> (js_getBgColor (self)))- -foreign import javascript unsafe "$1[\"link\"] = $2;" js_setLink ::-        HTMLBodyElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.link Mozilla HTMLBodyElement.link documentation> -setLink ::-        (MonadIO m, ToJSString val) => HTMLBodyElement -> val -> m ()-setLink self val = liftIO (js_setLink (self) (toJSString val))- -foreign import javascript unsafe "$1[\"link\"]" js_getLink ::-        HTMLBodyElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.link Mozilla HTMLBodyElement.link documentation> -getLink ::-        (MonadIO m, FromJSString result) => HTMLBodyElement -> m result-getLink self = liftIO (fromJSString <$> (js_getLink (self)))- -foreign import javascript unsafe "$1[\"text\"] = $2;" js_setText ::-        HTMLBodyElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.text Mozilla HTMLBodyElement.text documentation> -setText ::-        (MonadIO m, ToJSString val) => HTMLBodyElement -> val -> m ()-setText self val = liftIO (js_setText (self) (toJSString val))- -foreign import javascript unsafe "$1[\"text\"]" js_getText ::-        HTMLBodyElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.text Mozilla HTMLBodyElement.text documentation> -getText ::-        (MonadIO m, FromJSString result) => HTMLBodyElement -> m result-getText self = liftIO (fromJSString <$> (js_getText (self)))- -foreign import javascript unsafe "$1[\"vLink\"] = $2;" js_setVLink-        :: HTMLBodyElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.vLink Mozilla HTMLBodyElement.vLink documentation> -setVLink ::-         (MonadIO m, ToJSString val) => HTMLBodyElement -> val -> m ()-setVLink self val = liftIO (js_setVLink (self) (toJSString val))- -foreign import javascript unsafe "$1[\"vLink\"]" js_getVLink ::-        HTMLBodyElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.vLink Mozilla HTMLBodyElement.vLink documentation> -getVLink ::-         (MonadIO m, FromJSString result) => HTMLBodyElement -> m result-getVLink self = liftIO (fromJSString <$> (js_getVLink (self)))---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.onbeforeunload Mozilla HTMLBodyElement.onbeforeunload documentation> -beforeUnload :: EventName HTMLBodyElement BeforeUnloadEvent-beforeUnload = unsafeEventName (toJSString "beforeunload")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.onhashchange Mozilla HTMLBodyElement.onhashchange documentation> -hashChange :: EventName HTMLBodyElement HashChangeEvent-hashChange = unsafeEventName (toJSString "hashchange")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.onmessage Mozilla HTMLBodyElement.onmessage documentation> -message :: EventName HTMLBodyElement MessageEvent-message = unsafeEventName (toJSString "message")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.onoffline Mozilla HTMLBodyElement.onoffline documentation> -offline :: EventName HTMLBodyElement Event-offline = unsafeEventName (toJSString "offline")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.ononline Mozilla HTMLBodyElement.ononline documentation> -online :: EventName HTMLBodyElement Event-online = unsafeEventName (toJSString "online")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.onpopstate Mozilla HTMLBodyElement.onpopstate documentation> -popState :: EventName HTMLBodyElement PopStateEvent-popState = unsafeEventName (toJSString "popstate")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.onresize Mozilla HTMLBodyElement.onresize documentation> -resize :: EventName HTMLBodyElement UIEvent-resize = unsafeEventName (toJSString "resize")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.onstorage Mozilla HTMLBodyElement.onstorage documentation> -storage :: EventName HTMLBodyElement StorageEvent-storage = unsafeEventName (toJSString "storage")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.onunload Mozilla HTMLBodyElement.onunload documentation> -unload :: EventName HTMLBodyElement UIEvent-unload = unsafeEventName (toJSString "unload")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.onorientationchange Mozilla HTMLBodyElement.onorientationchange documentation> -orientationChange :: EventName HTMLBodyElement Event-orientationChange-  = unsafeEventName (toJSString "orientationchange")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.onblur Mozilla HTMLBodyElement.onblur documentation> -blur :: EventName HTMLBodyElement FocusEvent-blur = unsafeEventName (toJSString "blur")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.onerror Mozilla HTMLBodyElement.onerror documentation> -error :: EventName HTMLBodyElement UIEvent-error = unsafeEventName (toJSString "error")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.onfocus Mozilla HTMLBodyElement.onfocus documentation> -focus :: EventName HTMLBodyElement FocusEvent-focus = unsafeEventName (toJSString "focus")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.onload Mozilla HTMLBodyElement.onload documentation> -load :: EventName HTMLBodyElement UIEvent-load = unsafeEventName (toJSString "load")

− src/GHCJS/DOM/JSFFI/Generated/HTMLButtonElement.hs

@@ -1,262 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLButtonElement-       (js_checkValidity, checkValidity, js_setCustomValidity,-        setCustomValidity, js_setAutofocus, setAutofocus, js_getAutofocus,-        getAutofocus, js_setDisabled, setDisabled, js_getDisabled,-        getDisabled, js_getForm, getForm, js_setFormAction, setFormAction,-        js_getFormAction, getFormAction, js_setFormEnctype, setFormEnctype,-        js_getFormEnctype, getFormEnctype, js_setFormMethod, setFormMethod,-        js_getFormMethod, getFormMethod, js_setFormNoValidate,-        setFormNoValidate, js_getFormNoValidate, getFormNoValidate,-        js_setFormTarget, setFormTarget, js_getFormTarget, getFormTarget,-        js_setName, setName, js_getName, getName, js_setType, setType,-        js_getType, getType, js_setValue, setValue, js_getValue, getValue,-        js_getWillValidate, getWillValidate, js_getValidity, getValidity,-        js_getValidationMessage, getValidationMessage, js_getLabels,-        getLabels, HTMLButtonElement, castToHTMLButtonElement,-        gTypeHTMLButtonElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe-        "($1[\"checkValidity\"]() ? 1 : 0)" js_checkValidity ::-        HTMLButtonElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.checkValidity Mozilla HTMLButtonElement.checkValidity documentation> -checkValidity :: (MonadIO m) => HTMLButtonElement -> m Bool-checkValidity self = liftIO (js_checkValidity (self))- -foreign import javascript unsafe "$1[\"setCustomValidity\"]($2)"-        js_setCustomValidity ::-        HTMLButtonElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.setCustomValidity Mozilla HTMLButtonElement.setCustomValidity documentation> -setCustomValidity ::-                  (MonadIO m, ToJSString error) =>-                    HTMLButtonElement -> Maybe error -> m ()-setCustomValidity self error-  = liftIO (js_setCustomValidity (self) (toMaybeJSString error))- -foreign import javascript unsafe "$1[\"autofocus\"] = $2;"-        js_setAutofocus :: HTMLButtonElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.autofocus Mozilla HTMLButtonElement.autofocus documentation> -setAutofocus :: (MonadIO m) => HTMLButtonElement -> Bool -> m ()-setAutofocus self val = liftIO (js_setAutofocus (self) val)- -foreign import javascript unsafe "($1[\"autofocus\"] ? 1 : 0)"-        js_getAutofocus :: HTMLButtonElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.autofocus Mozilla HTMLButtonElement.autofocus documentation> -getAutofocus :: (MonadIO m) => HTMLButtonElement -> m Bool-getAutofocus self = liftIO (js_getAutofocus (self))- -foreign import javascript unsafe "$1[\"disabled\"] = $2;"-        js_setDisabled :: HTMLButtonElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.disabled Mozilla HTMLButtonElement.disabled documentation> -setDisabled :: (MonadIO m) => HTMLButtonElement -> Bool -> m ()-setDisabled self val = liftIO (js_setDisabled (self) val)- -foreign import javascript unsafe "($1[\"disabled\"] ? 1 : 0)"-        js_getDisabled :: HTMLButtonElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.disabled Mozilla HTMLButtonElement.disabled documentation> -getDisabled :: (MonadIO m) => HTMLButtonElement -> m Bool-getDisabled self = liftIO (js_getDisabled (self))- -foreign import javascript unsafe "$1[\"form\"]" js_getForm ::-        HTMLButtonElement -> IO (Nullable HTMLFormElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.form Mozilla HTMLButtonElement.form documentation> -getForm ::-        (MonadIO m) => HTMLButtonElement -> m (Maybe HTMLFormElement)-getForm self = liftIO (nullableToMaybe <$> (js_getForm (self)))- -foreign import javascript unsafe "$1[\"formAction\"] = $2;"-        js_setFormAction :: HTMLButtonElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.formAction Mozilla HTMLButtonElement.formAction documentation> -setFormAction ::-              (MonadIO m, ToJSString val) => HTMLButtonElement -> val -> m ()-setFormAction self val-  = liftIO (js_setFormAction (self) (toJSString val))- -foreign import javascript unsafe "$1[\"formAction\"]"-        js_getFormAction :: HTMLButtonElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.formAction Mozilla HTMLButtonElement.formAction documentation> -getFormAction ::-              (MonadIO m, FromJSString result) => HTMLButtonElement -> m result-getFormAction self-  = liftIO (fromJSString <$> (js_getFormAction (self)))- -foreign import javascript unsafe "$1[\"formEnctype\"] = $2;"-        js_setFormEnctype ::-        HTMLButtonElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.formEnctype Mozilla HTMLButtonElement.formEnctype documentation> -setFormEnctype ::-               (MonadIO m, ToJSString val) =>-                 HTMLButtonElement -> Maybe val -> m ()-setFormEnctype self val-  = liftIO (js_setFormEnctype (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"formEnctype\"]"-        js_getFormEnctype :: HTMLButtonElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.formEnctype Mozilla HTMLButtonElement.formEnctype documentation> -getFormEnctype ::-               (MonadIO m, FromJSString result) =>-                 HTMLButtonElement -> m (Maybe result)-getFormEnctype self-  = liftIO (fromMaybeJSString <$> (js_getFormEnctype (self)))- -foreign import javascript unsafe "$1[\"formMethod\"] = $2;"-        js_setFormMethod :: HTMLButtonElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.formMethod Mozilla HTMLButtonElement.formMethod documentation> -setFormMethod ::-              (MonadIO m, ToJSString val) =>-                HTMLButtonElement -> Maybe val -> m ()-setFormMethod self val-  = liftIO (js_setFormMethod (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"formMethod\"]"-        js_getFormMethod :: HTMLButtonElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.formMethod Mozilla HTMLButtonElement.formMethod documentation> -getFormMethod ::-              (MonadIO m, FromJSString result) =>-                HTMLButtonElement -> m (Maybe result)-getFormMethod self-  = liftIO (fromMaybeJSString <$> (js_getFormMethod (self)))- -foreign import javascript unsafe "$1[\"formNoValidate\"] = $2;"-        js_setFormNoValidate :: HTMLButtonElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.formNoValidate Mozilla HTMLButtonElement.formNoValidate documentation> -setFormNoValidate ::-                  (MonadIO m) => HTMLButtonElement -> Bool -> m ()-setFormNoValidate self val-  = liftIO (js_setFormNoValidate (self) val)- -foreign import javascript unsafe "($1[\"formNoValidate\"] ? 1 : 0)"-        js_getFormNoValidate :: HTMLButtonElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.formNoValidate Mozilla HTMLButtonElement.formNoValidate documentation> -getFormNoValidate :: (MonadIO m) => HTMLButtonElement -> m Bool-getFormNoValidate self = liftIO (js_getFormNoValidate (self))- -foreign import javascript unsafe "$1[\"formTarget\"] = $2;"-        js_setFormTarget :: HTMLButtonElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.formTarget Mozilla HTMLButtonElement.formTarget documentation> -setFormTarget ::-              (MonadIO m, ToJSString val) => HTMLButtonElement -> val -> m ()-setFormTarget self val-  = liftIO (js_setFormTarget (self) (toJSString val))- -foreign import javascript unsafe "$1[\"formTarget\"]"-        js_getFormTarget :: HTMLButtonElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.formTarget Mozilla HTMLButtonElement.formTarget documentation> -getFormTarget ::-              (MonadIO m, FromJSString result) => HTMLButtonElement -> m result-getFormTarget self-  = liftIO (fromJSString <$> (js_getFormTarget (self)))- -foreign import javascript unsafe "$1[\"name\"] = $2;" js_setName ::-        HTMLButtonElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.name Mozilla HTMLButtonElement.name documentation> -setName ::-        (MonadIO m, ToJSString val) => HTMLButtonElement -> val -> m ()-setName self val = liftIO (js_setName (self) (toJSString val))- -foreign import javascript unsafe "$1[\"name\"]" js_getName ::-        HTMLButtonElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.name Mozilla HTMLButtonElement.name documentation> -getName ::-        (MonadIO m, FromJSString result) => HTMLButtonElement -> m result-getName self = liftIO (fromJSString <$> (js_getName (self)))- -foreign import javascript unsafe "$1[\"type\"] = $2;" js_setType ::-        HTMLButtonElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.type Mozilla HTMLButtonElement.type documentation> -setType ::-        (MonadIO m, ToJSString val) =>-          HTMLButtonElement -> Maybe val -> m ()-setType self val = liftIO (js_setType (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"type\"]" js_getType ::-        HTMLButtonElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.type Mozilla HTMLButtonElement.type documentation> -getType ::-        (MonadIO m, FromJSString result) =>-          HTMLButtonElement -> m (Maybe result)-getType self = liftIO (fromMaybeJSString <$> (js_getType (self)))- -foreign import javascript unsafe "$1[\"value\"] = $2;" js_setValue-        :: HTMLButtonElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.value Mozilla HTMLButtonElement.value documentation> -setValue ::-         (MonadIO m, ToJSString val) => HTMLButtonElement -> val -> m ()-setValue self val = liftIO (js_setValue (self) (toJSString val))- -foreign import javascript unsafe "$1[\"value\"]" js_getValue ::-        HTMLButtonElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.value Mozilla HTMLButtonElement.value documentation> -getValue ::-         (MonadIO m, FromJSString result) => HTMLButtonElement -> m result-getValue self = liftIO (fromJSString <$> (js_getValue (self)))- -foreign import javascript unsafe "($1[\"willValidate\"] ? 1 : 0)"-        js_getWillValidate :: HTMLButtonElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.willValidate Mozilla HTMLButtonElement.willValidate documentation> -getWillValidate :: (MonadIO m) => HTMLButtonElement -> m Bool-getWillValidate self = liftIO (js_getWillValidate (self))- -foreign import javascript unsafe "$1[\"validity\"]" js_getValidity-        :: HTMLButtonElement -> IO (Nullable ValidityState)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.validity Mozilla HTMLButtonElement.validity documentation> -getValidity ::-            (MonadIO m) => HTMLButtonElement -> m (Maybe ValidityState)-getValidity self-  = liftIO (nullableToMaybe <$> (js_getValidity (self)))- -foreign import javascript unsafe "$1[\"validationMessage\"]"-        js_getValidationMessage :: HTMLButtonElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.validationMessage Mozilla HTMLButtonElement.validationMessage documentation> -getValidationMessage ::-                     (MonadIO m, FromJSString result) => HTMLButtonElement -> m result-getValidationMessage self-  = liftIO (fromJSString <$> (js_getValidationMessage (self)))- -foreign import javascript unsafe "$1[\"labels\"]" js_getLabels ::-        HTMLButtonElement -> IO (Nullable NodeList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLButtonElement.labels Mozilla HTMLButtonElement.labels documentation> -getLabels :: (MonadIO m) => HTMLButtonElement -> m (Maybe NodeList)-getLabels self = liftIO (nullableToMaybe <$> (js_getLabels (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLCanvasElement.hs

@@ -1,83 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLCanvasElement-       (js_toDataURL, toDataURL, js_getContext, getContext,-        js_probablySupportsContext, probablySupportsContext, js_setWidth,-        setWidth, js_getWidth, getWidth, js_setHeight, setHeight,-        js_getHeight, getHeight, HTMLCanvasElement,-        castToHTMLCanvasElement, gTypeHTMLCanvasElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"toDataURL\"]($2)"-        js_toDataURL ::-        HTMLCanvasElement -> Nullable JSString -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLCanvasElement.toDataURL Mozilla HTMLCanvasElement.toDataURL documentation> -toDataURL ::-          (MonadIO m, ToJSString type', FromJSString result) =>-            HTMLCanvasElement -> Maybe type' -> m result-toDataURL self type'-  = liftIO-      (fromJSString <$> (js_toDataURL (self) (toMaybeJSString type')))- -foreign import javascript unsafe "$1[\"getContext\"]($2)"-        js_getContext :: HTMLCanvasElement -> JSString -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLCanvasElement.getContext Mozilla HTMLCanvasElement.getContext documentation> -getContext ::-           (MonadIO m, ToJSString contextId) =>-             HTMLCanvasElement -> contextId -> m JSVal-getContext self contextId-  = liftIO (js_getContext (self) (toJSString contextId))- -foreign import javascript unsafe-        "$1[\"probablySupportsContext\"]($2)" js_probablySupportsContext ::-        HTMLCanvasElement -> JSString -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLCanvasElement.probablySupportsContext Mozilla HTMLCanvasElement.probablySupportsContext documentation> -probablySupportsContext ::-                        (MonadIO m, ToJSString contextId) =>-                          HTMLCanvasElement -> contextId -> m JSVal-probablySupportsContext self contextId-  = liftIO (js_probablySupportsContext (self) (toJSString contextId))- -foreign import javascript unsafe "$1[\"width\"] = $2;" js_setWidth-        :: HTMLCanvasElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLCanvasElement.width Mozilla HTMLCanvasElement.width documentation> -setWidth :: (MonadIO m) => HTMLCanvasElement -> Int -> m ()-setWidth self val = liftIO (js_setWidth (self) val)- -foreign import javascript unsafe "$1[\"width\"]" js_getWidth ::-        HTMLCanvasElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLCanvasElement.width Mozilla HTMLCanvasElement.width documentation> -getWidth :: (MonadIO m) => HTMLCanvasElement -> m Int-getWidth self = liftIO (js_getWidth (self))- -foreign import javascript unsafe "$1[\"height\"] = $2;"-        js_setHeight :: HTMLCanvasElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLCanvasElement.height Mozilla HTMLCanvasElement.height documentation> -setHeight :: (MonadIO m) => HTMLCanvasElement -> Int -> m ()-setHeight self val = liftIO (js_setHeight (self) val)- -foreign import javascript unsafe "$1[\"height\"]" js_getHeight ::-        HTMLCanvasElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLCanvasElement.height Mozilla HTMLCanvasElement.height documentation> -getHeight :: (MonadIO m) => HTMLCanvasElement -> m Int-getHeight self = liftIO (js_getHeight (self))

− src/GHCJS/DOM/JSFFI/Generated/HTMLCollection.hs

@@ -1,50 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLCollection-       (js_item, item, js_namedItem, namedItem, js_getLength, getLength,-        HTMLCollection, castToHTMLCollection, gTypeHTMLCollection,-        IsHTMLCollection, toHTMLCollection)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"item\"]($2)" js_item ::-        HTMLCollection -> Word -> IO (Nullable Node)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLCollection.item Mozilla HTMLCollection.item documentation> -item ::-     (MonadIO m, IsHTMLCollection self) =>-       self -> Word -> m (Maybe Node)-item self index-  = liftIO-      (nullableToMaybe <$> (js_item (toHTMLCollection self) index))- -foreign import javascript unsafe "$1[\"namedItem\"]($2)"-        js_namedItem :: HTMLCollection -> JSString -> IO (Nullable Node)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLCollection.namedItem Mozilla HTMLCollection.namedItem documentation> -namedItem ::-          (MonadIO m, IsHTMLCollection self, ToJSString name) =>-            self -> name -> m (Maybe Node)-namedItem self name-  = liftIO-      (nullableToMaybe <$>-         (js_namedItem (toHTMLCollection self) (toJSString name)))- -foreign import javascript unsafe "$1[\"length\"]" js_getLength ::-        HTMLCollection -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLCollection.length Mozilla HTMLCollection.length documentation> -getLength :: (MonadIO m, IsHTMLCollection self) => self -> m Word-getLength self = liftIO (js_getLength (toHTMLCollection self))

− src/GHCJS/DOM/JSFFI/Generated/HTMLDListElement.hs

@@ -1,33 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLDListElement-       (js_setCompact, setCompact, js_getCompact, getCompact,-        HTMLDListElement, castToHTMLDListElement, gTypeHTMLDListElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"compact\"] = $2;"-        js_setCompact :: HTMLDListElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDListElement.compact Mozilla HTMLDListElement.compact documentation> -setCompact :: (MonadIO m) => HTMLDListElement -> Bool -> m ()-setCompact self val = liftIO (js_setCompact (self) val)- -foreign import javascript unsafe "($1[\"compact\"] ? 1 : 0)"-        js_getCompact :: HTMLDListElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDListElement.compact Mozilla HTMLDListElement.compact documentation> -getCompact :: (MonadIO m) => HTMLDListElement -> m Bool-getCompact self = liftIO (js_getCompact (self))

− src/GHCJS/DOM/JSFFI/Generated/HTMLDataListElement.hs

@@ -1,28 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLDataListElement-       (js_getOptions, getOptions, HTMLDataListElement,-        castToHTMLDataListElement, gTypeHTMLDataListElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"options\"]" js_getOptions ::-        HTMLDataListElement -> IO (Nullable HTMLCollection)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDataListElement.options Mozilla HTMLDataListElement.options documentation> -getOptions ::-           (MonadIO m) => HTMLDataListElement -> m (Maybe HTMLCollection)-getOptions self-  = liftIO (nullableToMaybe <$> (js_getOptions (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLDetailsElement.hs

@@ -1,33 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLDetailsElement-       (js_setOpen, setOpen, js_getOpen, getOpen, HTMLDetailsElement,-        castToHTMLDetailsElement, gTypeHTMLDetailsElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"open\"] = $2;" js_setOpen ::-        HTMLDetailsElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDetailsElement.open Mozilla HTMLDetailsElement.open documentation> -setOpen :: (MonadIO m) => HTMLDetailsElement -> Bool -> m ()-setOpen self val = liftIO (js_setOpen (self) val)- -foreign import javascript unsafe "($1[\"open\"] ? 1 : 0)"-        js_getOpen :: HTMLDetailsElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDetailsElement.open Mozilla HTMLDetailsElement.open documentation> -getOpen :: (MonadIO m) => HTMLDetailsElement -> m Bool-getOpen self = liftIO (js_getOpen (self))

− src/GHCJS/DOM/JSFFI/Generated/HTMLDirectoryElement.hs

@@ -1,34 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLDirectoryElement-       (js_setCompact, setCompact, js_getCompact, getCompact,-        HTMLDirectoryElement, castToHTMLDirectoryElement,-        gTypeHTMLDirectoryElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"compact\"] = $2;"-        js_setCompact :: HTMLDirectoryElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDirectoryElement.compact Mozilla HTMLDirectoryElement.compact documentation> -setCompact :: (MonadIO m) => HTMLDirectoryElement -> Bool -> m ()-setCompact self val = liftIO (js_setCompact (self) val)- -foreign import javascript unsafe "($1[\"compact\"] ? 1 : 0)"-        js_getCompact :: HTMLDirectoryElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDirectoryElement.compact Mozilla HTMLDirectoryElement.compact documentation> -getCompact :: (MonadIO m) => HTMLDirectoryElement -> m Bool-getCompact self = liftIO (js_getCompact (self))

− src/GHCJS/DOM/JSFFI/Generated/HTMLDivElement.hs

@@ -1,35 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLDivElement-       (js_setAlign, setAlign, js_getAlign, getAlign, HTMLDivElement,-        castToHTMLDivElement, gTypeHTMLDivElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign-        :: HTMLDivElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDivElement.align Mozilla HTMLDivElement.align documentation> -setAlign ::-         (MonadIO m, ToJSString val) => HTMLDivElement -> val -> m ()-setAlign self val = liftIO (js_setAlign (self) (toJSString val))- -foreign import javascript unsafe "$1[\"align\"]" js_getAlign ::-        HTMLDivElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDivElement.align Mozilla HTMLDivElement.align documentation> -getAlign ::-         (MonadIO m, FromJSString result) => HTMLDivElement -> m result-getAlign self = liftIO (fromJSString <$> (js_getAlign (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLDocument.hs

@@ -1,269 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLDocument-       (js_open, open, js_close, close, js_write, write, js_writeln,-        writeln, js_clear, clear, js_captureEvents, captureEvents,-        js_releaseEvents, releaseEvents, js_getEmbeds, getEmbeds,-        js_getPlugins, getPlugins, js_getScripts, getScripts, js_getAll,-        getAll, js_getWidth, getWidth, js_getHeight, getHeight, js_setDir,-        setDir, js_getDir, getDir, js_setDesignMode, setDesignMode,-        js_getDesignMode, getDesignMode, js_getCompatMode, getCompatMode,-        js_setBgColor, setBgColor, js_getBgColor, getBgColor,-        js_setFgColor, setFgColor, js_getFgColor, getFgColor,-        js_setAlinkColor, setAlinkColor, js_getAlinkColor, getAlinkColor,-        js_setLinkColor, setLinkColor, js_getLinkColor, getLinkColor,-        js_setVlinkColor, setVlinkColor, js_getVlinkColor, getVlinkColor,-        HTMLDocument, castToHTMLDocument, gTypeHTMLDocument)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"open\"]()" js_open ::-        HTMLDocument -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.open Mozilla HTMLDocument.open documentation> -open :: (MonadIO m) => HTMLDocument -> m ()-open self = liftIO (js_open (self))- -foreign import javascript unsafe "$1[\"close\"]()" js_close ::-        HTMLDocument -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.close Mozilla HTMLDocument.close documentation> -close :: (MonadIO m) => HTMLDocument -> m ()-close self = liftIO (js_close (self))- -foreign import javascript unsafe "$1[\"write\"]($2)" js_write ::-        HTMLDocument -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.write Mozilla HTMLDocument.write documentation> -write ::-      (MonadIO m, ToJSString text) => HTMLDocument -> text -> m ()-write self text = liftIO (js_write (self) (toJSString text))- -foreign import javascript unsafe "$1[\"writeln\"]($2)" js_writeln-        :: HTMLDocument -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.writeln Mozilla HTMLDocument.writeln documentation> -writeln ::-        (MonadIO m, ToJSString text) => HTMLDocument -> text -> m ()-writeln self text = liftIO (js_writeln (self) (toJSString text))- -foreign import javascript unsafe "$1[\"clear\"]()" js_clear ::-        HTMLDocument -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.clear Mozilla HTMLDocument.clear documentation> -clear :: (MonadIO m) => HTMLDocument -> m ()-clear self = liftIO (js_clear (self))- -foreign import javascript unsafe "$1[\"captureEvents\"]()"-        js_captureEvents :: HTMLDocument -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.captureEvents Mozilla HTMLDocument.captureEvents documentation> -captureEvents :: (MonadIO m) => HTMLDocument -> m ()-captureEvents self = liftIO (js_captureEvents (self))- -foreign import javascript unsafe "$1[\"releaseEvents\"]()"-        js_releaseEvents :: HTMLDocument -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.releaseEvents Mozilla HTMLDocument.releaseEvents documentation> -releaseEvents :: (MonadIO m) => HTMLDocument -> m ()-releaseEvents self = liftIO (js_releaseEvents (self))- -foreign import javascript unsafe "$1[\"embeds\"]" js_getEmbeds ::-        HTMLDocument -> IO (Nullable HTMLCollection)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.embeds Mozilla HTMLDocument.embeds documentation> -getEmbeds ::-          (MonadIO m) => HTMLDocument -> m (Maybe HTMLCollection)-getEmbeds self = liftIO (nullableToMaybe <$> (js_getEmbeds (self)))- -foreign import javascript unsafe "$1[\"plugins\"]" js_getPlugins ::-        HTMLDocument -> IO (Nullable HTMLCollection)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.plugins Mozilla HTMLDocument.plugins documentation> -getPlugins ::-           (MonadIO m) => HTMLDocument -> m (Maybe HTMLCollection)-getPlugins self-  = liftIO (nullableToMaybe <$> (js_getPlugins (self)))- -foreign import javascript unsafe "$1[\"scripts\"]" js_getScripts ::-        HTMLDocument -> IO (Nullable HTMLCollection)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.scripts Mozilla HTMLDocument.scripts documentation> -getScripts ::-           (MonadIO m) => HTMLDocument -> m (Maybe HTMLCollection)-getScripts self-  = liftIO (nullableToMaybe <$> (js_getScripts (self)))- -foreign import javascript unsafe "$1[\"all\"]" js_getAll ::-        HTMLDocument -> IO (Nullable HTMLAllCollection)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.all Mozilla HTMLDocument.all documentation> -getAll ::-       (MonadIO m) => HTMLDocument -> m (Maybe HTMLAllCollection)-getAll self = liftIO (nullableToMaybe <$> (js_getAll (self)))- -foreign import javascript unsafe "$1[\"width\"]" js_getWidth ::-        HTMLDocument -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.width Mozilla HTMLDocument.width documentation> -getWidth :: (MonadIO m) => HTMLDocument -> m Int-getWidth self = liftIO (js_getWidth (self))- -foreign import javascript unsafe "$1[\"height\"]" js_getHeight ::-        HTMLDocument -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.height Mozilla HTMLDocument.height documentation> -getHeight :: (MonadIO m) => HTMLDocument -> m Int-getHeight self = liftIO (js_getHeight (self))- -foreign import javascript unsafe "$1[\"dir\"] = $2;" js_setDir ::-        HTMLDocument -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.dir Mozilla HTMLDocument.dir documentation> -setDir ::-       (MonadIO m, ToJSString val) => HTMLDocument -> Maybe val -> m ()-setDir self val = liftIO (js_setDir (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"dir\"]" js_getDir ::-        HTMLDocument -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.dir Mozilla HTMLDocument.dir documentation> -getDir ::-       (MonadIO m, FromJSString result) =>-         HTMLDocument -> m (Maybe result)-getDir self = liftIO (fromMaybeJSString <$> (js_getDir (self)))- -foreign import javascript unsafe "$1[\"designMode\"] = $2;"-        js_setDesignMode :: HTMLDocument -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.designMode Mozilla HTMLDocument.designMode documentation> -setDesignMode ::-              (MonadIO m, ToJSString val) => HTMLDocument -> Maybe val -> m ()-setDesignMode self val-  = liftIO (js_setDesignMode (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"designMode\"]"-        js_getDesignMode :: HTMLDocument -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.designMode Mozilla HTMLDocument.designMode documentation> -getDesignMode ::-              (MonadIO m, FromJSString result) =>-                HTMLDocument -> m (Maybe result)-getDesignMode self-  = liftIO (fromMaybeJSString <$> (js_getDesignMode (self)))- -foreign import javascript unsafe "$1[\"compatMode\"]"-        js_getCompatMode :: HTMLDocument -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.compatMode Mozilla HTMLDocument.compatMode documentation> -getCompatMode ::-              (MonadIO m, FromJSString result) => HTMLDocument -> m result-getCompatMode self-  = liftIO (fromJSString <$> (js_getCompatMode (self)))- -foreign import javascript unsafe "$1[\"bgColor\"] = $2;"-        js_setBgColor :: HTMLDocument -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.bgColor Mozilla HTMLDocument.bgColor documentation> -setBgColor ::-           (MonadIO m, ToJSString val) => HTMLDocument -> Maybe val -> m ()-setBgColor self val-  = liftIO (js_setBgColor (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"bgColor\"]" js_getBgColor ::-        HTMLDocument -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.bgColor Mozilla HTMLDocument.bgColor documentation> -getBgColor ::-           (MonadIO m, FromJSString result) =>-             HTMLDocument -> m (Maybe result)-getBgColor self-  = liftIO (fromMaybeJSString <$> (js_getBgColor (self)))- -foreign import javascript unsafe "$1[\"fgColor\"] = $2;"-        js_setFgColor :: HTMLDocument -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.fgColor Mozilla HTMLDocument.fgColor documentation> -setFgColor ::-           (MonadIO m, ToJSString val) => HTMLDocument -> Maybe val -> m ()-setFgColor self val-  = liftIO (js_setFgColor (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"fgColor\"]" js_getFgColor ::-        HTMLDocument -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.fgColor Mozilla HTMLDocument.fgColor documentation> -getFgColor ::-           (MonadIO m, FromJSString result) =>-             HTMLDocument -> m (Maybe result)-getFgColor self-  = liftIO (fromMaybeJSString <$> (js_getFgColor (self)))- -foreign import javascript unsafe "$1[\"alinkColor\"] = $2;"-        js_setAlinkColor :: HTMLDocument -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.alinkColor Mozilla HTMLDocument.alinkColor documentation> -setAlinkColor ::-              (MonadIO m, ToJSString val) => HTMLDocument -> Maybe val -> m ()-setAlinkColor self val-  = liftIO (js_setAlinkColor (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"alinkColor\"]"-        js_getAlinkColor :: HTMLDocument -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.alinkColor Mozilla HTMLDocument.alinkColor documentation> -getAlinkColor ::-              (MonadIO m, FromJSString result) =>-                HTMLDocument -> m (Maybe result)-getAlinkColor self-  = liftIO (fromMaybeJSString <$> (js_getAlinkColor (self)))- -foreign import javascript unsafe "$1[\"linkColor\"] = $2;"-        js_setLinkColor :: HTMLDocument -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.linkColor Mozilla HTMLDocument.linkColor documentation> -setLinkColor ::-             (MonadIO m, ToJSString val) => HTMLDocument -> Maybe val -> m ()-setLinkColor self val-  = liftIO (js_setLinkColor (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"linkColor\"]"-        js_getLinkColor :: HTMLDocument -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.linkColor Mozilla HTMLDocument.linkColor documentation> -getLinkColor ::-             (MonadIO m, FromJSString result) =>-               HTMLDocument -> m (Maybe result)-getLinkColor self-  = liftIO (fromMaybeJSString <$> (js_getLinkColor (self)))- -foreign import javascript unsafe "$1[\"vlinkColor\"] = $2;"-        js_setVlinkColor :: HTMLDocument -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.vlinkColor Mozilla HTMLDocument.vlinkColor documentation> -setVlinkColor ::-              (MonadIO m, ToJSString val) => HTMLDocument -> Maybe val -> m ()-setVlinkColor self val-  = liftIO (js_setVlinkColor (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"vlinkColor\"]"-        js_getVlinkColor :: HTMLDocument -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLDocument.vlinkColor Mozilla HTMLDocument.vlinkColor documentation> -getVlinkColor ::-              (MonadIO m, FromJSString result) =>-                HTMLDocument -> m (Maybe result)-getVlinkColor self-  = liftIO (fromMaybeJSString <$> (js_getVlinkColor (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLElement.hs

@@ -1,355 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLElement-       (js_insertAdjacentElement, insertAdjacentElement,-        js_insertAdjacentHTML, insertAdjacentHTML, js_insertAdjacentText,-        insertAdjacentText, js_click, click, js_setTitle, setTitle,-        js_getTitle, getTitle, js_setLang, setLang, js_getLang, getLang,-        js_setTranslate, setTranslate, js_getTranslate, getTranslate,-        js_setDir, setDir, js_getDir, getDir, js_setTabIndex, setTabIndex,-        js_getTabIndex, getTabIndex, js_setDraggable, setDraggable,-        js_getDraggable, getDraggable, js_setWebkitdropzone,-        setWebkitdropzone, js_getWebkitdropzone, getWebkitdropzone,-        js_setHidden, setHidden, js_getHidden, getHidden, js_setAccessKey,-        setAccessKey, js_getAccessKey, getAccessKey, js_setInnerText,-        setInnerText, js_getInnerText, getInnerText, js_setOuterText,-        setOuterText, js_getOuterText, getOuterText, js_getChildren,-        getChildren, js_setContentEditable, setContentEditable,-        js_getContentEditable, getContentEditable, js_getIsContentEditable,-        getIsContentEditable, js_setSpellcheck, setSpellcheck,-        js_getSpellcheck, getSpellcheck, HTMLElement, castToHTMLElement,-        gTypeHTMLElement, IsHTMLElement, toHTMLElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe-        "$1[\"insertAdjacentElement\"]($2,\n$3)" js_insertAdjacentElement-        ::-        HTMLElement ->-          JSString -> Nullable Element -> IO (Nullable Element)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.insertAdjacentElement Mozilla HTMLElement.insertAdjacentElement documentation> -insertAdjacentElement ::-                      (MonadIO m, IsHTMLElement self, ToJSString where',-                       IsElement element) =>-                        self -> where' -> Maybe element -> m (Maybe Element)-insertAdjacentElement self where' element-  = liftIO-      (nullableToMaybe <$>-         (js_insertAdjacentElement (toHTMLElement self) (toJSString where')-            (maybeToNullable (fmap toElement element))))- -foreign import javascript unsafe-        "$1[\"insertAdjacentHTML\"]($2, $3)" js_insertAdjacentHTML ::-        HTMLElement -> JSString -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.insertAdjacentHTML Mozilla HTMLElement.insertAdjacentHTML documentation> -insertAdjacentHTML ::-                   (MonadIO m, IsHTMLElement self, ToJSString where',-                    ToJSString html) =>-                     self -> where' -> html -> m ()-insertAdjacentHTML self where' html-  = liftIO-      (js_insertAdjacentHTML (toHTMLElement self) (toJSString where')-         (toJSString html))- -foreign import javascript unsafe-        "$1[\"insertAdjacentText\"]($2, $3)" js_insertAdjacentText ::-        HTMLElement -> JSString -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.insertAdjacentText Mozilla HTMLElement.insertAdjacentText documentation> -insertAdjacentText ::-                   (MonadIO m, IsHTMLElement self, ToJSString where',-                    ToJSString text) =>-                     self -> where' -> text -> m ()-insertAdjacentText self where' text-  = liftIO-      (js_insertAdjacentText (toHTMLElement self) (toJSString where')-         (toJSString text))- -foreign import javascript unsafe "$1[\"click\"]()" js_click ::-        HTMLElement -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.click Mozilla HTMLElement.click documentation> -click :: (MonadIO m, IsHTMLElement self) => self -> m ()-click self = liftIO (js_click (toHTMLElement self))- -foreign import javascript unsafe "$1[\"title\"] = $2;" js_setTitle-        :: HTMLElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.title Mozilla HTMLElement.title documentation> -setTitle ::-         (MonadIO m, IsHTMLElement self, ToJSString val) =>-           self -> val -> m ()-setTitle self val-  = liftIO (js_setTitle (toHTMLElement self) (toJSString val))- -foreign import javascript unsafe "$1[\"title\"]" js_getTitle ::-        HTMLElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.title Mozilla HTMLElement.title documentation> -getTitle ::-         (MonadIO m, IsHTMLElement self, FromJSString result) =>-           self -> m result-getTitle self-  = liftIO (fromJSString <$> (js_getTitle (toHTMLElement self)))- -foreign import javascript unsafe "$1[\"lang\"] = $2;" js_setLang ::-        HTMLElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.lang Mozilla HTMLElement.lang documentation> -setLang ::-        (MonadIO m, IsHTMLElement self, ToJSString val) =>-          self -> val -> m ()-setLang self val-  = liftIO (js_setLang (toHTMLElement self) (toJSString val))- -foreign import javascript unsafe "$1[\"lang\"]" js_getLang ::-        HTMLElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.lang Mozilla HTMLElement.lang documentation> -getLang ::-        (MonadIO m, IsHTMLElement self, FromJSString result) =>-          self -> m result-getLang self-  = liftIO (fromJSString <$> (js_getLang (toHTMLElement self)))- -foreign import javascript unsafe "$1[\"translate\"] = $2;"-        js_setTranslate :: HTMLElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.translate Mozilla HTMLElement.translate documentation> -setTranslate ::-             (MonadIO m, IsHTMLElement self) => self -> Bool -> m ()-setTranslate self val-  = liftIO (js_setTranslate (toHTMLElement self) val)- -foreign import javascript unsafe "($1[\"translate\"] ? 1 : 0)"-        js_getTranslate :: HTMLElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.translate Mozilla HTMLElement.translate documentation> -getTranslate :: (MonadIO m, IsHTMLElement self) => self -> m Bool-getTranslate self = liftIO (js_getTranslate (toHTMLElement self))- -foreign import javascript unsafe "$1[\"dir\"] = $2;" js_setDir ::-        HTMLElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.dir Mozilla HTMLElement.dir documentation> -setDir ::-       (MonadIO m, IsHTMLElement self, ToJSString val) =>-         self -> val -> m ()-setDir self val-  = liftIO (js_setDir (toHTMLElement self) (toJSString val))- -foreign import javascript unsafe "$1[\"dir\"]" js_getDir ::-        HTMLElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.dir Mozilla HTMLElement.dir documentation> -getDir ::-       (MonadIO m, IsHTMLElement self, FromJSString result) =>-         self -> m result-getDir self-  = liftIO (fromJSString <$> (js_getDir (toHTMLElement self)))- -foreign import javascript unsafe "$1[\"tabIndex\"] = $2;"-        js_setTabIndex :: HTMLElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.tabIndex Mozilla HTMLElement.tabIndex documentation> -setTabIndex ::-            (MonadIO m, IsHTMLElement self) => self -> Int -> m ()-setTabIndex self val-  = liftIO (js_setTabIndex (toHTMLElement self) val)- -foreign import javascript unsafe "$1[\"tabIndex\"]" js_getTabIndex-        :: HTMLElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.tabIndex Mozilla HTMLElement.tabIndex documentation> -getTabIndex :: (MonadIO m, IsHTMLElement self) => self -> m Int-getTabIndex self = liftIO (js_getTabIndex (toHTMLElement self))- -foreign import javascript unsafe "$1[\"draggable\"] = $2;"-        js_setDraggable :: HTMLElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.draggable Mozilla HTMLElement.draggable documentation> -setDraggable ::-             (MonadIO m, IsHTMLElement self) => self -> Bool -> m ()-setDraggable self val-  = liftIO (js_setDraggable (toHTMLElement self) val)- -foreign import javascript unsafe "($1[\"draggable\"] ? 1 : 0)"-        js_getDraggable :: HTMLElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.draggable Mozilla HTMLElement.draggable documentation> -getDraggable :: (MonadIO m, IsHTMLElement self) => self -> m Bool-getDraggable self = liftIO (js_getDraggable (toHTMLElement self))- -foreign import javascript unsafe "$1[\"webkitdropzone\"] = $2;"-        js_setWebkitdropzone :: HTMLElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.webkitdropzone Mozilla HTMLElement.webkitdropzone documentation> -setWebkitdropzone ::-                  (MonadIO m, IsHTMLElement self, ToJSString val) =>-                    self -> val -> m ()-setWebkitdropzone self val-  = liftIO-      (js_setWebkitdropzone (toHTMLElement self) (toJSString val))- -foreign import javascript unsafe "$1[\"webkitdropzone\"]"-        js_getWebkitdropzone :: HTMLElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.webkitdropzone Mozilla HTMLElement.webkitdropzone documentation> -getWebkitdropzone ::-                  (MonadIO m, IsHTMLElement self, FromJSString result) =>-                    self -> m result-getWebkitdropzone self-  = liftIO-      (fromJSString <$> (js_getWebkitdropzone (toHTMLElement self)))- -foreign import javascript unsafe "$1[\"hidden\"] = $2;"-        js_setHidden :: HTMLElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.hidden Mozilla HTMLElement.hidden documentation> -setHidden ::-          (MonadIO m, IsHTMLElement self) => self -> Bool -> m ()-setHidden self val = liftIO (js_setHidden (toHTMLElement self) val)- -foreign import javascript unsafe "($1[\"hidden\"] ? 1 : 0)"-        js_getHidden :: HTMLElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.hidden Mozilla HTMLElement.hidden documentation> -getHidden :: (MonadIO m, IsHTMLElement self) => self -> m Bool-getHidden self = liftIO (js_getHidden (toHTMLElement self))- -foreign import javascript unsafe "$1[\"accessKey\"] = $2;"-        js_setAccessKey :: HTMLElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.accessKey Mozilla HTMLElement.accessKey documentation> -setAccessKey ::-             (MonadIO m, IsHTMLElement self, ToJSString val) =>-               self -> val -> m ()-setAccessKey self val-  = liftIO (js_setAccessKey (toHTMLElement self) (toJSString val))- -foreign import javascript unsafe "$1[\"accessKey\"]"-        js_getAccessKey :: HTMLElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.accessKey Mozilla HTMLElement.accessKey documentation> -getAccessKey ::-             (MonadIO m, IsHTMLElement self, FromJSString result) =>-               self -> m result-getAccessKey self-  = liftIO (fromJSString <$> (js_getAccessKey (toHTMLElement self)))- -foreign import javascript unsafe "$1[\"innerText\"] = $2;"-        js_setInnerText :: HTMLElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.innerText Mozilla HTMLElement.innerText documentation> -setInnerText ::-             (MonadIO m, IsHTMLElement self, ToJSString val) =>-               self -> Maybe val -> m ()-setInnerText self val-  = liftIO-      (js_setInnerText (toHTMLElement self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"innerText\"]"-        js_getInnerText :: HTMLElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.innerText Mozilla HTMLElement.innerText documentation> -getInnerText ::-             (MonadIO m, IsHTMLElement self, FromJSString result) =>-               self -> m (Maybe result)-getInnerText self-  = liftIO-      (fromMaybeJSString <$> (js_getInnerText (toHTMLElement self)))- -foreign import javascript unsafe "$1[\"outerText\"] = $2;"-        js_setOuterText :: HTMLElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.outerText Mozilla HTMLElement.outerText documentation> -setOuterText ::-             (MonadIO m, IsHTMLElement self, ToJSString val) =>-               self -> Maybe val -> m ()-setOuterText self val-  = liftIO-      (js_setOuterText (toHTMLElement self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"outerText\"]"-        js_getOuterText :: HTMLElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.outerText Mozilla HTMLElement.outerText documentation> -getOuterText ::-             (MonadIO m, IsHTMLElement self, FromJSString result) =>-               self -> m (Maybe result)-getOuterText self-  = liftIO-      (fromMaybeJSString <$> (js_getOuterText (toHTMLElement self)))- -foreign import javascript unsafe "$1[\"children\"]" js_getChildren-        :: HTMLElement -> IO (Nullable HTMLCollection)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.children Mozilla HTMLElement.children documentation> -getChildren ::-            (MonadIO m, IsHTMLElement self) => self -> m (Maybe HTMLCollection)-getChildren self-  = liftIO-      (nullableToMaybe <$> (js_getChildren (toHTMLElement self)))- -foreign import javascript unsafe "$1[\"contentEditable\"] = $2;"-        js_setContentEditable :: HTMLElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.contentEditable Mozilla HTMLElement.contentEditable documentation> -setContentEditable ::-                   (MonadIO m, IsHTMLElement self, ToJSString val) =>-                     self -> Maybe val -> m ()-setContentEditable self val-  = liftIO-      (js_setContentEditable (toHTMLElement self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"contentEditable\"]"-        js_getContentEditable :: HTMLElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.contentEditable Mozilla HTMLElement.contentEditable documentation> -getContentEditable ::-                   (MonadIO m, IsHTMLElement self, FromJSString result) =>-                     self -> m (Maybe result)-getContentEditable self-  = liftIO-      (fromMaybeJSString <$>-         (js_getContentEditable (toHTMLElement self)))- -foreign import javascript unsafe-        "($1[\"isContentEditable\"] ? 1 : 0)" js_getIsContentEditable ::-        HTMLElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.isContentEditable Mozilla HTMLElement.isContentEditable documentation> -getIsContentEditable ::-                     (MonadIO m, IsHTMLElement self) => self -> m Bool-getIsContentEditable self-  = liftIO (js_getIsContentEditable (toHTMLElement self))- -foreign import javascript unsafe "$1[\"spellcheck\"] = $2;"-        js_setSpellcheck :: HTMLElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.spellcheck Mozilla HTMLElement.spellcheck documentation> -setSpellcheck ::-              (MonadIO m, IsHTMLElement self) => self -> Bool -> m ()-setSpellcheck self val-  = liftIO (js_setSpellcheck (toHTMLElement self) val)- -foreign import javascript unsafe "($1[\"spellcheck\"] ? 1 : 0)"-        js_getSpellcheck :: HTMLElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.spellcheck Mozilla HTMLElement.spellcheck documentation> -getSpellcheck :: (MonadIO m, IsHTMLElement self) => self -> m Bool-getSpellcheck self = liftIO (js_getSpellcheck (toHTMLElement self))

− src/GHCJS/DOM/JSFFI/Generated/HTMLEmbedElement.hs

@@ -1,128 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLEmbedElement-       (js_getSVGDocument, getSVGDocument, js_setAlign, setAlign,-        js_getAlign, getAlign, js_setHeight, setHeight, js_getHeight,-        getHeight, js_setName, setName, js_getName, getName, js_setSrc,-        setSrc, js_getSrc, getSrc, js_setType, setType, js_getType,-        getType, js_setWidth, setWidth, js_getWidth, getWidth,-        HTMLEmbedElement, castToHTMLEmbedElement, gTypeHTMLEmbedElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"getSVGDocument\"]()"-        js_getSVGDocument :: HTMLEmbedElement -> IO (Nullable SVGDocument)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLEmbedElement.getSVGDocument Mozilla HTMLEmbedElement.getSVGDocument documentation> -getSVGDocument ::-               (MonadIO m) => HTMLEmbedElement -> m (Maybe SVGDocument)-getSVGDocument self-  = liftIO (nullableToMaybe <$> (js_getSVGDocument (self)))- -foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign-        :: HTMLEmbedElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLEmbedElement.align Mozilla HTMLEmbedElement.align documentation> -setAlign ::-         (MonadIO m, ToJSString val) => HTMLEmbedElement -> val -> m ()-setAlign self val = liftIO (js_setAlign (self) (toJSString val))- -foreign import javascript unsafe "$1[\"align\"]" js_getAlign ::-        HTMLEmbedElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLEmbedElement.align Mozilla HTMLEmbedElement.align documentation> -getAlign ::-         (MonadIO m, FromJSString result) => HTMLEmbedElement -> m result-getAlign self = liftIO (fromJSString <$> (js_getAlign (self)))- -foreign import javascript unsafe "$1[\"height\"] = $2;"-        js_setHeight :: HTMLEmbedElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLEmbedElement.height Mozilla HTMLEmbedElement.height documentation> -setHeight ::-          (MonadIO m, ToJSString val) => HTMLEmbedElement -> val -> m ()-setHeight self val = liftIO (js_setHeight (self) (toJSString val))- -foreign import javascript unsafe "$1[\"height\"]" js_getHeight ::-        HTMLEmbedElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLEmbedElement.height Mozilla HTMLEmbedElement.height documentation> -getHeight ::-          (MonadIO m, FromJSString result) => HTMLEmbedElement -> m result-getHeight self = liftIO (fromJSString <$> (js_getHeight (self)))- -foreign import javascript unsafe "$1[\"name\"] = $2;" js_setName ::-        HTMLEmbedElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLEmbedElement.name Mozilla HTMLEmbedElement.name documentation> -setName ::-        (MonadIO m, ToJSString val) => HTMLEmbedElement -> val -> m ()-setName self val = liftIO (js_setName (self) (toJSString val))- -foreign import javascript unsafe "$1[\"name\"]" js_getName ::-        HTMLEmbedElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLEmbedElement.name Mozilla HTMLEmbedElement.name documentation> -getName ::-        (MonadIO m, FromJSString result) => HTMLEmbedElement -> m result-getName self = liftIO (fromJSString <$> (js_getName (self)))- -foreign import javascript unsafe "$1[\"src\"] = $2;" js_setSrc ::-        HTMLEmbedElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLEmbedElement.src Mozilla HTMLEmbedElement.src documentation> -setSrc ::-       (MonadIO m, ToJSString val) => HTMLEmbedElement -> val -> m ()-setSrc self val = liftIO (js_setSrc (self) (toJSString val))- -foreign import javascript unsafe "$1[\"src\"]" js_getSrc ::-        HTMLEmbedElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLEmbedElement.src Mozilla HTMLEmbedElement.src documentation> -getSrc ::-       (MonadIO m, FromJSString result) => HTMLEmbedElement -> m result-getSrc self = liftIO (fromJSString <$> (js_getSrc (self)))- -foreign import javascript unsafe "$1[\"type\"] = $2;" js_setType ::-        HTMLEmbedElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLEmbedElement.type Mozilla HTMLEmbedElement.type documentation> -setType ::-        (MonadIO m, ToJSString val) => HTMLEmbedElement -> val -> m ()-setType self val = liftIO (js_setType (self) (toJSString val))- -foreign import javascript unsafe "$1[\"type\"]" js_getType ::-        HTMLEmbedElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLEmbedElement.type Mozilla HTMLEmbedElement.type documentation> -getType ::-        (MonadIO m, FromJSString result) => HTMLEmbedElement -> m result-getType self = liftIO (fromJSString <$> (js_getType (self)))- -foreign import javascript unsafe "$1[\"width\"] = $2;" js_setWidth-        :: HTMLEmbedElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLEmbedElement.width Mozilla HTMLEmbedElement.width documentation> -setWidth ::-         (MonadIO m, ToJSString val) => HTMLEmbedElement -> val -> m ()-setWidth self val = liftIO (js_setWidth (self) (toJSString val))- -foreign import javascript unsafe "$1[\"width\"]" js_getWidth ::-        HTMLEmbedElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLEmbedElement.width Mozilla HTMLEmbedElement.width documentation> -getWidth ::-         (MonadIO m, FromJSString result) => HTMLEmbedElement -> m result-getWidth self = liftIO (fromJSString <$> (js_getWidth (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLFieldSetElement.hs

@@ -1,123 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLFieldSetElement-       (js_checkValidity, checkValidity, js_setCustomValidity,-        setCustomValidity, js_setDisabled, setDisabled, js_getDisabled,-        getDisabled, js_getForm, getForm, js_setName, setName, js_getName,-        getName, js_getType, getType, js_getElements, getElements,-        js_getWillValidate, getWillValidate, js_getValidity, getValidity,-        js_getValidationMessage, getValidationMessage, HTMLFieldSetElement,-        castToHTMLFieldSetElement, gTypeHTMLFieldSetElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe-        "($1[\"checkValidity\"]() ? 1 : 0)" js_checkValidity ::-        HTMLFieldSetElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFieldSetElement.checkValidity Mozilla HTMLFieldSetElement.checkValidity documentation> -checkValidity :: (MonadIO m) => HTMLFieldSetElement -> m Bool-checkValidity self = liftIO (js_checkValidity (self))- -foreign import javascript unsafe "$1[\"setCustomValidity\"]($2)"-        js_setCustomValidity ::-        HTMLFieldSetElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFieldSetElement.setCustomValidity Mozilla HTMLFieldSetElement.setCustomValidity documentation> -setCustomValidity ::-                  (MonadIO m, ToJSString error) =>-                    HTMLFieldSetElement -> Maybe error -> m ()-setCustomValidity self error-  = liftIO (js_setCustomValidity (self) (toMaybeJSString error))- -foreign import javascript unsafe "$1[\"disabled\"] = $2;"-        js_setDisabled :: HTMLFieldSetElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFieldSetElement.disabled Mozilla HTMLFieldSetElement.disabled documentation> -setDisabled :: (MonadIO m) => HTMLFieldSetElement -> Bool -> m ()-setDisabled self val = liftIO (js_setDisabled (self) val)- -foreign import javascript unsafe "($1[\"disabled\"] ? 1 : 0)"-        js_getDisabled :: HTMLFieldSetElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFieldSetElement.disabled Mozilla HTMLFieldSetElement.disabled documentation> -getDisabled :: (MonadIO m) => HTMLFieldSetElement -> m Bool-getDisabled self = liftIO (js_getDisabled (self))- -foreign import javascript unsafe "$1[\"form\"]" js_getForm ::-        HTMLFieldSetElement -> IO (Nullable HTMLFormElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFieldSetElement.form Mozilla HTMLFieldSetElement.form documentation> -getForm ::-        (MonadIO m) => HTMLFieldSetElement -> m (Maybe HTMLFormElement)-getForm self = liftIO (nullableToMaybe <$> (js_getForm (self)))- -foreign import javascript unsafe "$1[\"name\"] = $2;" js_setName ::-        HTMLFieldSetElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFieldSetElement.name Mozilla HTMLFieldSetElement.name documentation> -setName ::-        (MonadIO m, ToJSString val) => HTMLFieldSetElement -> val -> m ()-setName self val = liftIO (js_setName (self) (toJSString val))- -foreign import javascript unsafe "$1[\"name\"]" js_getName ::-        HTMLFieldSetElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFieldSetElement.name Mozilla HTMLFieldSetElement.name documentation> -getName ::-        (MonadIO m, FromJSString result) => HTMLFieldSetElement -> m result-getName self = liftIO (fromJSString <$> (js_getName (self)))- -foreign import javascript unsafe "$1[\"type\"]" js_getType ::-        HTMLFieldSetElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFieldSetElement.type Mozilla HTMLFieldSetElement.type documentation> -getType ::-        (MonadIO m, FromJSString result) => HTMLFieldSetElement -> m result-getType self = liftIO (fromJSString <$> (js_getType (self)))- -foreign import javascript unsafe "$1[\"elements\"]" js_getElements-        :: HTMLFieldSetElement -> IO (Nullable HTMLCollection)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFieldSetElement.elements Mozilla HTMLFieldSetElement.elements documentation> -getElements ::-            (MonadIO m) => HTMLFieldSetElement -> m (Maybe HTMLCollection)-getElements self-  = liftIO (nullableToMaybe <$> (js_getElements (self)))- -foreign import javascript unsafe "($1[\"willValidate\"] ? 1 : 0)"-        js_getWillValidate :: HTMLFieldSetElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFieldSetElement.willValidate Mozilla HTMLFieldSetElement.willValidate documentation> -getWillValidate :: (MonadIO m) => HTMLFieldSetElement -> m Bool-getWillValidate self = liftIO (js_getWillValidate (self))- -foreign import javascript unsafe "$1[\"validity\"]" js_getValidity-        :: HTMLFieldSetElement -> IO (Nullable ValidityState)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFieldSetElement.validity Mozilla HTMLFieldSetElement.validity documentation> -getValidity ::-            (MonadIO m) => HTMLFieldSetElement -> m (Maybe ValidityState)-getValidity self-  = liftIO (nullableToMaybe <$> (js_getValidity (self)))- -foreign import javascript unsafe "$1[\"validationMessage\"]"-        js_getValidationMessage :: HTMLFieldSetElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFieldSetElement.validationMessage Mozilla HTMLFieldSetElement.validationMessage documentation> -getValidationMessage ::-                     (MonadIO m, FromJSString result) => HTMLFieldSetElement -> m result-getValidationMessage self-  = liftIO (fromJSString <$> (js_getValidationMessage (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLFontElement.hs

@@ -1,68 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLFontElement-       (js_setColor, setColor, js_getColor, getColor, js_setFace, setFace,-        js_getFace, getFace, js_setSize, setSize, js_getSize, getSize,-        HTMLFontElement, castToHTMLFontElement, gTypeHTMLFontElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"color\"] = $2;" js_setColor-        :: HTMLFontElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFontElement.color Mozilla HTMLFontElement.color documentation> -setColor ::-         (MonadIO m, ToJSString val) => HTMLFontElement -> val -> m ()-setColor self val = liftIO (js_setColor (self) (toJSString val))- -foreign import javascript unsafe "$1[\"color\"]" js_getColor ::-        HTMLFontElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFontElement.color Mozilla HTMLFontElement.color documentation> -getColor ::-         (MonadIO m, FromJSString result) => HTMLFontElement -> m result-getColor self = liftIO (fromJSString <$> (js_getColor (self)))- -foreign import javascript unsafe "$1[\"face\"] = $2;" js_setFace ::-        HTMLFontElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFontElement.face Mozilla HTMLFontElement.face documentation> -setFace ::-        (MonadIO m, ToJSString val) => HTMLFontElement -> val -> m ()-setFace self val = liftIO (js_setFace (self) (toJSString val))- -foreign import javascript unsafe "$1[\"face\"]" js_getFace ::-        HTMLFontElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFontElement.face Mozilla HTMLFontElement.face documentation> -getFace ::-        (MonadIO m, FromJSString result) => HTMLFontElement -> m result-getFace self = liftIO (fromJSString <$> (js_getFace (self)))- -foreign import javascript unsafe "$1[\"size\"] = $2;" js_setSize ::-        HTMLFontElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFontElement.size Mozilla HTMLFontElement.size documentation> -setSize ::-        (MonadIO m, ToJSString val) => HTMLFontElement -> val -> m ()-setSize self val = liftIO (js_setSize (self) (toJSString val))- -foreign import javascript unsafe "$1[\"size\"]" js_getSize ::-        HTMLFontElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFontElement.size Mozilla HTMLFontElement.size documentation> -getSize ::-        (MonadIO m, FromJSString result) => HTMLFontElement -> m result-getSize self = liftIO (fromJSString <$> (js_getSize (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLFormControlsCollection.hs

@@ -1,41 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLFormControlsCollection-       (js__get, _get, js_namedItem, namedItem,-        HTMLFormControlsCollection, castToHTMLFormControlsCollection,-        gTypeHTMLFormControlsCollection)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"_get\"]($2)" js__get ::-        HTMLFormControlsCollection -> Word -> IO (Nullable Node)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormControlsCollection._get Mozilla HTMLFormControlsCollection._get documentation> -_get ::-     (MonadIO m) => HTMLFormControlsCollection -> Word -> m (Maybe Node)-_get self index-  = liftIO (nullableToMaybe <$> (js__get (self) index))- -foreign import javascript unsafe "$1[\"namedItem\"]($2)"-        js_namedItem ::-        HTMLFormControlsCollection -> JSString -> IO (Nullable Node)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormControlsCollection.namedItem Mozilla HTMLFormControlsCollection.namedItem documentation> -namedItem ::-          (MonadIO m, ToJSString name) =>-            HTMLFormControlsCollection -> name -> m (Maybe Node)-namedItem self name-  = liftIO-      (nullableToMaybe <$> (js_namedItem (self) (toJSString name)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLFormElement.hs

@@ -1,284 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLFormElement-       (js__get, _get, js_submit, submit, js_reset, reset,-        js_checkValidity, checkValidity, js_requestAutocomplete,-        requestAutocomplete, js_setAcceptCharset, setAcceptCharset,-        js_getAcceptCharset, getAcceptCharset, js_setAction, setAction,-        js_getAction, getAction, js_setAutocomplete, setAutocomplete,-        js_getAutocomplete, getAutocomplete, js_setEnctype, setEnctype,-        js_getEnctype, getEnctype, js_setEncoding, setEncoding,-        js_getEncoding, getEncoding, js_setMethod, setMethod, js_getMethod,-        getMethod, js_setName, setName, js_getName, getName,-        js_setNoValidate, setNoValidate, js_getNoValidate, getNoValidate,-        js_setTarget, setTarget, js_getTarget, getTarget, js_getElements,-        getElements, js_getLength, getLength, js_setAutocorrect,-        setAutocorrect, js_getAutocorrect, getAutocorrect,-        js_setAutocapitalize, setAutocapitalize, js_getAutocapitalize,-        getAutocapitalize, autocomplete, autocompleteerror,-        HTMLFormElement, castToHTMLFormElement, gTypeHTMLFormElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"_get\"]($2)" js__get ::-        HTMLFormElement -> Word -> IO (Nullable Element)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement._get Mozilla HTMLFormElement._get documentation> -_get :: (MonadIO m) => HTMLFormElement -> Word -> m (Maybe Element)-_get self index-  = liftIO (nullableToMaybe <$> (js__get (self) index))- -foreign import javascript unsafe "$1[\"submit\"]()" js_submit ::-        HTMLFormElement -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.submit Mozilla HTMLFormElement.submit documentation> -submit :: (MonadIO m) => HTMLFormElement -> m ()-submit self = liftIO (js_submit (self))- -foreign import javascript unsafe "$1[\"reset\"]()" js_reset ::-        HTMLFormElement -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.reset Mozilla HTMLFormElement.reset documentation> -reset :: (MonadIO m) => HTMLFormElement -> m ()-reset self = liftIO (js_reset (self))- -foreign import javascript unsafe-        "($1[\"checkValidity\"]() ? 1 : 0)" js_checkValidity ::-        HTMLFormElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.checkValidity Mozilla HTMLFormElement.checkValidity documentation> -checkValidity :: (MonadIO m) => HTMLFormElement -> m Bool-checkValidity self = liftIO (js_checkValidity (self))- -foreign import javascript unsafe "$1[\"requestAutocomplete\"]()"-        js_requestAutocomplete :: HTMLFormElement -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.requestAutocomplete Mozilla HTMLFormElement.requestAutocomplete documentation> -requestAutocomplete :: (MonadIO m) => HTMLFormElement -> m ()-requestAutocomplete self = liftIO (js_requestAutocomplete (self))- -foreign import javascript unsafe "$1[\"acceptCharset\"] = $2;"-        js_setAcceptCharset :: HTMLFormElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.acceptCharset Mozilla HTMLFormElement.acceptCharset documentation> -setAcceptCharset ::-                 (MonadIO m, ToJSString val) => HTMLFormElement -> val -> m ()-setAcceptCharset self val-  = liftIO (js_setAcceptCharset (self) (toJSString val))- -foreign import javascript unsafe "$1[\"acceptCharset\"]"-        js_getAcceptCharset :: HTMLFormElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.acceptCharset Mozilla HTMLFormElement.acceptCharset documentation> -getAcceptCharset ::-                 (MonadIO m, FromJSString result) => HTMLFormElement -> m result-getAcceptCharset self-  = liftIO (fromJSString <$> (js_getAcceptCharset (self)))- -foreign import javascript unsafe "$1[\"action\"] = $2;"-        js_setAction :: HTMLFormElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.action Mozilla HTMLFormElement.action documentation> -setAction ::-          (MonadIO m, ToJSString val) => HTMLFormElement -> val -> m ()-setAction self val = liftIO (js_setAction (self) (toJSString val))- -foreign import javascript unsafe "$1[\"action\"]" js_getAction ::-        HTMLFormElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.action Mozilla HTMLFormElement.action documentation> -getAction ::-          (MonadIO m, FromJSString result) => HTMLFormElement -> m result-getAction self = liftIO (fromJSString <$> (js_getAction (self)))- -foreign import javascript unsafe "$1[\"autocomplete\"] = $2;"-        js_setAutocomplete :: HTMLFormElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.autocomplete Mozilla HTMLFormElement.autocomplete documentation> -setAutocomplete ::-                (MonadIO m, ToJSString val) => HTMLFormElement -> val -> m ()-setAutocomplete self val-  = liftIO (js_setAutocomplete (self) (toJSString val))- -foreign import javascript unsafe "$1[\"autocomplete\"]"-        js_getAutocomplete :: HTMLFormElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.autocomplete Mozilla HTMLFormElement.autocomplete documentation> -getAutocomplete ::-                (MonadIO m, FromJSString result) => HTMLFormElement -> m result-getAutocomplete self-  = liftIO (fromJSString <$> (js_getAutocomplete (self)))- -foreign import javascript unsafe "$1[\"enctype\"] = $2;"-        js_setEnctype :: HTMLFormElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.enctype Mozilla HTMLFormElement.enctype documentation> -setEnctype ::-           (MonadIO m, ToJSString val) => HTMLFormElement -> Maybe val -> m ()-setEnctype self val-  = liftIO (js_setEnctype (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"enctype\"]" js_getEnctype ::-        HTMLFormElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.enctype Mozilla HTMLFormElement.enctype documentation> -getEnctype ::-           (MonadIO m, FromJSString result) =>-             HTMLFormElement -> m (Maybe result)-getEnctype self-  = liftIO (fromMaybeJSString <$> (js_getEnctype (self)))- -foreign import javascript unsafe "$1[\"encoding\"] = $2;"-        js_setEncoding :: HTMLFormElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.encoding Mozilla HTMLFormElement.encoding documentation> -setEncoding ::-            (MonadIO m, ToJSString val) => HTMLFormElement -> Maybe val -> m ()-setEncoding self val-  = liftIO (js_setEncoding (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"encoding\"]" js_getEncoding-        :: HTMLFormElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.encoding Mozilla HTMLFormElement.encoding documentation> -getEncoding ::-            (MonadIO m, FromJSString result) =>-              HTMLFormElement -> m (Maybe result)-getEncoding self-  = liftIO (fromMaybeJSString <$> (js_getEncoding (self)))- -foreign import javascript unsafe "$1[\"method\"] = $2;"-        js_setMethod :: HTMLFormElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.method Mozilla HTMLFormElement.method documentation> -setMethod ::-          (MonadIO m, ToJSString val) => HTMLFormElement -> Maybe val -> m ()-setMethod self val-  = liftIO (js_setMethod (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"method\"]" js_getMethod ::-        HTMLFormElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.method Mozilla HTMLFormElement.method documentation> -getMethod ::-          (MonadIO m, FromJSString result) =>-            HTMLFormElement -> m (Maybe result)-getMethod self-  = liftIO (fromMaybeJSString <$> (js_getMethod (self)))- -foreign import javascript unsafe "$1[\"name\"] = $2;" js_setName ::-        HTMLFormElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.name Mozilla HTMLFormElement.name documentation> -setName ::-        (MonadIO m, ToJSString val) => HTMLFormElement -> val -> m ()-setName self val = liftIO (js_setName (self) (toJSString val))- -foreign import javascript unsafe "$1[\"name\"]" js_getName ::-        HTMLFormElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.name Mozilla HTMLFormElement.name documentation> -getName ::-        (MonadIO m, FromJSString result) => HTMLFormElement -> m result-getName self = liftIO (fromJSString <$> (js_getName (self)))- -foreign import javascript unsafe "$1[\"noValidate\"] = $2;"-        js_setNoValidate :: HTMLFormElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.noValidate Mozilla HTMLFormElement.noValidate documentation> -setNoValidate :: (MonadIO m) => HTMLFormElement -> Bool -> m ()-setNoValidate self val = liftIO (js_setNoValidate (self) val)- -foreign import javascript unsafe "($1[\"noValidate\"] ? 1 : 0)"-        js_getNoValidate :: HTMLFormElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.noValidate Mozilla HTMLFormElement.noValidate documentation> -getNoValidate :: (MonadIO m) => HTMLFormElement -> m Bool-getNoValidate self = liftIO (js_getNoValidate (self))- -foreign import javascript unsafe "$1[\"target\"] = $2;"-        js_setTarget :: HTMLFormElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.target Mozilla HTMLFormElement.target documentation> -setTarget ::-          (MonadIO m, ToJSString val) => HTMLFormElement -> val -> m ()-setTarget self val = liftIO (js_setTarget (self) (toJSString val))- -foreign import javascript unsafe "$1[\"target\"]" js_getTarget ::-        HTMLFormElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.target Mozilla HTMLFormElement.target documentation> -getTarget ::-          (MonadIO m, FromJSString result) => HTMLFormElement -> m result-getTarget self = liftIO (fromJSString <$> (js_getTarget (self)))- -foreign import javascript unsafe "$1[\"elements\"]" js_getElements-        :: HTMLFormElement -> IO (Nullable HTMLCollection)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.elements Mozilla HTMLFormElement.elements documentation> -getElements ::-            (MonadIO m) => HTMLFormElement -> m (Maybe HTMLCollection)-getElements self-  = liftIO (nullableToMaybe <$> (js_getElements (self)))- -foreign import javascript unsafe "$1[\"length\"]" js_getLength ::-        HTMLFormElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.length Mozilla HTMLFormElement.length documentation> -getLength :: (MonadIO m) => HTMLFormElement -> m Int-getLength self = liftIO (js_getLength (self))- -foreign import javascript unsafe "$1[\"autocorrect\"] = $2;"-        js_setAutocorrect :: HTMLFormElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.autocorrect Mozilla HTMLFormElement.autocorrect documentation> -setAutocorrect :: (MonadIO m) => HTMLFormElement -> Bool -> m ()-setAutocorrect self val = liftIO (js_setAutocorrect (self) val)- -foreign import javascript unsafe "($1[\"autocorrect\"] ? 1 : 0)"-        js_getAutocorrect :: HTMLFormElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.autocorrect Mozilla HTMLFormElement.autocorrect documentation> -getAutocorrect :: (MonadIO m) => HTMLFormElement -> m Bool-getAutocorrect self = liftIO (js_getAutocorrect (self))- -foreign import javascript unsafe "$1[\"autocapitalize\"] = $2;"-        js_setAutocapitalize ::-        HTMLFormElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.autocapitalize Mozilla HTMLFormElement.autocapitalize documentation> -setAutocapitalize ::-                  (MonadIO m, ToJSString val) => HTMLFormElement -> Maybe val -> m ()-setAutocapitalize self val-  = liftIO (js_setAutocapitalize (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"autocapitalize\"]"-        js_getAutocapitalize :: HTMLFormElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.autocapitalize Mozilla HTMLFormElement.autocapitalize documentation> -getAutocapitalize ::-                  (MonadIO m, FromJSString result) =>-                    HTMLFormElement -> m (Maybe result)-getAutocapitalize self-  = liftIO (fromMaybeJSString <$> (js_getAutocapitalize (self)))---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.onautocomplete Mozilla HTMLFormElement.onautocomplete documentation> -autocomplete :: EventName HTMLFormElement onautocomplete-autocomplete = unsafeEventName (toJSString "autocomplete")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFormElement.onautocompleteerror Mozilla HTMLFormElement.onautocompleteerror documentation> -autocompleteerror :: EventName HTMLFormElement onautocompleteerror-autocompleteerror-  = unsafeEventName (toJSString "autocompleteerror")

− src/GHCJS/DOM/JSFFI/Generated/HTMLFrameElement.hs

@@ -1,227 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLFrameElement-       (js_getSVGDocument, getSVGDocument, js_setFrameBorder,-        setFrameBorder, js_getFrameBorder, getFrameBorder, js_setLongDesc,-        setLongDesc, js_getLongDesc, getLongDesc, js_setMarginHeight,-        setMarginHeight, js_getMarginHeight, getMarginHeight,-        js_setMarginWidth, setMarginWidth, js_getMarginWidth,-        getMarginWidth, js_setName, setName, js_getName, getName,-        js_setNoResize, setNoResize, js_getNoResize, getNoResize,-        js_setScrolling, setScrolling, js_getScrolling, getScrolling,-        js_setSrc, setSrc, js_getSrc, getSrc, js_getContentDocument,-        getContentDocument, js_getContentWindow, getContentWindow,-        js_setLocation, setLocation, js_getLocation, getLocation,-        js_getWidth, getWidth, js_getHeight, getHeight, HTMLFrameElement,-        castToHTMLFrameElement, gTypeHTMLFrameElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"getSVGDocument\"]()"-        js_getSVGDocument :: HTMLFrameElement -> IO (Nullable SVGDocument)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameElement.getSVGDocument Mozilla HTMLFrameElement.getSVGDocument documentation> -getSVGDocument ::-               (MonadIO m) => HTMLFrameElement -> m (Maybe SVGDocument)-getSVGDocument self-  = liftIO (nullableToMaybe <$> (js_getSVGDocument (self)))- -foreign import javascript unsafe "$1[\"frameBorder\"] = $2;"-        js_setFrameBorder :: HTMLFrameElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameElement.frameBorder Mozilla HTMLFrameElement.frameBorder documentation> -setFrameBorder ::-               (MonadIO m, ToJSString val) => HTMLFrameElement -> val -> m ()-setFrameBorder self val-  = liftIO (js_setFrameBorder (self) (toJSString val))- -foreign import javascript unsafe "$1[\"frameBorder\"]"-        js_getFrameBorder :: HTMLFrameElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameElement.frameBorder Mozilla HTMLFrameElement.frameBorder documentation> -getFrameBorder ::-               (MonadIO m, FromJSString result) => HTMLFrameElement -> m result-getFrameBorder self-  = liftIO (fromJSString <$> (js_getFrameBorder (self)))- -foreign import javascript unsafe "$1[\"longDesc\"] = $2;"-        js_setLongDesc :: HTMLFrameElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameElement.longDesc Mozilla HTMLFrameElement.longDesc documentation> -setLongDesc ::-            (MonadIO m, ToJSString val) => HTMLFrameElement -> val -> m ()-setLongDesc self val-  = liftIO (js_setLongDesc (self) (toJSString val))- -foreign import javascript unsafe "$1[\"longDesc\"]" js_getLongDesc-        :: HTMLFrameElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameElement.longDesc Mozilla HTMLFrameElement.longDesc documentation> -getLongDesc ::-            (MonadIO m, FromJSString result) => HTMLFrameElement -> m result-getLongDesc self-  = liftIO (fromJSString <$> (js_getLongDesc (self)))- -foreign import javascript unsafe "$1[\"marginHeight\"] = $2;"-        js_setMarginHeight :: HTMLFrameElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameElement.marginHeight Mozilla HTMLFrameElement.marginHeight documentation> -setMarginHeight ::-                (MonadIO m, ToJSString val) => HTMLFrameElement -> val -> m ()-setMarginHeight self val-  = liftIO (js_setMarginHeight (self) (toJSString val))- -foreign import javascript unsafe "$1[\"marginHeight\"]"-        js_getMarginHeight :: HTMLFrameElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameElement.marginHeight Mozilla HTMLFrameElement.marginHeight documentation> -getMarginHeight ::-                (MonadIO m, FromJSString result) => HTMLFrameElement -> m result-getMarginHeight self-  = liftIO (fromJSString <$> (js_getMarginHeight (self)))- -foreign import javascript unsafe "$1[\"marginWidth\"] = $2;"-        js_setMarginWidth :: HTMLFrameElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameElement.marginWidth Mozilla HTMLFrameElement.marginWidth documentation> -setMarginWidth ::-               (MonadIO m, ToJSString val) => HTMLFrameElement -> val -> m ()-setMarginWidth self val-  = liftIO (js_setMarginWidth (self) (toJSString val))- -foreign import javascript unsafe "$1[\"marginWidth\"]"-        js_getMarginWidth :: HTMLFrameElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameElement.marginWidth Mozilla HTMLFrameElement.marginWidth documentation> -getMarginWidth ::-               (MonadIO m, FromJSString result) => HTMLFrameElement -> m result-getMarginWidth self-  = liftIO (fromJSString <$> (js_getMarginWidth (self)))- -foreign import javascript unsafe "$1[\"name\"] = $2;" js_setName ::-        HTMLFrameElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameElement.name Mozilla HTMLFrameElement.name documentation> -setName ::-        (MonadIO m, ToJSString val) => HTMLFrameElement -> val -> m ()-setName self val = liftIO (js_setName (self) (toJSString val))- -foreign import javascript unsafe "$1[\"name\"]" js_getName ::-        HTMLFrameElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameElement.name Mozilla HTMLFrameElement.name documentation> -getName ::-        (MonadIO m, FromJSString result) => HTMLFrameElement -> m result-getName self = liftIO (fromJSString <$> (js_getName (self)))- -foreign import javascript unsafe "$1[\"noResize\"] = $2;"-        js_setNoResize :: HTMLFrameElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameElement.noResize Mozilla HTMLFrameElement.noResize documentation> -setNoResize :: (MonadIO m) => HTMLFrameElement -> Bool -> m ()-setNoResize self val = liftIO (js_setNoResize (self) val)- -foreign import javascript unsafe "($1[\"noResize\"] ? 1 : 0)"-        js_getNoResize :: HTMLFrameElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameElement.noResize Mozilla HTMLFrameElement.noResize documentation> -getNoResize :: (MonadIO m) => HTMLFrameElement -> m Bool-getNoResize self = liftIO (js_getNoResize (self))- -foreign import javascript unsafe "$1[\"scrolling\"] = $2;"-        js_setScrolling :: HTMLFrameElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameElement.scrolling Mozilla HTMLFrameElement.scrolling documentation> -setScrolling ::-             (MonadIO m, ToJSString val) => HTMLFrameElement -> val -> m ()-setScrolling self val-  = liftIO (js_setScrolling (self) (toJSString val))- -foreign import javascript unsafe "$1[\"scrolling\"]"-        js_getScrolling :: HTMLFrameElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameElement.scrolling Mozilla HTMLFrameElement.scrolling documentation> -getScrolling ::-             (MonadIO m, FromJSString result) => HTMLFrameElement -> m result-getScrolling self-  = liftIO (fromJSString <$> (js_getScrolling (self)))- -foreign import javascript unsafe "$1[\"src\"] = $2;" js_setSrc ::-        HTMLFrameElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameElement.src Mozilla HTMLFrameElement.src documentation> -setSrc ::-       (MonadIO m, ToJSString val) => HTMLFrameElement -> val -> m ()-setSrc self val = liftIO (js_setSrc (self) (toJSString val))- -foreign import javascript unsafe "$1[\"src\"]" js_getSrc ::-        HTMLFrameElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameElement.src Mozilla HTMLFrameElement.src documentation> -getSrc ::-       (MonadIO m, FromJSString result) => HTMLFrameElement -> m result-getSrc self = liftIO (fromJSString <$> (js_getSrc (self)))- -foreign import javascript unsafe "$1[\"contentDocument\"]"-        js_getContentDocument :: HTMLFrameElement -> IO (Nullable Document)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameElement.contentDocument Mozilla HTMLFrameElement.contentDocument documentation> -getContentDocument ::-                   (MonadIO m) => HTMLFrameElement -> m (Maybe Document)-getContentDocument self-  = liftIO (nullableToMaybe <$> (js_getContentDocument (self)))- -foreign import javascript unsafe "$1[\"contentWindow\"]"-        js_getContentWindow :: HTMLFrameElement -> IO (Nullable Window)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameElement.contentWindow Mozilla HTMLFrameElement.contentWindow documentation> -getContentWindow ::-                 (MonadIO m) => HTMLFrameElement -> m (Maybe Window)-getContentWindow self-  = liftIO (nullableToMaybe <$> (js_getContentWindow (self)))- -foreign import javascript unsafe "$1[\"location\"] = $2;"-        js_setLocation :: HTMLFrameElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameElement.location Mozilla HTMLFrameElement.location documentation> -setLocation ::-            (MonadIO m, ToJSString val) =>-              HTMLFrameElement -> Maybe val -> m ()-setLocation self val-  = liftIO (js_setLocation (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"location\"]" js_getLocation-        :: HTMLFrameElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameElement.location Mozilla HTMLFrameElement.location documentation> -getLocation ::-            (MonadIO m, FromJSString result) =>-              HTMLFrameElement -> m (Maybe result)-getLocation self-  = liftIO (fromMaybeJSString <$> (js_getLocation (self)))- -foreign import javascript unsafe "$1[\"width\"]" js_getWidth ::-        HTMLFrameElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameElement.width Mozilla HTMLFrameElement.width documentation> -getWidth :: (MonadIO m) => HTMLFrameElement -> m Int-getWidth self = liftIO (js_getWidth (self))- -foreign import javascript unsafe "$1[\"height\"]" js_getHeight ::-        HTMLFrameElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameElement.height Mozilla HTMLFrameElement.height documentation> -getHeight :: (MonadIO m) => HTMLFrameElement -> m Int-getHeight self = liftIO (js_getHeight (self))

− src/GHCJS/DOM/JSFFI/Generated/HTMLFrameSetElement.hs

@@ -1,111 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLFrameSetElement-       (js_setCols, setCols, js_getCols, getCols, js_setRows, setRows,-        js_getRows, getRows, beforeUnload, hashChange, message, offline,-        online, popState, resize, storage, unload, orientationChange, blur,-        error, focus, load, HTMLFrameSetElement, castToHTMLFrameSetElement,-        gTypeHTMLFrameSetElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"cols\"] = $2;" js_setCols ::-        HTMLFrameSetElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameSetElement.cols Mozilla HTMLFrameSetElement.cols documentation> -setCols ::-        (MonadIO m, ToJSString val) => HTMLFrameSetElement -> val -> m ()-setCols self val = liftIO (js_setCols (self) (toJSString val))- -foreign import javascript unsafe "$1[\"cols\"]" js_getCols ::-        HTMLFrameSetElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameSetElement.cols Mozilla HTMLFrameSetElement.cols documentation> -getCols ::-        (MonadIO m, FromJSString result) => HTMLFrameSetElement -> m result-getCols self = liftIO (fromJSString <$> (js_getCols (self)))- -foreign import javascript unsafe "$1[\"rows\"] = $2;" js_setRows ::-        HTMLFrameSetElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameSetElement.rows Mozilla HTMLFrameSetElement.rows documentation> -setRows ::-        (MonadIO m, ToJSString val) => HTMLFrameSetElement -> val -> m ()-setRows self val = liftIO (js_setRows (self) (toJSString val))- -foreign import javascript unsafe "$1[\"rows\"]" js_getRows ::-        HTMLFrameSetElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameSetElement.rows Mozilla HTMLFrameSetElement.rows documentation> -getRows ::-        (MonadIO m, FromJSString result) => HTMLFrameSetElement -> m result-getRows self = liftIO (fromJSString <$> (js_getRows (self)))---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameSetElement.onbeforeunload Mozilla HTMLFrameSetElement.onbeforeunload documentation> -beforeUnload :: EventName HTMLFrameSetElement BeforeUnloadEvent-beforeUnload = unsafeEventName (toJSString "beforeunload")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameSetElement.onhashchange Mozilla HTMLFrameSetElement.onhashchange documentation> -hashChange :: EventName HTMLFrameSetElement HashChangeEvent-hashChange = unsafeEventName (toJSString "hashchange")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameSetElement.onmessage Mozilla HTMLFrameSetElement.onmessage documentation> -message :: EventName HTMLFrameSetElement MessageEvent-message = unsafeEventName (toJSString "message")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameSetElement.onoffline Mozilla HTMLFrameSetElement.onoffline documentation> -offline :: EventName HTMLFrameSetElement Event-offline = unsafeEventName (toJSString "offline")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameSetElement.ononline Mozilla HTMLFrameSetElement.ononline documentation> -online :: EventName HTMLFrameSetElement Event-online = unsafeEventName (toJSString "online")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameSetElement.onpopstate Mozilla HTMLFrameSetElement.onpopstate documentation> -popState :: EventName HTMLFrameSetElement PopStateEvent-popState = unsafeEventName (toJSString "popstate")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameSetElement.onresize Mozilla HTMLFrameSetElement.onresize documentation> -resize :: EventName HTMLFrameSetElement UIEvent-resize = unsafeEventName (toJSString "resize")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameSetElement.onstorage Mozilla HTMLFrameSetElement.onstorage documentation> -storage :: EventName HTMLFrameSetElement StorageEvent-storage = unsafeEventName (toJSString "storage")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameSetElement.onunload Mozilla HTMLFrameSetElement.onunload documentation> -unload :: EventName HTMLFrameSetElement UIEvent-unload = unsafeEventName (toJSString "unload")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameSetElement.onorientationchange Mozilla HTMLFrameSetElement.onorientationchange documentation> -orientationChange :: EventName HTMLFrameSetElement Event-orientationChange-  = unsafeEventName (toJSString "orientationchange")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameSetElement.onblur Mozilla HTMLFrameSetElement.onblur documentation> -blur :: EventName HTMLFrameSetElement FocusEvent-blur = unsafeEventName (toJSString "blur")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameSetElement.onerror Mozilla HTMLFrameSetElement.onerror documentation> -error :: EventName HTMLFrameSetElement UIEvent-error = unsafeEventName (toJSString "error")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameSetElement.onfocus Mozilla HTMLFrameSetElement.onfocus documentation> -focus :: EventName HTMLFrameSetElement FocusEvent-focus = unsafeEventName (toJSString "focus")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameSetElement.onload Mozilla HTMLFrameSetElement.onload documentation> -load :: EventName HTMLFrameSetElement UIEvent-load = unsafeEventName (toJSString "load")

− src/GHCJS/DOM/JSFFI/Generated/HTMLHRElement.hs

@@ -1,83 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLHRElement-       (js_setAlign, setAlign, js_getAlign, getAlign, js_setNoShade,-        setNoShade, js_getNoShade, getNoShade, js_setSize, setSize,-        js_getSize, getSize, js_setWidth, setWidth, js_getWidth, getWidth,-        HTMLHRElement, castToHTMLHRElement, gTypeHTMLHRElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign-        :: HTMLHRElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLHRElement.align Mozilla HTMLHRElement.align documentation> -setAlign ::-         (MonadIO m, ToJSString val) => HTMLHRElement -> val -> m ()-setAlign self val = liftIO (js_setAlign (self) (toJSString val))- -foreign import javascript unsafe "$1[\"align\"]" js_getAlign ::-        HTMLHRElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLHRElement.align Mozilla HTMLHRElement.align documentation> -getAlign ::-         (MonadIO m, FromJSString result) => HTMLHRElement -> m result-getAlign self = liftIO (fromJSString <$> (js_getAlign (self)))- -foreign import javascript unsafe "$1[\"noShade\"] = $2;"-        js_setNoShade :: HTMLHRElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLHRElement.noShade Mozilla HTMLHRElement.noShade documentation> -setNoShade :: (MonadIO m) => HTMLHRElement -> Bool -> m ()-setNoShade self val = liftIO (js_setNoShade (self) val)- -foreign import javascript unsafe "($1[\"noShade\"] ? 1 : 0)"-        js_getNoShade :: HTMLHRElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLHRElement.noShade Mozilla HTMLHRElement.noShade documentation> -getNoShade :: (MonadIO m) => HTMLHRElement -> m Bool-getNoShade self = liftIO (js_getNoShade (self))- -foreign import javascript unsafe "$1[\"size\"] = $2;" js_setSize ::-        HTMLHRElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLHRElement.size Mozilla HTMLHRElement.size documentation> -setSize ::-        (MonadIO m, ToJSString val) => HTMLHRElement -> val -> m ()-setSize self val = liftIO (js_setSize (self) (toJSString val))- -foreign import javascript unsafe "$1[\"size\"]" js_getSize ::-        HTMLHRElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLHRElement.size Mozilla HTMLHRElement.size documentation> -getSize ::-        (MonadIO m, FromJSString result) => HTMLHRElement -> m result-getSize self = liftIO (fromJSString <$> (js_getSize (self)))- -foreign import javascript unsafe "$1[\"width\"] = $2;" js_setWidth-        :: HTMLHRElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLHRElement.width Mozilla HTMLHRElement.width documentation> -setWidth ::-         (MonadIO m, ToJSString val) => HTMLHRElement -> val -> m ()-setWidth self val = liftIO (js_setWidth (self) (toJSString val))- -foreign import javascript unsafe "$1[\"width\"]" js_getWidth ::-        HTMLHRElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLHRElement.width Mozilla HTMLHRElement.width documentation> -getWidth ::-         (MonadIO m, FromJSString result) => HTMLHRElement -> m result-getWidth self = liftIO (fromJSString <$> (js_getWidth (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLHeadElement.hs

@@ -1,36 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLHeadElement-       (js_setProfile, setProfile, js_getProfile, getProfile,-        HTMLHeadElement, castToHTMLHeadElement, gTypeHTMLHeadElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"profile\"] = $2;"-        js_setProfile :: HTMLHeadElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLHeadElement.profile Mozilla HTMLHeadElement.profile documentation> -setProfile ::-           (MonadIO m, ToJSString val) => HTMLHeadElement -> val -> m ()-setProfile self val-  = liftIO (js_setProfile (self) (toJSString val))- -foreign import javascript unsafe "$1[\"profile\"]" js_getProfile ::-        HTMLHeadElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLHeadElement.profile Mozilla HTMLHeadElement.profile documentation> -getProfile ::-           (MonadIO m, FromJSString result) => HTMLHeadElement -> m result-getProfile self = liftIO (fromJSString <$> (js_getProfile (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLHeadingElement.hs

@@ -1,35 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLHeadingElement-       (js_setAlign, setAlign, js_getAlign, getAlign, HTMLHeadingElement,-        castToHTMLHeadingElement, gTypeHTMLHeadingElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign-        :: HTMLHeadingElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLHeadingElement.align Mozilla HTMLHeadingElement.align documentation> -setAlign ::-         (MonadIO m, ToJSString val) => HTMLHeadingElement -> val -> m ()-setAlign self val = liftIO (js_setAlign (self) (toJSString val))- -foreign import javascript unsafe "$1[\"align\"]" js_getAlign ::-        HTMLHeadingElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLHeadingElement.align Mozilla HTMLHeadingElement.align documentation> -getAlign ::-         (MonadIO m, FromJSString result) => HTMLHeadingElement -> m result-getAlign self = liftIO (fromJSString <$> (js_getAlign (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLHtmlElement.hs

@@ -1,55 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLHtmlElement-       (js_setVersion, setVersion, js_getVersion, getVersion,-        js_setManifest, setManifest, js_getManifest, getManifest,-        HTMLHtmlElement, castToHTMLHtmlElement, gTypeHTMLHtmlElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"version\"] = $2;"-        js_setVersion :: HTMLHtmlElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLHtmlElement.version Mozilla HTMLHtmlElement.version documentation> -setVersion ::-           (MonadIO m, ToJSString val) => HTMLHtmlElement -> val -> m ()-setVersion self val-  = liftIO (js_setVersion (self) (toJSString val))- -foreign import javascript unsafe "$1[\"version\"]" js_getVersion ::-        HTMLHtmlElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLHtmlElement.version Mozilla HTMLHtmlElement.version documentation> -getVersion ::-           (MonadIO m, FromJSString result) => HTMLHtmlElement -> m result-getVersion self = liftIO (fromJSString <$> (js_getVersion (self)))- -foreign import javascript unsafe "$1[\"manifest\"] = $2;"-        js_setManifest :: HTMLHtmlElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLHtmlElement.manifest Mozilla HTMLHtmlElement.manifest documentation> -setManifest ::-            (MonadIO m, ToJSString val) => HTMLHtmlElement -> val -> m ()-setManifest self val-  = liftIO (js_setManifest (self) (toJSString val))- -foreign import javascript unsafe "$1[\"manifest\"]" js_getManifest-        :: HTMLHtmlElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLHtmlElement.manifest Mozilla HTMLHtmlElement.manifest documentation> -getManifest ::-            (MonadIO m, FromJSString result) => HTMLHtmlElement -> m result-getManifest self-  = liftIO (fromJSString <$> (js_getManifest (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLIFrameElement.hs

@@ -1,263 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLIFrameElement-       (js_getSVGDocument, getSVGDocument, js_setAlign, setAlign,-        js_getAlign, getAlign, js_setFrameBorder, setFrameBorder,-        js_getFrameBorder, getFrameBorder, js_setHeight, setHeight,-        js_getHeight, getHeight, js_setLongDesc, setLongDesc,-        js_getLongDesc, getLongDesc, js_setMarginHeight, setMarginHeight,-        js_getMarginHeight, getMarginHeight, js_setMarginWidth,-        setMarginWidth, js_getMarginWidth, getMarginWidth, js_setName,-        setName, js_getName, getName, js_setSandbox, setSandbox,-        js_getSandbox, getSandbox, js_setScrolling, setScrolling,-        js_getScrolling, getScrolling, js_setSrc, setSrc, js_getSrc,-        getSrc, js_setSrcdoc, setSrcdoc, js_getSrcdoc, getSrcdoc,-        js_setWidth, setWidth, js_getWidth, getWidth,-        js_getContentDocument, getContentDocument, js_getContentWindow,-        getContentWindow, HTMLIFrameElement, castToHTMLIFrameElement,-        gTypeHTMLIFrameElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"getSVGDocument\"]()"-        js_getSVGDocument :: HTMLIFrameElement -> IO (Nullable SVGDocument)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.getSVGDocument Mozilla HTMLIFrameElement.getSVGDocument documentation> -getSVGDocument ::-               (MonadIO m) => HTMLIFrameElement -> m (Maybe SVGDocument)-getSVGDocument self-  = liftIO (nullableToMaybe <$> (js_getSVGDocument (self)))- -foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign-        :: HTMLIFrameElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.align Mozilla HTMLIFrameElement.align documentation> -setAlign ::-         (MonadIO m, ToJSString val) => HTMLIFrameElement -> val -> m ()-setAlign self val = liftIO (js_setAlign (self) (toJSString val))- -foreign import javascript unsafe "$1[\"align\"]" js_getAlign ::-        HTMLIFrameElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.align Mozilla HTMLIFrameElement.align documentation> -getAlign ::-         (MonadIO m, FromJSString result) => HTMLIFrameElement -> m result-getAlign self = liftIO (fromJSString <$> (js_getAlign (self)))- -foreign import javascript unsafe "$1[\"frameBorder\"] = $2;"-        js_setFrameBorder :: HTMLIFrameElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.frameBorder Mozilla HTMLIFrameElement.frameBorder documentation> -setFrameBorder ::-               (MonadIO m, ToJSString val) => HTMLIFrameElement -> val -> m ()-setFrameBorder self val-  = liftIO (js_setFrameBorder (self) (toJSString val))- -foreign import javascript unsafe "$1[\"frameBorder\"]"-        js_getFrameBorder :: HTMLIFrameElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.frameBorder Mozilla HTMLIFrameElement.frameBorder documentation> -getFrameBorder ::-               (MonadIO m, FromJSString result) => HTMLIFrameElement -> m result-getFrameBorder self-  = liftIO (fromJSString <$> (js_getFrameBorder (self)))- -foreign import javascript unsafe "$1[\"height\"] = $2;"-        js_setHeight :: HTMLIFrameElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.height Mozilla HTMLIFrameElement.height documentation> -setHeight ::-          (MonadIO m, ToJSString val) => HTMLIFrameElement -> val -> m ()-setHeight self val = liftIO (js_setHeight (self) (toJSString val))- -foreign import javascript unsafe "$1[\"height\"]" js_getHeight ::-        HTMLIFrameElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.height Mozilla HTMLIFrameElement.height documentation> -getHeight ::-          (MonadIO m, FromJSString result) => HTMLIFrameElement -> m result-getHeight self = liftIO (fromJSString <$> (js_getHeight (self)))- -foreign import javascript unsafe "$1[\"longDesc\"] = $2;"-        js_setLongDesc :: HTMLIFrameElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.longDesc Mozilla HTMLIFrameElement.longDesc documentation> -setLongDesc ::-            (MonadIO m, ToJSString val) => HTMLIFrameElement -> val -> m ()-setLongDesc self val-  = liftIO (js_setLongDesc (self) (toJSString val))- -foreign import javascript unsafe "$1[\"longDesc\"]" js_getLongDesc-        :: HTMLIFrameElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.longDesc Mozilla HTMLIFrameElement.longDesc documentation> -getLongDesc ::-            (MonadIO m, FromJSString result) => HTMLIFrameElement -> m result-getLongDesc self-  = liftIO (fromJSString <$> (js_getLongDesc (self)))- -foreign import javascript unsafe "$1[\"marginHeight\"] = $2;"-        js_setMarginHeight :: HTMLIFrameElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.marginHeight Mozilla HTMLIFrameElement.marginHeight documentation> -setMarginHeight ::-                (MonadIO m, ToJSString val) => HTMLIFrameElement -> val -> m ()-setMarginHeight self val-  = liftIO (js_setMarginHeight (self) (toJSString val))- -foreign import javascript unsafe "$1[\"marginHeight\"]"-        js_getMarginHeight :: HTMLIFrameElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.marginHeight Mozilla HTMLIFrameElement.marginHeight documentation> -getMarginHeight ::-                (MonadIO m, FromJSString result) => HTMLIFrameElement -> m result-getMarginHeight self-  = liftIO (fromJSString <$> (js_getMarginHeight (self)))- -foreign import javascript unsafe "$1[\"marginWidth\"] = $2;"-        js_setMarginWidth :: HTMLIFrameElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.marginWidth Mozilla HTMLIFrameElement.marginWidth documentation> -setMarginWidth ::-               (MonadIO m, ToJSString val) => HTMLIFrameElement -> val -> m ()-setMarginWidth self val-  = liftIO (js_setMarginWidth (self) (toJSString val))- -foreign import javascript unsafe "$1[\"marginWidth\"]"-        js_getMarginWidth :: HTMLIFrameElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.marginWidth Mozilla HTMLIFrameElement.marginWidth documentation> -getMarginWidth ::-               (MonadIO m, FromJSString result) => HTMLIFrameElement -> m result-getMarginWidth self-  = liftIO (fromJSString <$> (js_getMarginWidth (self)))- -foreign import javascript unsafe "$1[\"name\"] = $2;" js_setName ::-        HTMLIFrameElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.name Mozilla HTMLIFrameElement.name documentation> -setName ::-        (MonadIO m, ToJSString val) => HTMLIFrameElement -> val -> m ()-setName self val = liftIO (js_setName (self) (toJSString val))- -foreign import javascript unsafe "$1[\"name\"]" js_getName ::-        HTMLIFrameElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.name Mozilla HTMLIFrameElement.name documentation> -getName ::-        (MonadIO m, FromJSString result) => HTMLIFrameElement -> m result-getName self = liftIO (fromJSString <$> (js_getName (self)))- -foreign import javascript unsafe "$1[\"sandbox\"] = $2;"-        js_setSandbox :: HTMLIFrameElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.sandbox Mozilla HTMLIFrameElement.sandbox documentation> -setSandbox ::-           (MonadIO m, ToJSString val) => HTMLIFrameElement -> val -> m ()-setSandbox self val-  = liftIO (js_setSandbox (self) (toJSString val))- -foreign import javascript unsafe "$1[\"sandbox\"]" js_getSandbox ::-        HTMLIFrameElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.sandbox Mozilla HTMLIFrameElement.sandbox documentation> -getSandbox ::-           (MonadIO m, FromJSString result) => HTMLIFrameElement -> m result-getSandbox self = liftIO (fromJSString <$> (js_getSandbox (self)))- -foreign import javascript unsafe "$1[\"scrolling\"] = $2;"-        js_setScrolling :: HTMLIFrameElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.scrolling Mozilla HTMLIFrameElement.scrolling documentation> -setScrolling ::-             (MonadIO m, ToJSString val) => HTMLIFrameElement -> val -> m ()-setScrolling self val-  = liftIO (js_setScrolling (self) (toJSString val))- -foreign import javascript unsafe "$1[\"scrolling\"]"-        js_getScrolling :: HTMLIFrameElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.scrolling Mozilla HTMLIFrameElement.scrolling documentation> -getScrolling ::-             (MonadIO m, FromJSString result) => HTMLIFrameElement -> m result-getScrolling self-  = liftIO (fromJSString <$> (js_getScrolling (self)))- -foreign import javascript unsafe "$1[\"src\"] = $2;" js_setSrc ::-        HTMLIFrameElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.src Mozilla HTMLIFrameElement.src documentation> -setSrc ::-       (MonadIO m, ToJSString val) => HTMLIFrameElement -> val -> m ()-setSrc self val = liftIO (js_setSrc (self) (toJSString val))- -foreign import javascript unsafe "$1[\"src\"]" js_getSrc ::-        HTMLIFrameElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.src Mozilla HTMLIFrameElement.src documentation> -getSrc ::-       (MonadIO m, FromJSString result) => HTMLIFrameElement -> m result-getSrc self = liftIO (fromJSString <$> (js_getSrc (self)))- -foreign import javascript unsafe "$1[\"srcdoc\"] = $2;"-        js_setSrcdoc :: HTMLIFrameElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.srcdoc Mozilla HTMLIFrameElement.srcdoc documentation> -setSrcdoc ::-          (MonadIO m, ToJSString val) => HTMLIFrameElement -> val -> m ()-setSrcdoc self val = liftIO (js_setSrcdoc (self) (toJSString val))- -foreign import javascript unsafe "$1[\"srcdoc\"]" js_getSrcdoc ::-        HTMLIFrameElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.srcdoc Mozilla HTMLIFrameElement.srcdoc documentation> -getSrcdoc ::-          (MonadIO m, FromJSString result) => HTMLIFrameElement -> m result-getSrcdoc self = liftIO (fromJSString <$> (js_getSrcdoc (self)))- -foreign import javascript unsafe "$1[\"width\"] = $2;" js_setWidth-        :: HTMLIFrameElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.width Mozilla HTMLIFrameElement.width documentation> -setWidth ::-         (MonadIO m, ToJSString val) => HTMLIFrameElement -> val -> m ()-setWidth self val = liftIO (js_setWidth (self) (toJSString val))- -foreign import javascript unsafe "$1[\"width\"]" js_getWidth ::-        HTMLIFrameElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.width Mozilla HTMLIFrameElement.width documentation> -getWidth ::-         (MonadIO m, FromJSString result) => HTMLIFrameElement -> m result-getWidth self = liftIO (fromJSString <$> (js_getWidth (self)))- -foreign import javascript unsafe "$1[\"contentDocument\"]"-        js_getContentDocument ::-        HTMLIFrameElement -> IO (Nullable Document)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.contentDocument Mozilla HTMLIFrameElement.contentDocument documentation> -getContentDocument ::-                   (MonadIO m) => HTMLIFrameElement -> m (Maybe Document)-getContentDocument self-  = liftIO (nullableToMaybe <$> (js_getContentDocument (self)))- -foreign import javascript unsafe "$1[\"contentWindow\"]"-        js_getContentWindow :: HTMLIFrameElement -> IO (Nullable Window)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.contentWindow Mozilla HTMLIFrameElement.contentWindow documentation> -getContentWindow ::-                 (MonadIO m) => HTMLIFrameElement -> m (Maybe Window)-getContentWindow self-  = liftIO (nullableToMaybe <$> (js_getContentWindow (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLImageElement.hs

@@ -1,328 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLImageElement-       (js_setName, setName, js_getName, getName, js_setAlign, setAlign,-        js_getAlign, getAlign, js_setAlt, setAlt, js_getAlt, getAlt,-        js_setBorder, setBorder, js_getBorder, getBorder,-        js_setCrossOrigin, setCrossOrigin, js_getCrossOrigin,-        getCrossOrigin, js_setHeight, setHeight, js_getHeight, getHeight,-        js_setHspace, setHspace, js_getHspace, getHspace, js_setIsMap,-        setIsMap, js_getIsMap, getIsMap, js_setLongDesc, setLongDesc,-        js_getLongDesc, getLongDesc, js_setSrc, setSrc, js_getSrc, getSrc,-        js_setSrcset, setSrcset, js_getSrcset, getSrcset, js_setSizes,-        setSizes, js_getSizes, getSizes, js_getCurrentSrc, getCurrentSrc,-        js_setUseMap, setUseMap, js_getUseMap, getUseMap, js_setVspace,-        setVspace, js_getVspace, getVspace, js_setWidth, setWidth,-        js_getWidth, getWidth, js_getComplete, getComplete, js_setLowsrc,-        setLowsrc, js_getLowsrc, getLowsrc, js_getNaturalHeight,-        getNaturalHeight, js_getNaturalWidth, getNaturalWidth, js_getX,-        getX, js_getY, getY, HTMLImageElement, castToHTMLImageElement,-        gTypeHTMLImageElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"name\"] = $2;" js_setName ::-        HTMLImageElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.name Mozilla HTMLImageElement.name documentation> -setName ::-        (MonadIO m, ToJSString val) => HTMLImageElement -> val -> m ()-setName self val = liftIO (js_setName (self) (toJSString val))- -foreign import javascript unsafe "$1[\"name\"]" js_getName ::-        HTMLImageElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.name Mozilla HTMLImageElement.name documentation> -getName ::-        (MonadIO m, FromJSString result) => HTMLImageElement -> m result-getName self = liftIO (fromJSString <$> (js_getName (self)))- -foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign-        :: HTMLImageElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.align Mozilla HTMLImageElement.align documentation> -setAlign ::-         (MonadIO m, ToJSString val) => HTMLImageElement -> val -> m ()-setAlign self val = liftIO (js_setAlign (self) (toJSString val))- -foreign import javascript unsafe "$1[\"align\"]" js_getAlign ::-        HTMLImageElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.align Mozilla HTMLImageElement.align documentation> -getAlign ::-         (MonadIO m, FromJSString result) => HTMLImageElement -> m result-getAlign self = liftIO (fromJSString <$> (js_getAlign (self)))- -foreign import javascript unsafe "$1[\"alt\"] = $2;" js_setAlt ::-        HTMLImageElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.alt Mozilla HTMLImageElement.alt documentation> -setAlt ::-       (MonadIO m, ToJSString val) => HTMLImageElement -> val -> m ()-setAlt self val = liftIO (js_setAlt (self) (toJSString val))- -foreign import javascript unsafe "$1[\"alt\"]" js_getAlt ::-        HTMLImageElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.alt Mozilla HTMLImageElement.alt documentation> -getAlt ::-       (MonadIO m, FromJSString result) => HTMLImageElement -> m result-getAlt self = liftIO (fromJSString <$> (js_getAlt (self)))- -foreign import javascript unsafe "$1[\"border\"] = $2;"-        js_setBorder :: HTMLImageElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.border Mozilla HTMLImageElement.border documentation> -setBorder ::-          (MonadIO m, ToJSString val) => HTMLImageElement -> val -> m ()-setBorder self val = liftIO (js_setBorder (self) (toJSString val))- -foreign import javascript unsafe "$1[\"border\"]" js_getBorder ::-        HTMLImageElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.border Mozilla HTMLImageElement.border documentation> -getBorder ::-          (MonadIO m, FromJSString result) => HTMLImageElement -> m result-getBorder self = liftIO (fromJSString <$> (js_getBorder (self)))- -foreign import javascript unsafe "$1[\"crossOrigin\"] = $2;"-        js_setCrossOrigin :: HTMLImageElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.crossOrigin Mozilla HTMLImageElement.crossOrigin documentation> -setCrossOrigin ::-               (MonadIO m, ToJSString val) => HTMLImageElement -> val -> m ()-setCrossOrigin self val-  = liftIO (js_setCrossOrigin (self) (toJSString val))- -foreign import javascript unsafe "$1[\"crossOrigin\"]"-        js_getCrossOrigin :: HTMLImageElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.crossOrigin Mozilla HTMLImageElement.crossOrigin documentation> -getCrossOrigin ::-               (MonadIO m, FromJSString result) => HTMLImageElement -> m result-getCrossOrigin self-  = liftIO (fromJSString <$> (js_getCrossOrigin (self)))- -foreign import javascript unsafe "$1[\"height\"] = $2;"-        js_setHeight :: HTMLImageElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.height Mozilla HTMLImageElement.height documentation> -setHeight :: (MonadIO m) => HTMLImageElement -> Int -> m ()-setHeight self val = liftIO (js_setHeight (self) val)- -foreign import javascript unsafe "$1[\"height\"]" js_getHeight ::-        HTMLImageElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.height Mozilla HTMLImageElement.height documentation> -getHeight :: (MonadIO m) => HTMLImageElement -> m Int-getHeight self = liftIO (js_getHeight (self))- -foreign import javascript unsafe "$1[\"hspace\"] = $2;"-        js_setHspace :: HTMLImageElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.hspace Mozilla HTMLImageElement.hspace documentation> -setHspace :: (MonadIO m) => HTMLImageElement -> Int -> m ()-setHspace self val = liftIO (js_setHspace (self) val)- -foreign import javascript unsafe "$1[\"hspace\"]" js_getHspace ::-        HTMLImageElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.hspace Mozilla HTMLImageElement.hspace documentation> -getHspace :: (MonadIO m) => HTMLImageElement -> m Int-getHspace self = liftIO (js_getHspace (self))- -foreign import javascript unsafe "$1[\"isMap\"] = $2;" js_setIsMap-        :: HTMLImageElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.isMap Mozilla HTMLImageElement.isMap documentation> -setIsMap :: (MonadIO m) => HTMLImageElement -> Bool -> m ()-setIsMap self val = liftIO (js_setIsMap (self) val)- -foreign import javascript unsafe "($1[\"isMap\"] ? 1 : 0)"-        js_getIsMap :: HTMLImageElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.isMap Mozilla HTMLImageElement.isMap documentation> -getIsMap :: (MonadIO m) => HTMLImageElement -> m Bool-getIsMap self = liftIO (js_getIsMap (self))- -foreign import javascript unsafe "$1[\"longDesc\"] = $2;"-        js_setLongDesc :: HTMLImageElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.longDesc Mozilla HTMLImageElement.longDesc documentation> -setLongDesc ::-            (MonadIO m, ToJSString val) => HTMLImageElement -> val -> m ()-setLongDesc self val-  = liftIO (js_setLongDesc (self) (toJSString val))- -foreign import javascript unsafe "$1[\"longDesc\"]" js_getLongDesc-        :: HTMLImageElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.longDesc Mozilla HTMLImageElement.longDesc documentation> -getLongDesc ::-            (MonadIO m, FromJSString result) => HTMLImageElement -> m result-getLongDesc self-  = liftIO (fromJSString <$> (js_getLongDesc (self)))- -foreign import javascript unsafe "$1[\"src\"] = $2;" js_setSrc ::-        HTMLImageElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.src Mozilla HTMLImageElement.src documentation> -setSrc ::-       (MonadIO m, ToJSString val) => HTMLImageElement -> val -> m ()-setSrc self val = liftIO (js_setSrc (self) (toJSString val))- -foreign import javascript unsafe "$1[\"src\"]" js_getSrc ::-        HTMLImageElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.src Mozilla HTMLImageElement.src documentation> -getSrc ::-       (MonadIO m, FromJSString result) => HTMLImageElement -> m result-getSrc self = liftIO (fromJSString <$> (js_getSrc (self)))- -foreign import javascript unsafe "$1[\"srcset\"] = $2;"-        js_setSrcset :: HTMLImageElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.srcset Mozilla HTMLImageElement.srcset documentation> -setSrcset ::-          (MonadIO m, ToJSString val) => HTMLImageElement -> val -> m ()-setSrcset self val = liftIO (js_setSrcset (self) (toJSString val))- -foreign import javascript unsafe "$1[\"srcset\"]" js_getSrcset ::-        HTMLImageElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.srcset Mozilla HTMLImageElement.srcset documentation> -getSrcset ::-          (MonadIO m, FromJSString result) => HTMLImageElement -> m result-getSrcset self = liftIO (fromJSString <$> (js_getSrcset (self)))- -foreign import javascript unsafe "$1[\"sizes\"] = $2;" js_setSizes-        :: HTMLImageElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.sizes Mozilla HTMLImageElement.sizes documentation> -setSizes ::-         (MonadIO m, ToJSString val) => HTMLImageElement -> val -> m ()-setSizes self val = liftIO (js_setSizes (self) (toJSString val))- -foreign import javascript unsafe "$1[\"sizes\"]" js_getSizes ::-        HTMLImageElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.sizes Mozilla HTMLImageElement.sizes documentation> -getSizes ::-         (MonadIO m, FromJSString result) => HTMLImageElement -> m result-getSizes self = liftIO (fromJSString <$> (js_getSizes (self)))- -foreign import javascript unsafe "$1[\"currentSrc\"]"-        js_getCurrentSrc :: HTMLImageElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.currentSrc Mozilla HTMLImageElement.currentSrc documentation> -getCurrentSrc ::-              (MonadIO m, FromJSString result) => HTMLImageElement -> m result-getCurrentSrc self-  = liftIO (fromJSString <$> (js_getCurrentSrc (self)))- -foreign import javascript unsafe "$1[\"useMap\"] = $2;"-        js_setUseMap :: HTMLImageElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.useMap Mozilla HTMLImageElement.useMap documentation> -setUseMap ::-          (MonadIO m, ToJSString val) => HTMLImageElement -> val -> m ()-setUseMap self val = liftIO (js_setUseMap (self) (toJSString val))- -foreign import javascript unsafe "$1[\"useMap\"]" js_getUseMap ::-        HTMLImageElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.useMap Mozilla HTMLImageElement.useMap documentation> -getUseMap ::-          (MonadIO m, FromJSString result) => HTMLImageElement -> m result-getUseMap self = liftIO (fromJSString <$> (js_getUseMap (self)))- -foreign import javascript unsafe "$1[\"vspace\"] = $2;"-        js_setVspace :: HTMLImageElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.vspace Mozilla HTMLImageElement.vspace documentation> -setVspace :: (MonadIO m) => HTMLImageElement -> Int -> m ()-setVspace self val = liftIO (js_setVspace (self) val)- -foreign import javascript unsafe "$1[\"vspace\"]" js_getVspace ::-        HTMLImageElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.vspace Mozilla HTMLImageElement.vspace documentation> -getVspace :: (MonadIO m) => HTMLImageElement -> m Int-getVspace self = liftIO (js_getVspace (self))- -foreign import javascript unsafe "$1[\"width\"] = $2;" js_setWidth-        :: HTMLImageElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.width Mozilla HTMLImageElement.width documentation> -setWidth :: (MonadIO m) => HTMLImageElement -> Int -> m ()-setWidth self val = liftIO (js_setWidth (self) val)- -foreign import javascript unsafe "$1[\"width\"]" js_getWidth ::-        HTMLImageElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.width Mozilla HTMLImageElement.width documentation> -getWidth :: (MonadIO m) => HTMLImageElement -> m Int-getWidth self = liftIO (js_getWidth (self))- -foreign import javascript unsafe "($1[\"complete\"] ? 1 : 0)"-        js_getComplete :: HTMLImageElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.complete Mozilla HTMLImageElement.complete documentation> -getComplete :: (MonadIO m) => HTMLImageElement -> m Bool-getComplete self = liftIO (js_getComplete (self))- -foreign import javascript unsafe "$1[\"lowsrc\"] = $2;"-        js_setLowsrc :: HTMLImageElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.lowsrc Mozilla HTMLImageElement.lowsrc documentation> -setLowsrc ::-          (MonadIO m, ToJSString val) => HTMLImageElement -> val -> m ()-setLowsrc self val = liftIO (js_setLowsrc (self) (toJSString val))- -foreign import javascript unsafe "$1[\"lowsrc\"]" js_getLowsrc ::-        HTMLImageElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.lowsrc Mozilla HTMLImageElement.lowsrc documentation> -getLowsrc ::-          (MonadIO m, FromJSString result) => HTMLImageElement -> m result-getLowsrc self = liftIO (fromJSString <$> (js_getLowsrc (self)))- -foreign import javascript unsafe "$1[\"naturalHeight\"]"-        js_getNaturalHeight :: HTMLImageElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.naturalHeight Mozilla HTMLImageElement.naturalHeight documentation> -getNaturalHeight :: (MonadIO m) => HTMLImageElement -> m Int-getNaturalHeight self = liftIO (js_getNaturalHeight (self))- -foreign import javascript unsafe "$1[\"naturalWidth\"]"-        js_getNaturalWidth :: HTMLImageElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.naturalWidth Mozilla HTMLImageElement.naturalWidth documentation> -getNaturalWidth :: (MonadIO m) => HTMLImageElement -> m Int-getNaturalWidth self = liftIO (js_getNaturalWidth (self))- -foreign import javascript unsafe "$1[\"x\"]" js_getX ::-        HTMLImageElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.x Mozilla HTMLImageElement.x documentation> -getX :: (MonadIO m) => HTMLImageElement -> m Int-getX self = liftIO (js_getX (self))- -foreign import javascript unsafe "$1[\"y\"]" js_getY ::-        HTMLImageElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLImageElement.y Mozilla HTMLImageElement.y documentation> -getY :: (MonadIO m) => HTMLImageElement -> m Int-getY self = liftIO (js_getY (self))

− src/GHCJS/DOM/JSFFI/Generated/HTMLInputElement.hs

@@ -1,883 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLInputElement-       (js_stepUp, stepUp, js_stepDown, stepDown, js_checkValidity,-        checkValidity, js_setCustomValidity, setCustomValidity, js_select,-        select, js_setRangeText, setRangeText, js_setRangeText4,-        setRangeText4, js_setSelectionRange, setSelectionRange,-        js_setAccept, setAccept, js_getAccept, getAccept, js_setAlt,-        setAlt, js_getAlt, getAlt, js_setAutocomplete, setAutocomplete,-        js_getAutocomplete, getAutocomplete, js_setAutofocus, setAutofocus,-        js_getAutofocus, getAutofocus, js_setDefaultChecked,-        setDefaultChecked, js_getDefaultChecked, getDefaultChecked,-        js_setChecked, setChecked, js_getChecked, getChecked,-        js_setDirName, setDirName, js_getDirName, getDirName,-        js_setDisabled, setDisabled, js_getDisabled, getDisabled,-        js_getForm, getForm, js_setFiles, setFiles, js_getFiles, getFiles,-        js_setFormAction, setFormAction, js_getFormAction, getFormAction,-        js_setFormEnctype, setFormEnctype, js_getFormEnctype,-        getFormEnctype, js_setFormMethod, setFormMethod, js_getFormMethod,-        getFormMethod, js_setFormNoValidate, setFormNoValidate,-        js_getFormNoValidate, getFormNoValidate, js_setFormTarget,-        setFormTarget, js_getFormTarget, getFormTarget, js_setHeight,-        setHeight, js_getHeight, getHeight, js_setIndeterminate,-        setIndeterminate, js_getIndeterminate, getIndeterminate,-        js_getList, getList, js_setMax, setMax, js_getMax, getMax,-        js_setMaxLength, setMaxLength, js_getMaxLength, getMaxLength,-        js_setMin, setMin, js_getMin, getMin, js_setMultiple, setMultiple,-        js_getMultiple, getMultiple, js_setName, setName, js_getName,-        getName, js_setPattern, setPattern, js_getPattern, getPattern,-        js_setPlaceholder, setPlaceholder, js_getPlaceholder,-        getPlaceholder, js_setReadOnly, setReadOnly, js_getReadOnly,-        getReadOnly, js_setRequired, setRequired, js_getRequired,-        getRequired, js_setSize, setSize, js_getSize, getSize, js_setSrc,-        setSrc, js_getSrc, getSrc, js_setStep, setStep, js_getStep,-        getStep, js_setType, setType, js_getType, getType,-        js_setDefaultValue, setDefaultValue, js_getDefaultValue,-        getDefaultValue, js_setValue, setValue, js_getValue, getValue,-        js_setValueAsDate, setValueAsDate, js_getValueAsDate,-        getValueAsDate, js_setValueAsNumber, setValueAsNumber,-        js_getValueAsNumber, getValueAsNumber, js_setWidth, setWidth,-        js_getWidth, getWidth, js_getWillValidate, getWillValidate,-        js_getValidity, getValidity, js_getValidationMessage,-        getValidationMessage, js_getLabels, getLabels,-        js_setSelectionStart, setSelectionStart, js_getSelectionStart,-        getSelectionStart, js_setSelectionEnd, setSelectionEnd,-        js_getSelectionEnd, getSelectionEnd, js_setSelectionDirection,-        setSelectionDirection, js_getSelectionDirection,-        getSelectionDirection, js_setAlign, setAlign, js_getAlign,-        getAlign, js_setUseMap, setUseMap, js_getUseMap, getUseMap,-        js_setIncremental, setIncremental, js_getIncremental,-        getIncremental, js_setAutocorrect, setAutocorrect,-        js_getAutocorrect, getAutocorrect, js_setAutocapitalize,-        setAutocapitalize, js_getAutocapitalize, getAutocapitalize,-        js_setCapture, setCapture, js_getCapture, getCapture,-        HTMLInputElement, castToHTMLInputElement, gTypeHTMLInputElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"stepUp\"]($2)" js_stepUp ::-        HTMLInputElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.stepUp Mozilla HTMLInputElement.stepUp documentation> -stepUp :: (MonadIO m) => HTMLInputElement -> Int -> m ()-stepUp self n = liftIO (js_stepUp (self) n)- -foreign import javascript unsafe "$1[\"stepDown\"]($2)" js_stepDown-        :: HTMLInputElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.stepDown Mozilla HTMLInputElement.stepDown documentation> -stepDown :: (MonadIO m) => HTMLInputElement -> Int -> m ()-stepDown self n = liftIO (js_stepDown (self) n)- -foreign import javascript unsafe-        "($1[\"checkValidity\"]() ? 1 : 0)" js_checkValidity ::-        HTMLInputElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.checkValidity Mozilla HTMLInputElement.checkValidity documentation> -checkValidity :: (MonadIO m) => HTMLInputElement -> m Bool-checkValidity self = liftIO (js_checkValidity (self))- -foreign import javascript unsafe "$1[\"setCustomValidity\"]($2)"-        js_setCustomValidity ::-        HTMLInputElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.setCustomValidity Mozilla HTMLInputElement.setCustomValidity documentation> -setCustomValidity ::-                  (MonadIO m, ToJSString error) =>-                    HTMLInputElement -> Maybe error -> m ()-setCustomValidity self error-  = liftIO (js_setCustomValidity (self) (toMaybeJSString error))- -foreign import javascript unsafe "$1[\"select\"]()" js_select ::-        HTMLInputElement -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.select Mozilla HTMLInputElement.select documentation> -select :: (MonadIO m) => HTMLInputElement -> m ()-select self = liftIO (js_select (self))- -foreign import javascript unsafe "$1[\"setRangeText\"]($2)"-        js_setRangeText :: HTMLInputElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.setRangeText Mozilla HTMLInputElement.setRangeText documentation> -setRangeText ::-             (MonadIO m, ToJSString replacement) =>-               HTMLInputElement -> replacement -> m ()-setRangeText self replacement-  = liftIO (js_setRangeText (self) (toJSString replacement))- -foreign import javascript unsafe-        "$1[\"setRangeText\"]($2, $3, $4,\n$5)" js_setRangeText4 ::-        HTMLInputElement -> JSString -> Word -> Word -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.setRangeText Mozilla HTMLInputElement.setRangeText documentation> -setRangeText4 ::-              (MonadIO m, ToJSString replacement, ToJSString selectionMode) =>-                HTMLInputElement ->-                  replacement -> Word -> Word -> selectionMode -> m ()-setRangeText4 self replacement start end selectionMode-  = liftIO-      (js_setRangeText4 (self) (toJSString replacement) start end-         (toJSString selectionMode))- -foreign import javascript unsafe-        "$1[\"setSelectionRange\"]($2, $3,\n$4)" js_setSelectionRange ::-        HTMLInputElement -> Int -> Int -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.setSelectionRange Mozilla HTMLInputElement.setSelectionRange documentation> -setSelectionRange ::-                  (MonadIO m, ToJSString direction) =>-                    HTMLInputElement -> Int -> Int -> direction -> m ()-setSelectionRange self start end direction-  = liftIO-      (js_setSelectionRange (self) start end (toJSString direction))- -foreign import javascript unsafe "$1[\"accept\"] = $2;"-        js_setAccept :: HTMLInputElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.accept Mozilla HTMLInputElement.accept documentation> -setAccept ::-          (MonadIO m, ToJSString val) => HTMLInputElement -> val -> m ()-setAccept self val = liftIO (js_setAccept (self) (toJSString val))- -foreign import javascript unsafe "$1[\"accept\"]" js_getAccept ::-        HTMLInputElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.accept Mozilla HTMLInputElement.accept documentation> -getAccept ::-          (MonadIO m, FromJSString result) => HTMLInputElement -> m result-getAccept self = liftIO (fromJSString <$> (js_getAccept (self)))- -foreign import javascript unsafe "$1[\"alt\"] = $2;" js_setAlt ::-        HTMLInputElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.alt Mozilla HTMLInputElement.alt documentation> -setAlt ::-       (MonadIO m, ToJSString val) => HTMLInputElement -> val -> m ()-setAlt self val = liftIO (js_setAlt (self) (toJSString val))- -foreign import javascript unsafe "$1[\"alt\"]" js_getAlt ::-        HTMLInputElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.alt Mozilla HTMLInputElement.alt documentation> -getAlt ::-       (MonadIO m, FromJSString result) => HTMLInputElement -> m result-getAlt self = liftIO (fromJSString <$> (js_getAlt (self)))- -foreign import javascript unsafe "$1[\"autocomplete\"] = $2;"-        js_setAutocomplete :: HTMLInputElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.autocomplete Mozilla HTMLInputElement.autocomplete documentation> -setAutocomplete ::-                (MonadIO m, ToJSString val) => HTMLInputElement -> val -> m ()-setAutocomplete self val-  = liftIO (js_setAutocomplete (self) (toJSString val))- -foreign import javascript unsafe "$1[\"autocomplete\"]"-        js_getAutocomplete :: HTMLInputElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.autocomplete Mozilla HTMLInputElement.autocomplete documentation> -getAutocomplete ::-                (MonadIO m, FromJSString result) => HTMLInputElement -> m result-getAutocomplete self-  = liftIO (fromJSString <$> (js_getAutocomplete (self)))- -foreign import javascript unsafe "$1[\"autofocus\"] = $2;"-        js_setAutofocus :: HTMLInputElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.autofocus Mozilla HTMLInputElement.autofocus documentation> -setAutofocus :: (MonadIO m) => HTMLInputElement -> Bool -> m ()-setAutofocus self val = liftIO (js_setAutofocus (self) val)- -foreign import javascript unsafe "($1[\"autofocus\"] ? 1 : 0)"-        js_getAutofocus :: HTMLInputElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.autofocus Mozilla HTMLInputElement.autofocus documentation> -getAutofocus :: (MonadIO m) => HTMLInputElement -> m Bool-getAutofocus self = liftIO (js_getAutofocus (self))- -foreign import javascript unsafe "$1[\"defaultChecked\"] = $2;"-        js_setDefaultChecked :: HTMLInputElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.defaultChecked Mozilla HTMLInputElement.defaultChecked documentation> -setDefaultChecked ::-                  (MonadIO m) => HTMLInputElement -> Bool -> m ()-setDefaultChecked self val-  = liftIO (js_setDefaultChecked (self) val)- -foreign import javascript unsafe "($1[\"defaultChecked\"] ? 1 : 0)"-        js_getDefaultChecked :: HTMLInputElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.defaultChecked Mozilla HTMLInputElement.defaultChecked documentation> -getDefaultChecked :: (MonadIO m) => HTMLInputElement -> m Bool-getDefaultChecked self = liftIO (js_getDefaultChecked (self))- -foreign import javascript unsafe "$1[\"checked\"] = $2;"-        js_setChecked :: HTMLInputElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.checked Mozilla HTMLInputElement.checked documentation> -setChecked :: (MonadIO m) => HTMLInputElement -> Bool -> m ()-setChecked self val = liftIO (js_setChecked (self) val)- -foreign import javascript unsafe "($1[\"checked\"] ? 1 : 0)"-        js_getChecked :: HTMLInputElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.checked Mozilla HTMLInputElement.checked documentation> -getChecked :: (MonadIO m) => HTMLInputElement -> m Bool-getChecked self = liftIO (js_getChecked (self))- -foreign import javascript unsafe "$1[\"dirName\"] = $2;"-        js_setDirName :: HTMLInputElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.dirName Mozilla HTMLInputElement.dirName documentation> -setDirName ::-           (MonadIO m, ToJSString val) => HTMLInputElement -> val -> m ()-setDirName self val-  = liftIO (js_setDirName (self) (toJSString val))- -foreign import javascript unsafe "$1[\"dirName\"]" js_getDirName ::-        HTMLInputElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.dirName Mozilla HTMLInputElement.dirName documentation> -getDirName ::-           (MonadIO m, FromJSString result) => HTMLInputElement -> m result-getDirName self = liftIO (fromJSString <$> (js_getDirName (self)))- -foreign import javascript unsafe "$1[\"disabled\"] = $2;"-        js_setDisabled :: HTMLInputElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.disabled Mozilla HTMLInputElement.disabled documentation> -setDisabled :: (MonadIO m) => HTMLInputElement -> Bool -> m ()-setDisabled self val = liftIO (js_setDisabled (self) val)- -foreign import javascript unsafe "($1[\"disabled\"] ? 1 : 0)"-        js_getDisabled :: HTMLInputElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.disabled Mozilla HTMLInputElement.disabled documentation> -getDisabled :: (MonadIO m) => HTMLInputElement -> m Bool-getDisabled self = liftIO (js_getDisabled (self))- -foreign import javascript unsafe "$1[\"form\"]" js_getForm ::-        HTMLInputElement -> IO (Nullable HTMLFormElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.form Mozilla HTMLInputElement.form documentation> -getForm ::-        (MonadIO m) => HTMLInputElement -> m (Maybe HTMLFormElement)-getForm self = liftIO (nullableToMaybe <$> (js_getForm (self)))- -foreign import javascript unsafe "$1[\"files\"] = $2;" js_setFiles-        :: HTMLInputElement -> Nullable FileList -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.files Mozilla HTMLInputElement.files documentation> -setFiles ::-         (MonadIO m) => HTMLInputElement -> Maybe FileList -> m ()-setFiles self val-  = liftIO (js_setFiles (self) (maybeToNullable val))- -foreign import javascript unsafe "$1[\"files\"]" js_getFiles ::-        HTMLInputElement -> IO (Nullable FileList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.files Mozilla HTMLInputElement.files documentation> -getFiles :: (MonadIO m) => HTMLInputElement -> m (Maybe FileList)-getFiles self = liftIO (nullableToMaybe <$> (js_getFiles (self)))- -foreign import javascript unsafe "$1[\"formAction\"] = $2;"-        js_setFormAction :: HTMLInputElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.formAction Mozilla HTMLInputElement.formAction documentation> -setFormAction ::-              (MonadIO m, ToJSString val) => HTMLInputElement -> val -> m ()-setFormAction self val-  = liftIO (js_setFormAction (self) (toJSString val))- -foreign import javascript unsafe "$1[\"formAction\"]"-        js_getFormAction :: HTMLInputElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.formAction Mozilla HTMLInputElement.formAction documentation> -getFormAction ::-              (MonadIO m, FromJSString result) => HTMLInputElement -> m result-getFormAction self-  = liftIO (fromJSString <$> (js_getFormAction (self)))- -foreign import javascript unsafe "$1[\"formEnctype\"] = $2;"-        js_setFormEnctype :: HTMLInputElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.formEnctype Mozilla HTMLInputElement.formEnctype documentation> -setFormEnctype ::-               (MonadIO m, ToJSString val) =>-                 HTMLInputElement -> Maybe val -> m ()-setFormEnctype self val-  = liftIO (js_setFormEnctype (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"formEnctype\"]"-        js_getFormEnctype :: HTMLInputElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.formEnctype Mozilla HTMLInputElement.formEnctype documentation> -getFormEnctype ::-               (MonadIO m, FromJSString result) =>-                 HTMLInputElement -> m (Maybe result)-getFormEnctype self-  = liftIO (fromMaybeJSString <$> (js_getFormEnctype (self)))- -foreign import javascript unsafe "$1[\"formMethod\"] = $2;"-        js_setFormMethod :: HTMLInputElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.formMethod Mozilla HTMLInputElement.formMethod documentation> -setFormMethod ::-              (MonadIO m, ToJSString val) =>-                HTMLInputElement -> Maybe val -> m ()-setFormMethod self val-  = liftIO (js_setFormMethod (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"formMethod\"]"-        js_getFormMethod :: HTMLInputElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.formMethod Mozilla HTMLInputElement.formMethod documentation> -getFormMethod ::-              (MonadIO m, FromJSString result) =>-                HTMLInputElement -> m (Maybe result)-getFormMethod self-  = liftIO (fromMaybeJSString <$> (js_getFormMethod (self)))- -foreign import javascript unsafe "$1[\"formNoValidate\"] = $2;"-        js_setFormNoValidate :: HTMLInputElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.formNoValidate Mozilla HTMLInputElement.formNoValidate documentation> -setFormNoValidate ::-                  (MonadIO m) => HTMLInputElement -> Bool -> m ()-setFormNoValidate self val-  = liftIO (js_setFormNoValidate (self) val)- -foreign import javascript unsafe "($1[\"formNoValidate\"] ? 1 : 0)"-        js_getFormNoValidate :: HTMLInputElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.formNoValidate Mozilla HTMLInputElement.formNoValidate documentation> -getFormNoValidate :: (MonadIO m) => HTMLInputElement -> m Bool-getFormNoValidate self = liftIO (js_getFormNoValidate (self))- -foreign import javascript unsafe "$1[\"formTarget\"] = $2;"-        js_setFormTarget :: HTMLInputElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.formTarget Mozilla HTMLInputElement.formTarget documentation> -setFormTarget ::-              (MonadIO m, ToJSString val) => HTMLInputElement -> val -> m ()-setFormTarget self val-  = liftIO (js_setFormTarget (self) (toJSString val))- -foreign import javascript unsafe "$1[\"formTarget\"]"-        js_getFormTarget :: HTMLInputElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.formTarget Mozilla HTMLInputElement.formTarget documentation> -getFormTarget ::-              (MonadIO m, FromJSString result) => HTMLInputElement -> m result-getFormTarget self-  = liftIO (fromJSString <$> (js_getFormTarget (self)))- -foreign import javascript unsafe "$1[\"height\"] = $2;"-        js_setHeight :: HTMLInputElement -> Word -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.height Mozilla HTMLInputElement.height documentation> -setHeight :: (MonadIO m) => HTMLInputElement -> Word -> m ()-setHeight self val = liftIO (js_setHeight (self) val)- -foreign import javascript unsafe "$1[\"height\"]" js_getHeight ::-        HTMLInputElement -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.height Mozilla HTMLInputElement.height documentation> -getHeight :: (MonadIO m) => HTMLInputElement -> m Word-getHeight self = liftIO (js_getHeight (self))- -foreign import javascript unsafe "$1[\"indeterminate\"] = $2;"-        js_setIndeterminate :: HTMLInputElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.indeterminate Mozilla HTMLInputElement.indeterminate documentation> -setIndeterminate :: (MonadIO m) => HTMLInputElement -> Bool -> m ()-setIndeterminate self val = liftIO (js_setIndeterminate (self) val)- -foreign import javascript unsafe "($1[\"indeterminate\"] ? 1 : 0)"-        js_getIndeterminate :: HTMLInputElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.indeterminate Mozilla HTMLInputElement.indeterminate documentation> -getIndeterminate :: (MonadIO m) => HTMLInputElement -> m Bool-getIndeterminate self = liftIO (js_getIndeterminate (self))- -foreign import javascript unsafe "$1[\"list\"]" js_getList ::-        HTMLInputElement -> IO (Nullable HTMLElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.list Mozilla HTMLInputElement.list documentation> -getList :: (MonadIO m) => HTMLInputElement -> m (Maybe HTMLElement)-getList self = liftIO (nullableToMaybe <$> (js_getList (self)))- -foreign import javascript unsafe "$1[\"max\"] = $2;" js_setMax ::-        HTMLInputElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.max Mozilla HTMLInputElement.max documentation> -setMax ::-       (MonadIO m, ToJSString val) => HTMLInputElement -> val -> m ()-setMax self val = liftIO (js_setMax (self) (toJSString val))- -foreign import javascript unsafe "$1[\"max\"]" js_getMax ::-        HTMLInputElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.max Mozilla HTMLInputElement.max documentation> -getMax ::-       (MonadIO m, FromJSString result) => HTMLInputElement -> m result-getMax self = liftIO (fromJSString <$> (js_getMax (self)))- -foreign import javascript unsafe "$1[\"maxLength\"] = $2;"-        js_setMaxLength :: HTMLInputElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.maxLength Mozilla HTMLInputElement.maxLength documentation> -setMaxLength :: (MonadIO m) => HTMLInputElement -> Int -> m ()-setMaxLength self val = liftIO (js_setMaxLength (self) val)- -foreign import javascript unsafe "$1[\"maxLength\"]"-        js_getMaxLength :: HTMLInputElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.maxLength Mozilla HTMLInputElement.maxLength documentation> -getMaxLength :: (MonadIO m) => HTMLInputElement -> m Int-getMaxLength self = liftIO (js_getMaxLength (self))- -foreign import javascript unsafe "$1[\"min\"] = $2;" js_setMin ::-        HTMLInputElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.min Mozilla HTMLInputElement.min documentation> -setMin ::-       (MonadIO m, ToJSString val) => HTMLInputElement -> val -> m ()-setMin self val = liftIO (js_setMin (self) (toJSString val))- -foreign import javascript unsafe "$1[\"min\"]" js_getMin ::-        HTMLInputElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.min Mozilla HTMLInputElement.min documentation> -getMin ::-       (MonadIO m, FromJSString result) => HTMLInputElement -> m result-getMin self = liftIO (fromJSString <$> (js_getMin (self)))- -foreign import javascript unsafe "$1[\"multiple\"] = $2;"-        js_setMultiple :: HTMLInputElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.multiple Mozilla HTMLInputElement.multiple documentation> -setMultiple :: (MonadIO m) => HTMLInputElement -> Bool -> m ()-setMultiple self val = liftIO (js_setMultiple (self) val)- -foreign import javascript unsafe "($1[\"multiple\"] ? 1 : 0)"-        js_getMultiple :: HTMLInputElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.multiple Mozilla HTMLInputElement.multiple documentation> -getMultiple :: (MonadIO m) => HTMLInputElement -> m Bool-getMultiple self = liftIO (js_getMultiple (self))- -foreign import javascript unsafe "$1[\"name\"] = $2;" js_setName ::-        HTMLInputElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.name Mozilla HTMLInputElement.name documentation> -setName ::-        (MonadIO m, ToJSString val) => HTMLInputElement -> val -> m ()-setName self val = liftIO (js_setName (self) (toJSString val))- -foreign import javascript unsafe "$1[\"name\"]" js_getName ::-        HTMLInputElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.name Mozilla HTMLInputElement.name documentation> -getName ::-        (MonadIO m, FromJSString result) => HTMLInputElement -> m result-getName self = liftIO (fromJSString <$> (js_getName (self)))- -foreign import javascript unsafe "$1[\"pattern\"] = $2;"-        js_setPattern :: HTMLInputElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.pattern Mozilla HTMLInputElement.pattern documentation> -setPattern ::-           (MonadIO m, ToJSString val) => HTMLInputElement -> val -> m ()-setPattern self val-  = liftIO (js_setPattern (self) (toJSString val))- -foreign import javascript unsafe "$1[\"pattern\"]" js_getPattern ::-        HTMLInputElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.pattern Mozilla HTMLInputElement.pattern documentation> -getPattern ::-           (MonadIO m, FromJSString result) => HTMLInputElement -> m result-getPattern self = liftIO (fromJSString <$> (js_getPattern (self)))- -foreign import javascript unsafe "$1[\"placeholder\"] = $2;"-        js_setPlaceholder :: HTMLInputElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.placeholder Mozilla HTMLInputElement.placeholder documentation> -setPlaceholder ::-               (MonadIO m, ToJSString val) => HTMLInputElement -> val -> m ()-setPlaceholder self val-  = liftIO (js_setPlaceholder (self) (toJSString val))- -foreign import javascript unsafe "$1[\"placeholder\"]"-        js_getPlaceholder :: HTMLInputElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.placeholder Mozilla HTMLInputElement.placeholder documentation> -getPlaceholder ::-               (MonadIO m, FromJSString result) => HTMLInputElement -> m result-getPlaceholder self-  = liftIO (fromJSString <$> (js_getPlaceholder (self)))- -foreign import javascript unsafe "$1[\"readOnly\"] = $2;"-        js_setReadOnly :: HTMLInputElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.readOnly Mozilla HTMLInputElement.readOnly documentation> -setReadOnly :: (MonadIO m) => HTMLInputElement -> Bool -> m ()-setReadOnly self val = liftIO (js_setReadOnly (self) val)- -foreign import javascript unsafe "($1[\"readOnly\"] ? 1 : 0)"-        js_getReadOnly :: HTMLInputElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.readOnly Mozilla HTMLInputElement.readOnly documentation> -getReadOnly :: (MonadIO m) => HTMLInputElement -> m Bool-getReadOnly self = liftIO (js_getReadOnly (self))- -foreign import javascript unsafe "$1[\"required\"] = $2;"-        js_setRequired :: HTMLInputElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.required Mozilla HTMLInputElement.required documentation> -setRequired :: (MonadIO m) => HTMLInputElement -> Bool -> m ()-setRequired self val = liftIO (js_setRequired (self) val)- -foreign import javascript unsafe "($1[\"required\"] ? 1 : 0)"-        js_getRequired :: HTMLInputElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.required Mozilla HTMLInputElement.required documentation> -getRequired :: (MonadIO m) => HTMLInputElement -> m Bool-getRequired self = liftIO (js_getRequired (self))- -foreign import javascript unsafe "$1[\"size\"] = $2;" js_setSize ::-        HTMLInputElement -> Word -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.size Mozilla HTMLInputElement.size documentation> -setSize :: (MonadIO m) => HTMLInputElement -> Word -> m ()-setSize self val = liftIO (js_setSize (self) val)- -foreign import javascript unsafe "$1[\"size\"]" js_getSize ::-        HTMLInputElement -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.size Mozilla HTMLInputElement.size documentation> -getSize :: (MonadIO m) => HTMLInputElement -> m Word-getSize self = liftIO (js_getSize (self))- -foreign import javascript unsafe "$1[\"src\"] = $2;" js_setSrc ::-        HTMLInputElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.src Mozilla HTMLInputElement.src documentation> -setSrc ::-       (MonadIO m, ToJSString val) => HTMLInputElement -> val -> m ()-setSrc self val = liftIO (js_setSrc (self) (toJSString val))- -foreign import javascript unsafe "$1[\"src\"]" js_getSrc ::-        HTMLInputElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.src Mozilla HTMLInputElement.src documentation> -getSrc ::-       (MonadIO m, FromJSString result) => HTMLInputElement -> m result-getSrc self = liftIO (fromJSString <$> (js_getSrc (self)))- -foreign import javascript unsafe "$1[\"step\"] = $2;" js_setStep ::-        HTMLInputElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.step Mozilla HTMLInputElement.step documentation> -setStep ::-        (MonadIO m, ToJSString val) => HTMLInputElement -> val -> m ()-setStep self val = liftIO (js_setStep (self) (toJSString val))- -foreign import javascript unsafe "$1[\"step\"]" js_getStep ::-        HTMLInputElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.step Mozilla HTMLInputElement.step documentation> -getStep ::-        (MonadIO m, FromJSString result) => HTMLInputElement -> m result-getStep self = liftIO (fromJSString <$> (js_getStep (self)))- -foreign import javascript unsafe "$1[\"type\"] = $2;" js_setType ::-        HTMLInputElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.type Mozilla HTMLInputElement.type documentation> -setType ::-        (MonadIO m, ToJSString val) => HTMLInputElement -> val -> m ()-setType self val = liftIO (js_setType (self) (toJSString val))- -foreign import javascript unsafe "$1[\"type\"]" js_getType ::-        HTMLInputElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.type Mozilla HTMLInputElement.type documentation> -getType ::-        (MonadIO m, FromJSString result) => HTMLInputElement -> m result-getType self = liftIO (fromJSString <$> (js_getType (self)))- -foreign import javascript unsafe "$1[\"defaultValue\"] = $2;"-        js_setDefaultValue ::-        HTMLInputElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.defaultValue Mozilla HTMLInputElement.defaultValue documentation> -setDefaultValue ::-                (MonadIO m, ToJSString val) =>-                  HTMLInputElement -> Maybe val -> m ()-setDefaultValue self val-  = liftIO (js_setDefaultValue (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"defaultValue\"]"-        js_getDefaultValue :: HTMLInputElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.defaultValue Mozilla HTMLInputElement.defaultValue documentation> -getDefaultValue ::-                (MonadIO m, FromJSString result) =>-                  HTMLInputElement -> m (Maybe result)-getDefaultValue self-  = liftIO (fromMaybeJSString <$> (js_getDefaultValue (self)))- -foreign import javascript unsafe "$1[\"value\"] = $2;" js_setValue-        :: HTMLInputElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.value Mozilla HTMLInputElement.value documentation> -setValue ::-         (MonadIO m, ToJSString val) =>-           HTMLInputElement -> Maybe val -> m ()-setValue self val-  = liftIO (js_setValue (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"value\"]" js_getValue ::-        HTMLInputElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.value Mozilla HTMLInputElement.value documentation> -getValue ::-         (MonadIO m, FromJSString result) =>-           HTMLInputElement -> m (Maybe result)-getValue self = liftIO (fromMaybeJSString <$> (js_getValue (self)))- -foreign import javascript unsafe "$1[\"valueAsDate\"] = $2;"-        js_setValueAsDate :: HTMLInputElement -> Nullable Date -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.valueAsDate Mozilla HTMLInputElement.valueAsDate documentation> -setValueAsDate ::-               (MonadIO m, IsDate val) => HTMLInputElement -> Maybe val -> m ()-setValueAsDate self val-  = liftIO-      (js_setValueAsDate (self) (maybeToNullable (fmap toDate val)))- -foreign import javascript unsafe "$1[\"valueAsDate\"]"-        js_getValueAsDate :: HTMLInputElement -> IO (Nullable Date)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.valueAsDate Mozilla HTMLInputElement.valueAsDate documentation> -getValueAsDate :: (MonadIO m) => HTMLInputElement -> m (Maybe Date)-getValueAsDate self-  = liftIO (nullableToMaybe <$> (js_getValueAsDate (self)))- -foreign import javascript unsafe "$1[\"valueAsNumber\"] = $2;"-        js_setValueAsNumber :: HTMLInputElement -> Double -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.valueAsNumber Mozilla HTMLInputElement.valueAsNumber documentation> -setValueAsNumber ::-                 (MonadIO m) => HTMLInputElement -> Double -> m ()-setValueAsNumber self val = liftIO (js_setValueAsNumber (self) val)- -foreign import javascript unsafe "$1[\"valueAsNumber\"]"-        js_getValueAsNumber :: HTMLInputElement -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.valueAsNumber Mozilla HTMLInputElement.valueAsNumber documentation> -getValueAsNumber :: (MonadIO m) => HTMLInputElement -> m Double-getValueAsNumber self = liftIO (js_getValueAsNumber (self))- -foreign import javascript unsafe "$1[\"width\"] = $2;" js_setWidth-        :: HTMLInputElement -> Word -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.width Mozilla HTMLInputElement.width documentation> -setWidth :: (MonadIO m) => HTMLInputElement -> Word -> m ()-setWidth self val = liftIO (js_setWidth (self) val)- -foreign import javascript unsafe "$1[\"width\"]" js_getWidth ::-        HTMLInputElement -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.width Mozilla HTMLInputElement.width documentation> -getWidth :: (MonadIO m) => HTMLInputElement -> m Word-getWidth self = liftIO (js_getWidth (self))- -foreign import javascript unsafe "($1[\"willValidate\"] ? 1 : 0)"-        js_getWillValidate :: HTMLInputElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.willValidate Mozilla HTMLInputElement.willValidate documentation> -getWillValidate :: (MonadIO m) => HTMLInputElement -> m Bool-getWillValidate self = liftIO (js_getWillValidate (self))- -foreign import javascript unsafe "$1[\"validity\"]" js_getValidity-        :: HTMLInputElement -> IO (Nullable ValidityState)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.validity Mozilla HTMLInputElement.validity documentation> -getValidity ::-            (MonadIO m) => HTMLInputElement -> m (Maybe ValidityState)-getValidity self-  = liftIO (nullableToMaybe <$> (js_getValidity (self)))- -foreign import javascript unsafe "$1[\"validationMessage\"]"-        js_getValidationMessage :: HTMLInputElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.validationMessage Mozilla HTMLInputElement.validationMessage documentation> -getValidationMessage ::-                     (MonadIO m, FromJSString result) => HTMLInputElement -> m result-getValidationMessage self-  = liftIO (fromJSString <$> (js_getValidationMessage (self)))- -foreign import javascript unsafe "$1[\"labels\"]" js_getLabels ::-        HTMLInputElement -> IO (Nullable NodeList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.labels Mozilla HTMLInputElement.labels documentation> -getLabels :: (MonadIO m) => HTMLInputElement -> m (Maybe NodeList)-getLabels self = liftIO (nullableToMaybe <$> (js_getLabels (self)))- -foreign import javascript unsafe "$1[\"selectionStart\"] = $2;"-        js_setSelectionStart :: HTMLInputElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.selectionStart Mozilla HTMLInputElement.selectionStart documentation> -setSelectionStart :: (MonadIO m) => HTMLInputElement -> Int -> m ()-setSelectionStart self val-  = liftIO (js_setSelectionStart (self) val)- -foreign import javascript unsafe "$1[\"selectionStart\"]"-        js_getSelectionStart :: HTMLInputElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.selectionStart Mozilla HTMLInputElement.selectionStart documentation> -getSelectionStart :: (MonadIO m) => HTMLInputElement -> m Int-getSelectionStart self = liftIO (js_getSelectionStart (self))- -foreign import javascript unsafe "$1[\"selectionEnd\"] = $2;"-        js_setSelectionEnd :: HTMLInputElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.selectionEnd Mozilla HTMLInputElement.selectionEnd documentation> -setSelectionEnd :: (MonadIO m) => HTMLInputElement -> Int -> m ()-setSelectionEnd self val = liftIO (js_setSelectionEnd (self) val)- -foreign import javascript unsafe "$1[\"selectionEnd\"]"-        js_getSelectionEnd :: HTMLInputElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.selectionEnd Mozilla HTMLInputElement.selectionEnd documentation> -getSelectionEnd :: (MonadIO m) => HTMLInputElement -> m Int-getSelectionEnd self = liftIO (js_getSelectionEnd (self))- -foreign import javascript unsafe "$1[\"selectionDirection\"] = $2;"-        js_setSelectionDirection :: HTMLInputElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.selectionDirection Mozilla HTMLInputElement.selectionDirection documentation> -setSelectionDirection ::-                      (MonadIO m, ToJSString val) => HTMLInputElement -> val -> m ()-setSelectionDirection self val-  = liftIO (js_setSelectionDirection (self) (toJSString val))- -foreign import javascript unsafe "$1[\"selectionDirection\"]"-        js_getSelectionDirection :: HTMLInputElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.selectionDirection Mozilla HTMLInputElement.selectionDirection documentation> -getSelectionDirection ::-                      (MonadIO m, FromJSString result) => HTMLInputElement -> m result-getSelectionDirection self-  = liftIO (fromJSString <$> (js_getSelectionDirection (self)))- -foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign-        :: HTMLInputElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.align Mozilla HTMLInputElement.align documentation> -setAlign ::-         (MonadIO m, ToJSString val) => HTMLInputElement -> val -> m ()-setAlign self val = liftIO (js_setAlign (self) (toJSString val))- -foreign import javascript unsafe "$1[\"align\"]" js_getAlign ::-        HTMLInputElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.align Mozilla HTMLInputElement.align documentation> -getAlign ::-         (MonadIO m, FromJSString result) => HTMLInputElement -> m result-getAlign self = liftIO (fromJSString <$> (js_getAlign (self)))- -foreign import javascript unsafe "$1[\"useMap\"] = $2;"-        js_setUseMap :: HTMLInputElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.useMap Mozilla HTMLInputElement.useMap documentation> -setUseMap ::-          (MonadIO m, ToJSString val) => HTMLInputElement -> val -> m ()-setUseMap self val = liftIO (js_setUseMap (self) (toJSString val))- -foreign import javascript unsafe "$1[\"useMap\"]" js_getUseMap ::-        HTMLInputElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.useMap Mozilla HTMLInputElement.useMap documentation> -getUseMap ::-          (MonadIO m, FromJSString result) => HTMLInputElement -> m result-getUseMap self = liftIO (fromJSString <$> (js_getUseMap (self)))- -foreign import javascript unsafe "$1[\"incremental\"] = $2;"-        js_setIncremental :: HTMLInputElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.incremental Mozilla HTMLInputElement.incremental documentation> -setIncremental :: (MonadIO m) => HTMLInputElement -> Bool -> m ()-setIncremental self val = liftIO (js_setIncremental (self) val)- -foreign import javascript unsafe "($1[\"incremental\"] ? 1 : 0)"-        js_getIncremental :: HTMLInputElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.incremental Mozilla HTMLInputElement.incremental documentation> -getIncremental :: (MonadIO m) => HTMLInputElement -> m Bool-getIncremental self = liftIO (js_getIncremental (self))- -foreign import javascript unsafe "$1[\"autocorrect\"] = $2;"-        js_setAutocorrect :: HTMLInputElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.autocorrect Mozilla HTMLInputElement.autocorrect documentation> -setAutocorrect :: (MonadIO m) => HTMLInputElement -> Bool -> m ()-setAutocorrect self val = liftIO (js_setAutocorrect (self) val)- -foreign import javascript unsafe "($1[\"autocorrect\"] ? 1 : 0)"-        js_getAutocorrect :: HTMLInputElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.autocorrect Mozilla HTMLInputElement.autocorrect documentation> -getAutocorrect :: (MonadIO m) => HTMLInputElement -> m Bool-getAutocorrect self = liftIO (js_getAutocorrect (self))- -foreign import javascript unsafe "$1[\"autocapitalize\"] = $2;"-        js_setAutocapitalize ::-        HTMLInputElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.autocapitalize Mozilla HTMLInputElement.autocapitalize documentation> -setAutocapitalize ::-                  (MonadIO m, ToJSString val) =>-                    HTMLInputElement -> Maybe val -> m ()-setAutocapitalize self val-  = liftIO (js_setAutocapitalize (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"autocapitalize\"]"-        js_getAutocapitalize :: HTMLInputElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.autocapitalize Mozilla HTMLInputElement.autocapitalize documentation> -getAutocapitalize ::-                  (MonadIO m, FromJSString result) =>-                    HTMLInputElement -> m (Maybe result)-getAutocapitalize self-  = liftIO (fromMaybeJSString <$> (js_getAutocapitalize (self)))- -foreign import javascript unsafe "$1[\"capture\"] = $2;"-        js_setCapture :: HTMLInputElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.capture Mozilla HTMLInputElement.capture documentation> -setCapture :: (MonadIO m) => HTMLInputElement -> Bool -> m ()-setCapture self val = liftIO (js_setCapture (self) val)- -foreign import javascript unsafe "($1[\"capture\"] ? 1 : 0)"-        js_getCapture :: HTMLInputElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.capture Mozilla HTMLInputElement.capture documentation> -getCapture :: (MonadIO m) => HTMLInputElement -> m Bool-getCapture self = liftIO (js_getCapture (self))

− src/GHCJS/DOM/JSFFI/Generated/HTMLKeygenElement.hs

@@ -1,173 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLKeygenElement-       (js_checkValidity, checkValidity, js_setCustomValidity,-        setCustomValidity, js_setAutofocus, setAutofocus, js_getAutofocus,-        getAutofocus, js_setChallenge, setChallenge, js_getChallenge,-        getChallenge, js_setDisabled, setDisabled, js_getDisabled,-        getDisabled, js_getForm, getForm, js_setKeytype, setKeytype,-        js_getKeytype, getKeytype, js_setName, setName, js_getName,-        getName, js_getType, getType, js_getWillValidate, getWillValidate,-        js_getValidity, getValidity, js_getValidationMessage,-        getValidationMessage, js_getLabels, getLabels, HTMLKeygenElement,-        castToHTMLKeygenElement, gTypeHTMLKeygenElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe-        "($1[\"checkValidity\"]() ? 1 : 0)" js_checkValidity ::-        HTMLKeygenElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLKeygenElement.checkValidity Mozilla HTMLKeygenElement.checkValidity documentation> -checkValidity :: (MonadIO m) => HTMLKeygenElement -> m Bool-checkValidity self = liftIO (js_checkValidity (self))- -foreign import javascript unsafe "$1[\"setCustomValidity\"]($2)"-        js_setCustomValidity ::-        HTMLKeygenElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLKeygenElement.setCustomValidity Mozilla HTMLKeygenElement.setCustomValidity documentation> -setCustomValidity ::-                  (MonadIO m, ToJSString error) =>-                    HTMLKeygenElement -> Maybe error -> m ()-setCustomValidity self error-  = liftIO (js_setCustomValidity (self) (toMaybeJSString error))- -foreign import javascript unsafe "$1[\"autofocus\"] = $2;"-        js_setAutofocus :: HTMLKeygenElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLKeygenElement.autofocus Mozilla HTMLKeygenElement.autofocus documentation> -setAutofocus :: (MonadIO m) => HTMLKeygenElement -> Bool -> m ()-setAutofocus self val = liftIO (js_setAutofocus (self) val)- -foreign import javascript unsafe "($1[\"autofocus\"] ? 1 : 0)"-        js_getAutofocus :: HTMLKeygenElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLKeygenElement.autofocus Mozilla HTMLKeygenElement.autofocus documentation> -getAutofocus :: (MonadIO m) => HTMLKeygenElement -> m Bool-getAutofocus self = liftIO (js_getAutofocus (self))- -foreign import javascript unsafe "$1[\"challenge\"] = $2;"-        js_setChallenge :: HTMLKeygenElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLKeygenElement.challenge Mozilla HTMLKeygenElement.challenge documentation> -setChallenge ::-             (MonadIO m, ToJSString val) => HTMLKeygenElement -> val -> m ()-setChallenge self val-  = liftIO (js_setChallenge (self) (toJSString val))- -foreign import javascript unsafe "$1[\"challenge\"]"-        js_getChallenge :: HTMLKeygenElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLKeygenElement.challenge Mozilla HTMLKeygenElement.challenge documentation> -getChallenge ::-             (MonadIO m, FromJSString result) => HTMLKeygenElement -> m result-getChallenge self-  = liftIO (fromJSString <$> (js_getChallenge (self)))- -foreign import javascript unsafe "$1[\"disabled\"] = $2;"-        js_setDisabled :: HTMLKeygenElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLKeygenElement.disabled Mozilla HTMLKeygenElement.disabled documentation> -setDisabled :: (MonadIO m) => HTMLKeygenElement -> Bool -> m ()-setDisabled self val = liftIO (js_setDisabled (self) val)- -foreign import javascript unsafe "($1[\"disabled\"] ? 1 : 0)"-        js_getDisabled :: HTMLKeygenElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLKeygenElement.disabled Mozilla HTMLKeygenElement.disabled documentation> -getDisabled :: (MonadIO m) => HTMLKeygenElement -> m Bool-getDisabled self = liftIO (js_getDisabled (self))- -foreign import javascript unsafe "$1[\"form\"]" js_getForm ::-        HTMLKeygenElement -> IO (Nullable HTMLFormElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLKeygenElement.form Mozilla HTMLKeygenElement.form documentation> -getForm ::-        (MonadIO m) => HTMLKeygenElement -> m (Maybe HTMLFormElement)-getForm self = liftIO (nullableToMaybe <$> (js_getForm (self)))- -foreign import javascript unsafe "$1[\"keytype\"] = $2;"-        js_setKeytype :: HTMLKeygenElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLKeygenElement.keytype Mozilla HTMLKeygenElement.keytype documentation> -setKeytype ::-           (MonadIO m, ToJSString val) => HTMLKeygenElement -> val -> m ()-setKeytype self val-  = liftIO (js_setKeytype (self) (toJSString val))- -foreign import javascript unsafe "$1[\"keytype\"]" js_getKeytype ::-        HTMLKeygenElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLKeygenElement.keytype Mozilla HTMLKeygenElement.keytype documentation> -getKeytype ::-           (MonadIO m, FromJSString result) => HTMLKeygenElement -> m result-getKeytype self = liftIO (fromJSString <$> (js_getKeytype (self)))- -foreign import javascript unsafe "$1[\"name\"] = $2;" js_setName ::-        HTMLKeygenElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLKeygenElement.name Mozilla HTMLKeygenElement.name documentation> -setName ::-        (MonadIO m, ToJSString val) => HTMLKeygenElement -> val -> m ()-setName self val = liftIO (js_setName (self) (toJSString val))- -foreign import javascript unsafe "$1[\"name\"]" js_getName ::-        HTMLKeygenElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLKeygenElement.name Mozilla HTMLKeygenElement.name documentation> -getName ::-        (MonadIO m, FromJSString result) => HTMLKeygenElement -> m result-getName self = liftIO (fromJSString <$> (js_getName (self)))- -foreign import javascript unsafe "$1[\"type\"]" js_getType ::-        HTMLKeygenElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLKeygenElement.type Mozilla HTMLKeygenElement.type documentation> -getType ::-        (MonadIO m, FromJSString result) => HTMLKeygenElement -> m result-getType self = liftIO (fromJSString <$> (js_getType (self)))- -foreign import javascript unsafe "($1[\"willValidate\"] ? 1 : 0)"-        js_getWillValidate :: HTMLKeygenElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLKeygenElement.willValidate Mozilla HTMLKeygenElement.willValidate documentation> -getWillValidate :: (MonadIO m) => HTMLKeygenElement -> m Bool-getWillValidate self = liftIO (js_getWillValidate (self))- -foreign import javascript unsafe "$1[\"validity\"]" js_getValidity-        :: HTMLKeygenElement -> IO (Nullable ValidityState)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLKeygenElement.validity Mozilla HTMLKeygenElement.validity documentation> -getValidity ::-            (MonadIO m) => HTMLKeygenElement -> m (Maybe ValidityState)-getValidity self-  = liftIO (nullableToMaybe <$> (js_getValidity (self)))- -foreign import javascript unsafe "$1[\"validationMessage\"]"-        js_getValidationMessage :: HTMLKeygenElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLKeygenElement.validationMessage Mozilla HTMLKeygenElement.validationMessage documentation> -getValidationMessage ::-                     (MonadIO m, FromJSString result) => HTMLKeygenElement -> m result-getValidationMessage self-  = liftIO (fromJSString <$> (js_getValidationMessage (self)))- -foreign import javascript unsafe "$1[\"labels\"]" js_getLabels ::-        HTMLKeygenElement -> IO (Nullable NodeList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLKeygenElement.labels Mozilla HTMLKeygenElement.labels documentation> -getLabels :: (MonadIO m) => HTMLKeygenElement -> m (Maybe NodeList)-getLabels self = liftIO (nullableToMaybe <$> (js_getLabels (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLLIElement.hs

@@ -1,50 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLLIElement-       (js_setType, setType, js_getType, getType, js_setValue, setValue,-        js_getValue, getValue, HTMLLIElement, castToHTMLLIElement,-        gTypeHTMLLIElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"type\"] = $2;" js_setType ::-        HTMLLIElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLIElement.type Mozilla HTMLLIElement.type documentation> -setType ::-        (MonadIO m, ToJSString val) => HTMLLIElement -> val -> m ()-setType self val = liftIO (js_setType (self) (toJSString val))- -foreign import javascript unsafe "$1[\"type\"]" js_getType ::-        HTMLLIElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLIElement.type Mozilla HTMLLIElement.type documentation> -getType ::-        (MonadIO m, FromJSString result) => HTMLLIElement -> m result-getType self = liftIO (fromJSString <$> (js_getType (self)))- -foreign import javascript unsafe "$1[\"value\"] = $2;" js_setValue-        :: HTMLLIElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLIElement.value Mozilla HTMLLIElement.value documentation> -setValue :: (MonadIO m) => HTMLLIElement -> Int -> m ()-setValue self val = liftIO (js_setValue (self) val)- -foreign import javascript unsafe "$1[\"value\"]" js_getValue ::-        HTMLLIElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLIElement.value Mozilla HTMLLIElement.value documentation> -getValue :: (MonadIO m) => HTMLLIElement -> m Int-getValue self = liftIO (js_getValue (self))

− src/GHCJS/DOM/JSFFI/Generated/HTMLLabelElement.hs

@@ -1,54 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLLabelElement-       (js_getForm, getForm, js_setHtmlFor, setHtmlFor, js_getHtmlFor,-        getHtmlFor, js_getControl, getControl, HTMLLabelElement,-        castToHTMLLabelElement, gTypeHTMLLabelElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"form\"]" js_getForm ::-        HTMLLabelElement -> IO (Nullable HTMLFormElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLabelElement.form Mozilla HTMLLabelElement.form documentation> -getForm ::-        (MonadIO m) => HTMLLabelElement -> m (Maybe HTMLFormElement)-getForm self = liftIO (nullableToMaybe <$> (js_getForm (self)))- -foreign import javascript unsafe "$1[\"htmlFor\"] = $2;"-        js_setHtmlFor :: HTMLLabelElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLabelElement.htmlFor Mozilla HTMLLabelElement.htmlFor documentation> -setHtmlFor ::-           (MonadIO m, ToJSString val) => HTMLLabelElement -> val -> m ()-setHtmlFor self val-  = liftIO (js_setHtmlFor (self) (toJSString val))- -foreign import javascript unsafe "$1[\"htmlFor\"]" js_getHtmlFor ::-        HTMLLabelElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLabelElement.htmlFor Mozilla HTMLLabelElement.htmlFor documentation> -getHtmlFor ::-           (MonadIO m, FromJSString result) => HTMLLabelElement -> m result-getHtmlFor self = liftIO (fromJSString <$> (js_getHtmlFor (self)))- -foreign import javascript unsafe "$1[\"control\"]" js_getControl ::-        HTMLLabelElement -> IO (Nullable HTMLElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLabelElement.control Mozilla HTMLLabelElement.control documentation> -getControl ::-           (MonadIO m) => HTMLLabelElement -> m (Maybe HTMLElement)-getControl self-  = liftIO (nullableToMaybe <$> (js_getControl (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLLegendElement.hs

@@ -1,43 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLLegendElement-       (js_getForm, getForm, js_setAlign, setAlign, js_getAlign, getAlign,-        HTMLLegendElement, castToHTMLLegendElement, gTypeHTMLLegendElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"form\"]" js_getForm ::-        HTMLLegendElement -> IO (Nullable HTMLFormElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLegendElement.form Mozilla HTMLLegendElement.form documentation> -getForm ::-        (MonadIO m) => HTMLLegendElement -> m (Maybe HTMLFormElement)-getForm self = liftIO (nullableToMaybe <$> (js_getForm (self)))- -foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign-        :: HTMLLegendElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLegendElement.align Mozilla HTMLLegendElement.align documentation> -setAlign ::-         (MonadIO m, ToJSString val) => HTMLLegendElement -> val -> m ()-setAlign self val = liftIO (js_setAlign (self) (toJSString val))- -foreign import javascript unsafe "$1[\"align\"]" js_getAlign ::-        HTMLLegendElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLegendElement.align Mozilla HTMLLegendElement.align documentation> -getAlign ::-         (MonadIO m, FromJSString result) => HTMLLegendElement -> m result-getAlign self = liftIO (fromJSString <$> (js_getAlign (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLLinkElement.hs

@@ -1,206 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLLinkElement-       (js_setDisabled, setDisabled, js_getDisabled, getDisabled,-        js_setCharset, setCharset, js_getCharset, getCharset, js_setHref,-        setHref, js_getHref, getHref, js_setHreflang, setHreflang,-        js_getHreflang, getHreflang, js_setMedia, setMedia, js_getMedia,-        getMedia, js_setRel, setRel, js_getRel, getRel, js_setRev, setRev,-        js_getRev, getRev, js_setSizes, setSizes, js_getSizes, getSizes,-        js_setTarget, setTarget, js_getTarget, getTarget, js_setType,-        setType, js_getType, getType, js_getSheet, getSheet, js_getRelList,-        getRelList, HTMLLinkElement, castToHTMLLinkElement,-        gTypeHTMLLinkElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"disabled\"] = $2;"-        js_setDisabled :: HTMLLinkElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLinkElement.disabled Mozilla HTMLLinkElement.disabled documentation> -setDisabled :: (MonadIO m) => HTMLLinkElement -> Bool -> m ()-setDisabled self val = liftIO (js_setDisabled (self) val)- -foreign import javascript unsafe "($1[\"disabled\"] ? 1 : 0)"-        js_getDisabled :: HTMLLinkElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLinkElement.disabled Mozilla HTMLLinkElement.disabled documentation> -getDisabled :: (MonadIO m) => HTMLLinkElement -> m Bool-getDisabled self = liftIO (js_getDisabled (self))- -foreign import javascript unsafe "$1[\"charset\"] = $2;"-        js_setCharset :: HTMLLinkElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLinkElement.charset Mozilla HTMLLinkElement.charset documentation> -setCharset ::-           (MonadIO m, ToJSString val) => HTMLLinkElement -> val -> m ()-setCharset self val-  = liftIO (js_setCharset (self) (toJSString val))- -foreign import javascript unsafe "$1[\"charset\"]" js_getCharset ::-        HTMLLinkElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLinkElement.charset Mozilla HTMLLinkElement.charset documentation> -getCharset ::-           (MonadIO m, FromJSString result) => HTMLLinkElement -> m result-getCharset self = liftIO (fromJSString <$> (js_getCharset (self)))- -foreign import javascript unsafe "$1[\"href\"] = $2;" js_setHref ::-        HTMLLinkElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLinkElement.href Mozilla HTMLLinkElement.href documentation> -setHref ::-        (MonadIO m, ToJSString val) => HTMLLinkElement -> val -> m ()-setHref self val = liftIO (js_setHref (self) (toJSString val))- -foreign import javascript unsafe "$1[\"href\"]" js_getHref ::-        HTMLLinkElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLinkElement.href Mozilla HTMLLinkElement.href documentation> -getHref ::-        (MonadIO m, FromJSString result) => HTMLLinkElement -> m result-getHref self = liftIO (fromJSString <$> (js_getHref (self)))- -foreign import javascript unsafe "$1[\"hreflang\"] = $2;"-        js_setHreflang :: HTMLLinkElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLinkElement.hreflang Mozilla HTMLLinkElement.hreflang documentation> -setHreflang ::-            (MonadIO m, ToJSString val) => HTMLLinkElement -> val -> m ()-setHreflang self val-  = liftIO (js_setHreflang (self) (toJSString val))- -foreign import javascript unsafe "$1[\"hreflang\"]" js_getHreflang-        :: HTMLLinkElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLinkElement.hreflang Mozilla HTMLLinkElement.hreflang documentation> -getHreflang ::-            (MonadIO m, FromJSString result) => HTMLLinkElement -> m result-getHreflang self-  = liftIO (fromJSString <$> (js_getHreflang (self)))- -foreign import javascript unsafe "$1[\"media\"] = $2;" js_setMedia-        :: HTMLLinkElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLinkElement.media Mozilla HTMLLinkElement.media documentation> -setMedia ::-         (MonadIO m, ToJSString val) => HTMLLinkElement -> val -> m ()-setMedia self val = liftIO (js_setMedia (self) (toJSString val))- -foreign import javascript unsafe "$1[\"media\"]" js_getMedia ::-        HTMLLinkElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLinkElement.media Mozilla HTMLLinkElement.media documentation> -getMedia ::-         (MonadIO m, FromJSString result) => HTMLLinkElement -> m result-getMedia self = liftIO (fromJSString <$> (js_getMedia (self)))- -foreign import javascript unsafe "$1[\"rel\"] = $2;" js_setRel ::-        HTMLLinkElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLinkElement.rel Mozilla HTMLLinkElement.rel documentation> -setRel ::-       (MonadIO m, ToJSString val) => HTMLLinkElement -> val -> m ()-setRel self val = liftIO (js_setRel (self) (toJSString val))- -foreign import javascript unsafe "$1[\"rel\"]" js_getRel ::-        HTMLLinkElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLinkElement.rel Mozilla HTMLLinkElement.rel documentation> -getRel ::-       (MonadIO m, FromJSString result) => HTMLLinkElement -> m result-getRel self = liftIO (fromJSString <$> (js_getRel (self)))- -foreign import javascript unsafe "$1[\"rev\"] = $2;" js_setRev ::-        HTMLLinkElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLinkElement.rev Mozilla HTMLLinkElement.rev documentation> -setRev ::-       (MonadIO m, ToJSString val) => HTMLLinkElement -> val -> m ()-setRev self val = liftIO (js_setRev (self) (toJSString val))- -foreign import javascript unsafe "$1[\"rev\"]" js_getRev ::-        HTMLLinkElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLinkElement.rev Mozilla HTMLLinkElement.rev documentation> -getRev ::-       (MonadIO m, FromJSString result) => HTMLLinkElement -> m result-getRev self = liftIO (fromJSString <$> (js_getRev (self)))- -foreign import javascript unsafe "$1[\"sizes\"] = $2;" js_setSizes-        :: HTMLLinkElement -> Nullable DOMSettableTokenList -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLinkElement.sizes Mozilla HTMLLinkElement.sizes documentation> -setSizes ::-         (MonadIO m) =>-           HTMLLinkElement -> Maybe DOMSettableTokenList -> m ()-setSizes self val-  = liftIO (js_setSizes (self) (maybeToNullable val))- -foreign import javascript unsafe "$1[\"sizes\"]" js_getSizes ::-        HTMLLinkElement -> IO (Nullable DOMSettableTokenList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLinkElement.sizes Mozilla HTMLLinkElement.sizes documentation> -getSizes ::-         (MonadIO m) => HTMLLinkElement -> m (Maybe DOMSettableTokenList)-getSizes self = liftIO (nullableToMaybe <$> (js_getSizes (self)))- -foreign import javascript unsafe "$1[\"target\"] = $2;"-        js_setTarget :: HTMLLinkElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLinkElement.target Mozilla HTMLLinkElement.target documentation> -setTarget ::-          (MonadIO m, ToJSString val) => HTMLLinkElement -> val -> m ()-setTarget self val = liftIO (js_setTarget (self) (toJSString val))- -foreign import javascript unsafe "$1[\"target\"]" js_getTarget ::-        HTMLLinkElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLinkElement.target Mozilla HTMLLinkElement.target documentation> -getTarget ::-          (MonadIO m, FromJSString result) => HTMLLinkElement -> m result-getTarget self = liftIO (fromJSString <$> (js_getTarget (self)))- -foreign import javascript unsafe "$1[\"type\"] = $2;" js_setType ::-        HTMLLinkElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLinkElement.type Mozilla HTMLLinkElement.type documentation> -setType ::-        (MonadIO m, ToJSString val) => HTMLLinkElement -> val -> m ()-setType self val = liftIO (js_setType (self) (toJSString val))- -foreign import javascript unsafe "$1[\"type\"]" js_getType ::-        HTMLLinkElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLinkElement.type Mozilla HTMLLinkElement.type documentation> -getType ::-        (MonadIO m, FromJSString result) => HTMLLinkElement -> m result-getType self = liftIO (fromJSString <$> (js_getType (self)))- -foreign import javascript unsafe "$1[\"sheet\"]" js_getSheet ::-        HTMLLinkElement -> IO (Nullable StyleSheet)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLinkElement.sheet Mozilla HTMLLinkElement.sheet documentation> -getSheet :: (MonadIO m) => HTMLLinkElement -> m (Maybe StyleSheet)-getSheet self = liftIO (nullableToMaybe <$> (js_getSheet (self)))- -foreign import javascript unsafe "$1[\"relList\"]" js_getRelList ::-        HTMLLinkElement -> IO (Nullable DOMTokenList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLLinkElement.relList Mozilla HTMLLinkElement.relList documentation> -getRelList ::-           (MonadIO m) => HTMLLinkElement -> m (Maybe DOMTokenList)-getRelList self-  = liftIO (nullableToMaybe <$> (js_getRelList (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLMapElement.hs

@@ -1,43 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLMapElement-       (js_getAreas, getAreas, js_setName, setName, js_getName, getName,-        HTMLMapElement, castToHTMLMapElement, gTypeHTMLMapElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"areas\"]" js_getAreas ::-        HTMLMapElement -> IO (Nullable HTMLCollection)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMapElement.areas Mozilla HTMLMapElement.areas documentation> -getAreas ::-         (MonadIO m) => HTMLMapElement -> m (Maybe HTMLCollection)-getAreas self = liftIO (nullableToMaybe <$> (js_getAreas (self)))- -foreign import javascript unsafe "$1[\"name\"] = $2;" js_setName ::-        HTMLMapElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMapElement.name Mozilla HTMLMapElement.name documentation> -setName ::-        (MonadIO m, ToJSString val) => HTMLMapElement -> val -> m ()-setName self val = liftIO (js_setName (self) (toJSString val))- -foreign import javascript unsafe "$1[\"name\"]" js_getName ::-        HTMLMapElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMapElement.name Mozilla HTMLMapElement.name documentation> -getName ::-        (MonadIO m, FromJSString result) => HTMLMapElement -> m result-getName self = liftIO (fromJSString <$> (js_getName (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLMarqueeElement.hs

@@ -1,213 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLMarqueeElement-       (js_start, start, js_stop, stop, js_setBehavior, setBehavior,-        js_getBehavior, getBehavior, js_setBgColor, setBgColor,-        js_getBgColor, getBgColor, js_setDirection, setDirection,-        js_getDirection, getDirection, js_setHeight, setHeight,-        js_getHeight, getHeight, js_setHspace, setHspace, js_getHspace,-        getHspace, js_setLoop, setLoop, js_getLoop, getLoop,-        js_setScrollAmount, setScrollAmount, js_getScrollAmount,-        getScrollAmount, js_setScrollDelay, setScrollDelay,-        js_getScrollDelay, getScrollDelay, js_setTrueSpeed, setTrueSpeed,-        js_getTrueSpeed, getTrueSpeed, js_setVspace, setVspace,-        js_getVspace, getVspace, js_setWidth, setWidth, js_getWidth,-        getWidth, HTMLMarqueeElement, castToHTMLMarqueeElement,-        gTypeHTMLMarqueeElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"start\"]()" js_start ::-        HTMLMarqueeElement -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMarqueeElement.start Mozilla HTMLMarqueeElement.start documentation> -start :: (MonadIO m) => HTMLMarqueeElement -> m ()-start self = liftIO (js_start (self))- -foreign import javascript unsafe "$1[\"stop\"]()" js_stop ::-        HTMLMarqueeElement -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMarqueeElement.stop Mozilla HTMLMarqueeElement.stop documentation> -stop :: (MonadIO m) => HTMLMarqueeElement -> m ()-stop self = liftIO (js_stop (self))- -foreign import javascript unsafe "$1[\"behavior\"] = $2;"-        js_setBehavior :: HTMLMarqueeElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMarqueeElement.behavior Mozilla HTMLMarqueeElement.behavior documentation> -setBehavior ::-            (MonadIO m, ToJSString val) => HTMLMarqueeElement -> val -> m ()-setBehavior self val-  = liftIO (js_setBehavior (self) (toJSString val))- -foreign import javascript unsafe "$1[\"behavior\"]" js_getBehavior-        :: HTMLMarqueeElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMarqueeElement.behavior Mozilla HTMLMarqueeElement.behavior documentation> -getBehavior ::-            (MonadIO m, FromJSString result) => HTMLMarqueeElement -> m result-getBehavior self-  = liftIO (fromJSString <$> (js_getBehavior (self)))- -foreign import javascript unsafe "$1[\"bgColor\"] = $2;"-        js_setBgColor :: HTMLMarqueeElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMarqueeElement.bgColor Mozilla HTMLMarqueeElement.bgColor documentation> -setBgColor ::-           (MonadIO m, ToJSString val) => HTMLMarqueeElement -> val -> m ()-setBgColor self val-  = liftIO (js_setBgColor (self) (toJSString val))- -foreign import javascript unsafe "$1[\"bgColor\"]" js_getBgColor ::-        HTMLMarqueeElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMarqueeElement.bgColor Mozilla HTMLMarqueeElement.bgColor documentation> -getBgColor ::-           (MonadIO m, FromJSString result) => HTMLMarqueeElement -> m result-getBgColor self = liftIO (fromJSString <$> (js_getBgColor (self)))- -foreign import javascript unsafe "$1[\"direction\"] = $2;"-        js_setDirection :: HTMLMarqueeElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMarqueeElement.direction Mozilla HTMLMarqueeElement.direction documentation> -setDirection ::-             (MonadIO m, ToJSString val) => HTMLMarqueeElement -> val -> m ()-setDirection self val-  = liftIO (js_setDirection (self) (toJSString val))- -foreign import javascript unsafe "$1[\"direction\"]"-        js_getDirection :: HTMLMarqueeElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMarqueeElement.direction Mozilla HTMLMarqueeElement.direction documentation> -getDirection ::-             (MonadIO m, FromJSString result) => HTMLMarqueeElement -> m result-getDirection self-  = liftIO (fromJSString <$> (js_getDirection (self)))- -foreign import javascript unsafe "$1[\"height\"] = $2;"-        js_setHeight :: HTMLMarqueeElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMarqueeElement.height Mozilla HTMLMarqueeElement.height documentation> -setHeight ::-          (MonadIO m, ToJSString val) => HTMLMarqueeElement -> val -> m ()-setHeight self val = liftIO (js_setHeight (self) (toJSString val))- -foreign import javascript unsafe "$1[\"height\"]" js_getHeight ::-        HTMLMarqueeElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMarqueeElement.height Mozilla HTMLMarqueeElement.height documentation> -getHeight ::-          (MonadIO m, FromJSString result) => HTMLMarqueeElement -> m result-getHeight self = liftIO (fromJSString <$> (js_getHeight (self)))- -foreign import javascript unsafe "$1[\"hspace\"] = $2;"-        js_setHspace :: HTMLMarqueeElement -> Word -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMarqueeElement.hspace Mozilla HTMLMarqueeElement.hspace documentation> -setHspace :: (MonadIO m) => HTMLMarqueeElement -> Word -> m ()-setHspace self val = liftIO (js_setHspace (self) val)- -foreign import javascript unsafe "$1[\"hspace\"]" js_getHspace ::-        HTMLMarqueeElement -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMarqueeElement.hspace Mozilla HTMLMarqueeElement.hspace documentation> -getHspace :: (MonadIO m) => HTMLMarqueeElement -> m Word-getHspace self = liftIO (js_getHspace (self))- -foreign import javascript unsafe "$1[\"loop\"] = $2;" js_setLoop ::-        HTMLMarqueeElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMarqueeElement.loop Mozilla HTMLMarqueeElement.loop documentation> -setLoop :: (MonadIO m) => HTMLMarqueeElement -> Int -> m ()-setLoop self val = liftIO (js_setLoop (self) val)- -foreign import javascript unsafe "$1[\"loop\"]" js_getLoop ::-        HTMLMarqueeElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMarqueeElement.loop Mozilla HTMLMarqueeElement.loop documentation> -getLoop :: (MonadIO m) => HTMLMarqueeElement -> m Int-getLoop self = liftIO (js_getLoop (self))- -foreign import javascript unsafe "$1[\"scrollAmount\"] = $2;"-        js_setScrollAmount :: HTMLMarqueeElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMarqueeElement.scrollAmount Mozilla HTMLMarqueeElement.scrollAmount documentation> -setScrollAmount :: (MonadIO m) => HTMLMarqueeElement -> Int -> m ()-setScrollAmount self val = liftIO (js_setScrollAmount (self) val)- -foreign import javascript unsafe "$1[\"scrollAmount\"]"-        js_getScrollAmount :: HTMLMarqueeElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMarqueeElement.scrollAmount Mozilla HTMLMarqueeElement.scrollAmount documentation> -getScrollAmount :: (MonadIO m) => HTMLMarqueeElement -> m Int-getScrollAmount self = liftIO (js_getScrollAmount (self))- -foreign import javascript unsafe "$1[\"scrollDelay\"] = $2;"-        js_setScrollDelay :: HTMLMarqueeElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMarqueeElement.scrollDelay Mozilla HTMLMarqueeElement.scrollDelay documentation> -setScrollDelay :: (MonadIO m) => HTMLMarqueeElement -> Int -> m ()-setScrollDelay self val = liftIO (js_setScrollDelay (self) val)- -foreign import javascript unsafe "$1[\"scrollDelay\"]"-        js_getScrollDelay :: HTMLMarqueeElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMarqueeElement.scrollDelay Mozilla HTMLMarqueeElement.scrollDelay documentation> -getScrollDelay :: (MonadIO m) => HTMLMarqueeElement -> m Int-getScrollDelay self = liftIO (js_getScrollDelay (self))- -foreign import javascript unsafe "$1[\"trueSpeed\"] = $2;"-        js_setTrueSpeed :: HTMLMarqueeElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMarqueeElement.trueSpeed Mozilla HTMLMarqueeElement.trueSpeed documentation> -setTrueSpeed :: (MonadIO m) => HTMLMarqueeElement -> Bool -> m ()-setTrueSpeed self val = liftIO (js_setTrueSpeed (self) val)- -foreign import javascript unsafe "($1[\"trueSpeed\"] ? 1 : 0)"-        js_getTrueSpeed :: HTMLMarqueeElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMarqueeElement.trueSpeed Mozilla HTMLMarqueeElement.trueSpeed documentation> -getTrueSpeed :: (MonadIO m) => HTMLMarqueeElement -> m Bool-getTrueSpeed self = liftIO (js_getTrueSpeed (self))- -foreign import javascript unsafe "$1[\"vspace\"] = $2;"-        js_setVspace :: HTMLMarqueeElement -> Word -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMarqueeElement.vspace Mozilla HTMLMarqueeElement.vspace documentation> -setVspace :: (MonadIO m) => HTMLMarqueeElement -> Word -> m ()-setVspace self val = liftIO (js_setVspace (self) val)- -foreign import javascript unsafe "$1[\"vspace\"]" js_getVspace ::-        HTMLMarqueeElement -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMarqueeElement.vspace Mozilla HTMLMarqueeElement.vspace documentation> -getVspace :: (MonadIO m) => HTMLMarqueeElement -> m Word-getVspace self = liftIO (js_getVspace (self))- -foreign import javascript unsafe "$1[\"width\"] = $2;" js_setWidth-        :: HTMLMarqueeElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMarqueeElement.width Mozilla HTMLMarqueeElement.width documentation> -setWidth ::-         (MonadIO m, ToJSString val) => HTMLMarqueeElement -> val -> m ()-setWidth self val = liftIO (js_setWidth (self) (toJSString val))- -foreign import javascript unsafe "$1[\"width\"]" js_getWidth ::-        HTMLMarqueeElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMarqueeElement.width Mozilla HTMLMarqueeElement.width documentation> -getWidth ::-         (MonadIO m, FromJSString result) => HTMLMarqueeElement -> m result-getWidth self = liftIO (fromJSString <$> (js_getWidth (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLMediaElement.hs

@@ -1,858 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLMediaElement-       (js_load, load, js_canPlayType, canPlayType, js_play, play,-        js_pause, pause, js_fastSeek, fastSeek,-        js_webkitGenerateKeyRequest, webkitGenerateKeyRequest,-        js_webkitAddKey, webkitAddKey, js_webkitCancelKeyRequest,-        webkitCancelKeyRequest, js_webkitSetMediaKeys, webkitSetMediaKeys,-        js_addTextTrack, addTextTrack, js_getVideoPlaybackQuality,-        getVideoPlaybackQuality, js_webkitShowPlaybackTargetPicker,-        webkitShowPlaybackTargetPicker, pattern NETWORK_EMPTY,-        pattern NETWORK_IDLE, pattern NETWORK_LOADING,-        pattern NETWORK_NO_SOURCE, pattern HAVE_NOTHING,-        pattern HAVE_METADATA, pattern HAVE_CURRENT_DATA,-        pattern HAVE_FUTURE_DATA, pattern HAVE_ENOUGH_DATA, js_getError,-        getError, js_setSrc, setSrc, js_getSrc, getSrc, js_getCurrentSrc,-        getCurrentSrc, js_getNetworkState, getNetworkState, js_setPreload,-        setPreload, js_getPreload, getPreload, js_getBuffered, getBuffered,-        js_getReadyState, getReadyState, js_getSeeking, getSeeking,-        js_setCurrentTime, setCurrentTime, js_getCurrentTime,-        getCurrentTime, js_getDuration, getDuration, js_getPaused,-        getPaused, js_setDefaultPlaybackRate, setDefaultPlaybackRate,-        js_getDefaultPlaybackRate, getDefaultPlaybackRate,-        js_setPlaybackRate, setPlaybackRate, js_getPlaybackRate,-        getPlaybackRate, js_getPlayed, getPlayed, js_getSeekable,-        getSeekable, js_getEnded, getEnded, js_setAutoplay, setAutoplay,-        js_getAutoplay, getAutoplay, js_setLoop, setLoop, js_getLoop,-        getLoop, js_setControls, setControls, js_getControls, getControls,-        js_setVolume, setVolume, js_getVolume, getVolume, js_setMuted,-        setMuted, js_getMuted, getMuted, js_setDefaultMuted,-        setDefaultMuted, js_getDefaultMuted, getDefaultMuted, emptied,-        loadedMetadata, loadedData, canPlay, canPlayThrough, playing,-        ended, waiting, durationChange, timeUpdate, playEvent, pauseEvent,-        rateChange, volumeChange, js_setWebkitPreservesPitch,-        setWebkitPreservesPitch, js_getWebkitPreservesPitch,-        getWebkitPreservesPitch, js_getWebkitHasClosedCaptions,-        getWebkitHasClosedCaptions, js_setWebkitClosedCaptionsVisible,-        setWebkitClosedCaptionsVisible, js_getWebkitClosedCaptionsVisible,-        getWebkitClosedCaptionsVisible, js_getWebkitAudioDecodedByteCount,-        getWebkitAudioDecodedByteCount, js_getWebkitVideoDecodedByteCount,-        getWebkitVideoDecodedByteCount, webKitKeyAdded, webKitKeyError,-        webKitKeyMessage, webKitNeedKey, js_getWebkitKeys, getWebkitKeys,-        js_getAudioTracks, getAudioTracks, js_getTextTracks, getTextTracks,-        js_getVideoTracks, getVideoTracks, js_setMediaGroup, setMediaGroup,-        js_getMediaGroup, getMediaGroup, js_setController, setController,-        js_getController, getController,-        js_getWebkitCurrentPlaybackTargetIsWireless,-        getWebkitCurrentPlaybackTargetIsWireless,-        webKitCurrentPlaybackTargetIsWirelessChanged,-        webKitPlaybackTargetAvailabilityChanged, js_setSrcObject,-        setSrcObject, js_getSrcObject, getSrcObject, HTMLMediaElement,-        castToHTMLMediaElement, gTypeHTMLMediaElement, IsHTMLMediaElement,-        toHTMLMediaElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"load\"]()" js_load ::-        HTMLMediaElement -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.load Mozilla HTMLMediaElement.load documentation> -load :: (MonadIO m, IsHTMLMediaElement self) => self -> m ()-load self = liftIO (js_load (toHTMLMediaElement self))- -foreign import javascript unsafe "$1[\"canPlayType\"]($2, $3)"-        js_canPlayType ::-        HTMLMediaElement -> JSString -> Nullable JSString -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.canPlayType Mozilla HTMLMediaElement.canPlayType documentation> -canPlayType ::-            (MonadIO m, IsHTMLMediaElement self, ToJSString type',-             ToJSString keySystem, FromJSString result) =>-              self -> type' -> Maybe keySystem -> m result-canPlayType self type' keySystem-  = liftIO-      (fromJSString <$>-         (js_canPlayType (toHTMLMediaElement self) (toJSString type')-            (toMaybeJSString keySystem)))- -foreign import javascript unsafe "$1[\"play\"]()" js_play ::-        HTMLMediaElement -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.play Mozilla HTMLMediaElement.play documentation> -play :: (MonadIO m, IsHTMLMediaElement self) => self -> m ()-play self = liftIO (js_play (toHTMLMediaElement self))- -foreign import javascript unsafe "$1[\"pause\"]()" js_pause ::-        HTMLMediaElement -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.pause Mozilla HTMLMediaElement.pause documentation> -pause :: (MonadIO m, IsHTMLMediaElement self) => self -> m ()-pause self = liftIO (js_pause (toHTMLMediaElement self))- -foreign import javascript unsafe "$1[\"fastSeek\"]($2)" js_fastSeek-        :: HTMLMediaElement -> Double -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.fastSeek Mozilla HTMLMediaElement.fastSeek documentation> -fastSeek ::-         (MonadIO m, IsHTMLMediaElement self) => self -> Double -> m ()-fastSeek self time-  = liftIO (js_fastSeek (toHTMLMediaElement self) time)- -foreign import javascript unsafe-        "$1[\"webkitGenerateKeyRequest\"]($2,\n$3)"-        js_webkitGenerateKeyRequest ::-        HTMLMediaElement ->-          Nullable JSString -> Nullable Uint8Array -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.webkitGenerateKeyRequest Mozilla HTMLMediaElement.webkitGenerateKeyRequest documentation> -webkitGenerateKeyRequest ::-                         (MonadIO m, IsHTMLMediaElement self, ToJSString keySystem,-                          IsUint8Array initData) =>-                           self -> Maybe keySystem -> Maybe initData -> m ()-webkitGenerateKeyRequest self keySystem initData-  = liftIO-      (js_webkitGenerateKeyRequest (toHTMLMediaElement self)-         (toMaybeJSString keySystem)-         (maybeToNullable (fmap toUint8Array initData)))- -foreign import javascript unsafe-        "$1[\"webkitAddKey\"]($2, $3, $4,\n$5)" js_webkitAddKey ::-        HTMLMediaElement ->-          Nullable JSString ->-            Nullable Uint8Array -> Nullable Uint8Array -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.webkitAddKey Mozilla HTMLMediaElement.webkitAddKey documentation> -webkitAddKey ::-             (MonadIO m, IsHTMLMediaElement self, ToJSString keySystem,-              IsUint8Array key, IsUint8Array initData, ToJSString sessionId) =>-               self ->-                 Maybe keySystem -> Maybe key -> Maybe initData -> sessionId -> m ()-webkitAddKey self keySystem key initData sessionId-  = liftIO-      (js_webkitAddKey (toHTMLMediaElement self)-         (toMaybeJSString keySystem)-         (maybeToNullable (fmap toUint8Array key))-         (maybeToNullable (fmap toUint8Array initData))-         (toJSString sessionId))- -foreign import javascript unsafe-        "$1[\"webkitCancelKeyRequest\"]($2,\n$3)" js_webkitCancelKeyRequest-        :: HTMLMediaElement -> Nullable JSString -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.webkitCancelKeyRequest Mozilla HTMLMediaElement.webkitCancelKeyRequest documentation> -webkitCancelKeyRequest ::-                       (MonadIO m, IsHTMLMediaElement self, ToJSString keySystem,-                        ToJSString sessionId) =>-                         self -> Maybe keySystem -> sessionId -> m ()-webkitCancelKeyRequest self keySystem sessionId-  = liftIO-      (js_webkitCancelKeyRequest (toHTMLMediaElement self)-         (toMaybeJSString keySystem)-         (toJSString sessionId))- -foreign import javascript unsafe "$1[\"webkitSetMediaKeys\"]($2)"-        js_webkitSetMediaKeys ::-        HTMLMediaElement -> Nullable MediaKeys -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.webkitSetMediaKeys Mozilla HTMLMediaElement.webkitSetMediaKeys documentation> -webkitSetMediaKeys ::-                   (MonadIO m, IsHTMLMediaElement self) =>-                     self -> Maybe MediaKeys -> m ()-webkitSetMediaKeys self mediaKeys-  = liftIO-      (js_webkitSetMediaKeys (toHTMLMediaElement self)-         (maybeToNullable mediaKeys))- -foreign import javascript unsafe "$1[\"addTextTrack\"]($2, $3, $4)"-        js_addTextTrack ::-        HTMLMediaElement ->-          JSString -> JSString -> JSString -> IO (Nullable TextTrack)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.addTextTrack Mozilla HTMLMediaElement.addTextTrack documentation> -addTextTrack ::-             (MonadIO m, IsHTMLMediaElement self, ToJSString kind,-              ToJSString label, ToJSString language) =>-               self -> kind -> label -> language -> m (Maybe TextTrack)-addTextTrack self kind label language-  = liftIO-      (nullableToMaybe <$>-         (js_addTextTrack (toHTMLMediaElement self) (toJSString kind)-            (toJSString label)-            (toJSString language)))- -foreign import javascript unsafe-        "$1[\"getVideoPlaybackQuality\"]()" js_getVideoPlaybackQuality ::-        HTMLMediaElement -> IO (Nullable VideoPlaybackQuality)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.getVideoPlaybackQuality Mozilla HTMLMediaElement.getVideoPlaybackQuality documentation> -getVideoPlaybackQuality ::-                        (MonadIO m, IsHTMLMediaElement self) =>-                          self -> m (Maybe VideoPlaybackQuality)-getVideoPlaybackQuality self-  = liftIO-      (nullableToMaybe <$>-         (js_getVideoPlaybackQuality (toHTMLMediaElement self)))- -foreign import javascript unsafe-        "$1[\"webkitShowPlaybackTargetPicker\"]()"-        js_webkitShowPlaybackTargetPicker :: HTMLMediaElement -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.webkitShowPlaybackTargetPicker Mozilla HTMLMediaElement.webkitShowPlaybackTargetPicker documentation> -webkitShowPlaybackTargetPicker ::-                               (MonadIO m, IsHTMLMediaElement self) => self -> m ()-webkitShowPlaybackTargetPicker self-  = liftIO-      (js_webkitShowPlaybackTargetPicker (toHTMLMediaElement self))-pattern NETWORK_EMPTY = 0-pattern NETWORK_IDLE = 1-pattern NETWORK_LOADING = 2-pattern NETWORK_NO_SOURCE = 3-pattern HAVE_NOTHING = 0-pattern HAVE_METADATA = 1-pattern HAVE_CURRENT_DATA = 2-pattern HAVE_FUTURE_DATA = 3-pattern HAVE_ENOUGH_DATA = 4- -foreign import javascript unsafe "$1[\"error\"]" js_getError ::-        HTMLMediaElement -> IO (Nullable MediaError)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.error Mozilla HTMLMediaElement.error documentation> -getError ::-         (MonadIO m, IsHTMLMediaElement self) =>-           self -> m (Maybe MediaError)-getError self-  = liftIO-      (nullableToMaybe <$> (js_getError (toHTMLMediaElement self)))- -foreign import javascript unsafe "$1[\"src\"] = $2;" js_setSrc ::-        HTMLMediaElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.src Mozilla HTMLMediaElement.src documentation> -setSrc ::-       (MonadIO m, IsHTMLMediaElement self, ToJSString val) =>-         self -> val -> m ()-setSrc self val-  = liftIO (js_setSrc (toHTMLMediaElement self) (toJSString val))- -foreign import javascript unsafe "$1[\"src\"]" js_getSrc ::-        HTMLMediaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.src Mozilla HTMLMediaElement.src documentation> -getSrc ::-       (MonadIO m, IsHTMLMediaElement self, FromJSString result) =>-         self -> m result-getSrc self-  = liftIO (fromJSString <$> (js_getSrc (toHTMLMediaElement self)))- -foreign import javascript unsafe "$1[\"currentSrc\"]"-        js_getCurrentSrc :: HTMLMediaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.currentSrc Mozilla HTMLMediaElement.currentSrc documentation> -getCurrentSrc ::-              (MonadIO m, IsHTMLMediaElement self, FromJSString result) =>-                self -> m result-getCurrentSrc self-  = liftIO-      (fromJSString <$> (js_getCurrentSrc (toHTMLMediaElement self)))- -foreign import javascript unsafe "$1[\"networkState\"]"-        js_getNetworkState :: HTMLMediaElement -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.networkState Mozilla HTMLMediaElement.networkState documentation> -getNetworkState ::-                (MonadIO m, IsHTMLMediaElement self) => self -> m Word-getNetworkState self-  = liftIO (js_getNetworkState (toHTMLMediaElement self))- -foreign import javascript unsafe "$1[\"preload\"] = $2;"-        js_setPreload :: HTMLMediaElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.preload Mozilla HTMLMediaElement.preload documentation> -setPreload ::-           (MonadIO m, IsHTMLMediaElement self, ToJSString val) =>-             self -> val -> m ()-setPreload self val-  = liftIO (js_setPreload (toHTMLMediaElement self) (toJSString val))- -foreign import javascript unsafe "$1[\"preload\"]" js_getPreload ::-        HTMLMediaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.preload Mozilla HTMLMediaElement.preload documentation> -getPreload ::-           (MonadIO m, IsHTMLMediaElement self, FromJSString result) =>-             self -> m result-getPreload self-  = liftIO-      (fromJSString <$> (js_getPreload (toHTMLMediaElement self)))- -foreign import javascript unsafe "$1[\"buffered\"]" js_getBuffered-        :: HTMLMediaElement -> IO (Nullable TimeRanges)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.buffered Mozilla HTMLMediaElement.buffered documentation> -getBuffered ::-            (MonadIO m, IsHTMLMediaElement self) =>-              self -> m (Maybe TimeRanges)-getBuffered self-  = liftIO-      (nullableToMaybe <$> (js_getBuffered (toHTMLMediaElement self)))- -foreign import javascript unsafe "$1[\"readyState\"]"-        js_getReadyState :: HTMLMediaElement -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.readyState Mozilla HTMLMediaElement.readyState documentation> -getReadyState ::-              (MonadIO m, IsHTMLMediaElement self) => self -> m Word-getReadyState self-  = liftIO (js_getReadyState (toHTMLMediaElement self))- -foreign import javascript unsafe "($1[\"seeking\"] ? 1 : 0)"-        js_getSeeking :: HTMLMediaElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.seeking Mozilla HTMLMediaElement.seeking documentation> -getSeeking ::-           (MonadIO m, IsHTMLMediaElement self) => self -> m Bool-getSeeking self = liftIO (js_getSeeking (toHTMLMediaElement self))- -foreign import javascript unsafe "$1[\"currentTime\"] = $2;"-        js_setCurrentTime :: HTMLMediaElement -> Double -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.currentTime Mozilla HTMLMediaElement.currentTime documentation> -setCurrentTime ::-               (MonadIO m, IsHTMLMediaElement self) => self -> Double -> m ()-setCurrentTime self val-  = liftIO (js_setCurrentTime (toHTMLMediaElement self) val)- -foreign import javascript unsafe "$1[\"currentTime\"]"-        js_getCurrentTime :: HTMLMediaElement -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.currentTime Mozilla HTMLMediaElement.currentTime documentation> -getCurrentTime ::-               (MonadIO m, IsHTMLMediaElement self) => self -> m Double-getCurrentTime self-  = liftIO (js_getCurrentTime (toHTMLMediaElement self))- -foreign import javascript unsafe "$1[\"duration\"]" js_getDuration-        :: HTMLMediaElement -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.duration Mozilla HTMLMediaElement.duration documentation> -getDuration ::-            (MonadIO m, IsHTMLMediaElement self) => self -> m Double-getDuration self-  = liftIO (js_getDuration (toHTMLMediaElement self))- -foreign import javascript unsafe "($1[\"paused\"] ? 1 : 0)"-        js_getPaused :: HTMLMediaElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.paused Mozilla HTMLMediaElement.paused documentation> -getPaused :: (MonadIO m, IsHTMLMediaElement self) => self -> m Bool-getPaused self = liftIO (js_getPaused (toHTMLMediaElement self))- -foreign import javascript unsafe-        "$1[\"defaultPlaybackRate\"] = $2;" js_setDefaultPlaybackRate ::-        HTMLMediaElement -> Double -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.defaultPlaybackRate Mozilla HTMLMediaElement.defaultPlaybackRate documentation> -setDefaultPlaybackRate ::-                       (MonadIO m, IsHTMLMediaElement self) => self -> Double -> m ()-setDefaultPlaybackRate self val-  = liftIO (js_setDefaultPlaybackRate (toHTMLMediaElement self) val)- -foreign import javascript unsafe "$1[\"defaultPlaybackRate\"]"-        js_getDefaultPlaybackRate :: HTMLMediaElement -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.defaultPlaybackRate Mozilla HTMLMediaElement.defaultPlaybackRate documentation> -getDefaultPlaybackRate ::-                       (MonadIO m, IsHTMLMediaElement self) => self -> m Double-getDefaultPlaybackRate self-  = liftIO (js_getDefaultPlaybackRate (toHTMLMediaElement self))- -foreign import javascript unsafe "$1[\"playbackRate\"] = $2;"-        js_setPlaybackRate :: HTMLMediaElement -> Double -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.playbackRate Mozilla HTMLMediaElement.playbackRate documentation> -setPlaybackRate ::-                (MonadIO m, IsHTMLMediaElement self) => self -> Double -> m ()-setPlaybackRate self val-  = liftIO (js_setPlaybackRate (toHTMLMediaElement self) val)- -foreign import javascript unsafe "$1[\"playbackRate\"]"-        js_getPlaybackRate :: HTMLMediaElement -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.playbackRate Mozilla HTMLMediaElement.playbackRate documentation> -getPlaybackRate ::-                (MonadIO m, IsHTMLMediaElement self) => self -> m Double-getPlaybackRate self-  = liftIO (js_getPlaybackRate (toHTMLMediaElement self))- -foreign import javascript unsafe "$1[\"played\"]" js_getPlayed ::-        HTMLMediaElement -> IO (Nullable TimeRanges)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.played Mozilla HTMLMediaElement.played documentation> -getPlayed ::-          (MonadIO m, IsHTMLMediaElement self) =>-            self -> m (Maybe TimeRanges)-getPlayed self-  = liftIO-      (nullableToMaybe <$> (js_getPlayed (toHTMLMediaElement self)))- -foreign import javascript unsafe "$1[\"seekable\"]" js_getSeekable-        :: HTMLMediaElement -> IO (Nullable TimeRanges)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.seekable Mozilla HTMLMediaElement.seekable documentation> -getSeekable ::-            (MonadIO m, IsHTMLMediaElement self) =>-              self -> m (Maybe TimeRanges)-getSeekable self-  = liftIO-      (nullableToMaybe <$> (js_getSeekable (toHTMLMediaElement self)))- -foreign import javascript unsafe "($1[\"ended\"] ? 1 : 0)"-        js_getEnded :: HTMLMediaElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.ended Mozilla HTMLMediaElement.ended documentation> -getEnded :: (MonadIO m, IsHTMLMediaElement self) => self -> m Bool-getEnded self = liftIO (js_getEnded (toHTMLMediaElement self))- -foreign import javascript unsafe "$1[\"autoplay\"] = $2;"-        js_setAutoplay :: HTMLMediaElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.autoplay Mozilla HTMLMediaElement.autoplay documentation> -setAutoplay ::-            (MonadIO m, IsHTMLMediaElement self) => self -> Bool -> m ()-setAutoplay self val-  = liftIO (js_setAutoplay (toHTMLMediaElement self) val)- -foreign import javascript unsafe "($1[\"autoplay\"] ? 1 : 0)"-        js_getAutoplay :: HTMLMediaElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.autoplay Mozilla HTMLMediaElement.autoplay documentation> -getAutoplay ::-            (MonadIO m, IsHTMLMediaElement self) => self -> m Bool-getAutoplay self-  = liftIO (js_getAutoplay (toHTMLMediaElement self))- -foreign import javascript unsafe "$1[\"loop\"] = $2;" js_setLoop ::-        HTMLMediaElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.loop Mozilla HTMLMediaElement.loop documentation> -setLoop ::-        (MonadIO m, IsHTMLMediaElement self) => self -> Bool -> m ()-setLoop self val-  = liftIO (js_setLoop (toHTMLMediaElement self) val)- -foreign import javascript unsafe "($1[\"loop\"] ? 1 : 0)"-        js_getLoop :: HTMLMediaElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.loop Mozilla HTMLMediaElement.loop documentation> -getLoop :: (MonadIO m, IsHTMLMediaElement self) => self -> m Bool-getLoop self = liftIO (js_getLoop (toHTMLMediaElement self))- -foreign import javascript unsafe "$1[\"controls\"] = $2;"-        js_setControls :: HTMLMediaElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.controls Mozilla HTMLMediaElement.controls documentation> -setControls ::-            (MonadIO m, IsHTMLMediaElement self) => self -> Bool -> m ()-setControls self val-  = liftIO (js_setControls (toHTMLMediaElement self) val)- -foreign import javascript unsafe "($1[\"controls\"] ? 1 : 0)"-        js_getControls :: HTMLMediaElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.controls Mozilla HTMLMediaElement.controls documentation> -getControls ::-            (MonadIO m, IsHTMLMediaElement self) => self -> m Bool-getControls self-  = liftIO (js_getControls (toHTMLMediaElement self))- -foreign import javascript unsafe "$1[\"volume\"] = $2;"-        js_setVolume :: HTMLMediaElement -> Double -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.volume Mozilla HTMLMediaElement.volume documentation> -setVolume ::-          (MonadIO m, IsHTMLMediaElement self) => self -> Double -> m ()-setVolume self val-  = liftIO (js_setVolume (toHTMLMediaElement self) val)- -foreign import javascript unsafe "$1[\"volume\"]" js_getVolume ::-        HTMLMediaElement -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.volume Mozilla HTMLMediaElement.volume documentation> -getVolume ::-          (MonadIO m, IsHTMLMediaElement self) => self -> m Double-getVolume self = liftIO (js_getVolume (toHTMLMediaElement self))- -foreign import javascript unsafe "$1[\"muted\"] = $2;" js_setMuted-        :: HTMLMediaElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.muted Mozilla HTMLMediaElement.muted documentation> -setMuted ::-         (MonadIO m, IsHTMLMediaElement self) => self -> Bool -> m ()-setMuted self val-  = liftIO (js_setMuted (toHTMLMediaElement self) val)- -foreign import javascript unsafe "($1[\"muted\"] ? 1 : 0)"-        js_getMuted :: HTMLMediaElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.muted Mozilla HTMLMediaElement.muted documentation> -getMuted :: (MonadIO m, IsHTMLMediaElement self) => self -> m Bool-getMuted self = liftIO (js_getMuted (toHTMLMediaElement self))- -foreign import javascript unsafe "$1[\"defaultMuted\"] = $2;"-        js_setDefaultMuted :: HTMLMediaElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.defaultMuted Mozilla HTMLMediaElement.defaultMuted documentation> -setDefaultMuted ::-                (MonadIO m, IsHTMLMediaElement self) => self -> Bool -> m ()-setDefaultMuted self val-  = liftIO (js_setDefaultMuted (toHTMLMediaElement self) val)- -foreign import javascript unsafe "($1[\"defaultMuted\"] ? 1 : 0)"-        js_getDefaultMuted :: HTMLMediaElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.defaultMuted Mozilla HTMLMediaElement.defaultMuted documentation> -getDefaultMuted ::-                (MonadIO m, IsHTMLMediaElement self) => self -> m Bool-getDefaultMuted self-  = liftIO (js_getDefaultMuted (toHTMLMediaElement self))---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.onemptied Mozilla HTMLMediaElement.onemptied documentation> -emptied ::-        (IsHTMLMediaElement self, IsEventTarget self) =>-          EventName self Event-emptied = unsafeEventName (toJSString "emptied")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.onloadedmetadata Mozilla HTMLMediaElement.onloadedmetadata documentation> -loadedMetadata ::-               (IsHTMLMediaElement self, IsEventTarget self) =>-                 EventName self Event-loadedMetadata = unsafeEventName (toJSString "loadedmetadata")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.onloadeddata Mozilla HTMLMediaElement.onloadeddata documentation> -loadedData ::-           (IsHTMLMediaElement self, IsEventTarget self) =>-             EventName self Event-loadedData = unsafeEventName (toJSString "loadeddata")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.oncanplay Mozilla HTMLMediaElement.oncanplay documentation> -canPlay ::-        (IsHTMLMediaElement self, IsEventTarget self) =>-          EventName self Event-canPlay = unsafeEventName (toJSString "canplay")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.oncanplaythrough Mozilla HTMLMediaElement.oncanplaythrough documentation> -canPlayThrough ::-               (IsHTMLMediaElement self, IsEventTarget self) =>-                 EventName self Event-canPlayThrough = unsafeEventName (toJSString "canplaythrough")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.onplaying Mozilla HTMLMediaElement.onplaying documentation> -playing ::-        (IsHTMLMediaElement self, IsEventTarget self) =>-          EventName self Event-playing = unsafeEventName (toJSString "playing")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.onended Mozilla HTMLMediaElement.onended documentation> -ended ::-      (IsHTMLMediaElement self, IsEventTarget self) =>-        EventName self Event-ended = unsafeEventName (toJSString "ended")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.onwaiting Mozilla HTMLMediaElement.onwaiting documentation> -waiting ::-        (IsHTMLMediaElement self, IsEventTarget self) =>-          EventName self Event-waiting = unsafeEventName (toJSString "waiting")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.ondurationchange Mozilla HTMLMediaElement.ondurationchange documentation> -durationChange ::-               (IsHTMLMediaElement self, IsEventTarget self) =>-                 EventName self Event-durationChange = unsafeEventName (toJSString "durationchange")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.ontimeupdate Mozilla HTMLMediaElement.ontimeupdate documentation> -timeUpdate ::-           (IsHTMLMediaElement self, IsEventTarget self) =>-             EventName self Event-timeUpdate = unsafeEventName (toJSString "timeupdate")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.onplay Mozilla HTMLMediaElement.onplay documentation> -playEvent ::-          (IsHTMLMediaElement self, IsEventTarget self) =>-            EventName self Event-playEvent = unsafeEventName (toJSString "play")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.onpause Mozilla HTMLMediaElement.onpause documentation> -pauseEvent ::-           (IsHTMLMediaElement self, IsEventTarget self) =>-             EventName self Event-pauseEvent = unsafeEventName (toJSString "pause")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.onratechange Mozilla HTMLMediaElement.onratechange documentation> -rateChange ::-           (IsHTMLMediaElement self, IsEventTarget self) =>-             EventName self Event-rateChange = unsafeEventName (toJSString "ratechange")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.onvolumechange Mozilla HTMLMediaElement.onvolumechange documentation> -volumeChange ::-             (IsHTMLMediaElement self, IsEventTarget self) =>-               EventName self Event-volumeChange = unsafeEventName (toJSString "volumechange")- -foreign import javascript unsafe-        "$1[\"webkitPreservesPitch\"] = $2;" js_setWebkitPreservesPitch ::-        HTMLMediaElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.webkitPreservesPitch Mozilla HTMLMediaElement.webkitPreservesPitch documentation> -setWebkitPreservesPitch ::-                        (MonadIO m, IsHTMLMediaElement self) => self -> Bool -> m ()-setWebkitPreservesPitch self val-  = liftIO (js_setWebkitPreservesPitch (toHTMLMediaElement self) val)- -foreign import javascript unsafe-        "($1[\"webkitPreservesPitch\"] ? 1 : 0)" js_getWebkitPreservesPitch-        :: HTMLMediaElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.webkitPreservesPitch Mozilla HTMLMediaElement.webkitPreservesPitch documentation> -getWebkitPreservesPitch ::-                        (MonadIO m, IsHTMLMediaElement self) => self -> m Bool-getWebkitPreservesPitch self-  = liftIO (js_getWebkitPreservesPitch (toHTMLMediaElement self))- -foreign import javascript unsafe-        "($1[\"webkitHasClosedCaptions\"] ? 1 : 0)"-        js_getWebkitHasClosedCaptions :: HTMLMediaElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.webkitHasClosedCaptions Mozilla HTMLMediaElement.webkitHasClosedCaptions documentation> -getWebkitHasClosedCaptions ::-                           (MonadIO m, IsHTMLMediaElement self) => self -> m Bool-getWebkitHasClosedCaptions self-  = liftIO (js_getWebkitHasClosedCaptions (toHTMLMediaElement self))- -foreign import javascript unsafe-        "$1[\"webkitClosedCaptionsVisible\"] = $2;"-        js_setWebkitClosedCaptionsVisible ::-        HTMLMediaElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.webkitClosedCaptionsVisible Mozilla HTMLMediaElement.webkitClosedCaptionsVisible documentation> -setWebkitClosedCaptionsVisible ::-                               (MonadIO m, IsHTMLMediaElement self) => self -> Bool -> m ()-setWebkitClosedCaptionsVisible self val-  = liftIO-      (js_setWebkitClosedCaptionsVisible (toHTMLMediaElement self) val)- -foreign import javascript unsafe-        "($1[\"webkitClosedCaptionsVisible\"] ? 1 : 0)"-        js_getWebkitClosedCaptionsVisible :: HTMLMediaElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.webkitClosedCaptionsVisible Mozilla HTMLMediaElement.webkitClosedCaptionsVisible documentation> -getWebkitClosedCaptionsVisible ::-                               (MonadIO m, IsHTMLMediaElement self) => self -> m Bool-getWebkitClosedCaptionsVisible self-  = liftIO-      (js_getWebkitClosedCaptionsVisible (toHTMLMediaElement self))- -foreign import javascript unsafe-        "$1[\"webkitAudioDecodedByteCount\"]"-        js_getWebkitAudioDecodedByteCount :: HTMLMediaElement -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.webkitAudioDecodedByteCount Mozilla HTMLMediaElement.webkitAudioDecodedByteCount documentation> -getWebkitAudioDecodedByteCount ::-                               (MonadIO m, IsHTMLMediaElement self) => self -> m Word-getWebkitAudioDecodedByteCount self-  = liftIO-      (js_getWebkitAudioDecodedByteCount (toHTMLMediaElement self))- -foreign import javascript unsafe-        "$1[\"webkitVideoDecodedByteCount\"]"-        js_getWebkitVideoDecodedByteCount :: HTMLMediaElement -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.webkitVideoDecodedByteCount Mozilla HTMLMediaElement.webkitVideoDecodedByteCount documentation> -getWebkitVideoDecodedByteCount ::-                               (MonadIO m, IsHTMLMediaElement self) => self -> m Word-getWebkitVideoDecodedByteCount self-  = liftIO-      (js_getWebkitVideoDecodedByteCount (toHTMLMediaElement self))---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.onwebkitkeyadded Mozilla HTMLMediaElement.onwebkitkeyadded documentation> -webKitKeyAdded ::-               (IsHTMLMediaElement self, IsEventTarget self) =>-                 EventName self Event-webKitKeyAdded = unsafeEventName (toJSString "webkitkeyadded")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.onwebkitkeyerror Mozilla HTMLMediaElement.onwebkitkeyerror documentation> -webKitKeyError ::-               (IsHTMLMediaElement self, IsEventTarget self) =>-                 EventName self Event-webKitKeyError = unsafeEventName (toJSString "webkitkeyerror")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.onwebkitkeymessage Mozilla HTMLMediaElement.onwebkitkeymessage documentation> -webKitKeyMessage ::-                 (IsHTMLMediaElement self, IsEventTarget self) =>-                   EventName self Event-webKitKeyMessage = unsafeEventName (toJSString "webkitkeymessage")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.onwebkitneedkey Mozilla HTMLMediaElement.onwebkitneedkey documentation> -webKitNeedKey ::-              (IsHTMLMediaElement self, IsEventTarget self) =>-                EventName self Event-webKitNeedKey = unsafeEventName (toJSString "webkitneedkey")- -foreign import javascript unsafe "$1[\"webkitKeys\"]"-        js_getWebkitKeys :: HTMLMediaElement -> IO (Nullable MediaKeys)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.webkitKeys Mozilla HTMLMediaElement.webkitKeys documentation> -getWebkitKeys ::-              (MonadIO m, IsHTMLMediaElement self) => self -> m (Maybe MediaKeys)-getWebkitKeys self-  = liftIO-      (nullableToMaybe <$> (js_getWebkitKeys (toHTMLMediaElement self)))- -foreign import javascript unsafe "$1[\"audioTracks\"]"-        js_getAudioTracks ::-        HTMLMediaElement -> IO (Nullable AudioTrackList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.audioTracks Mozilla HTMLMediaElement.audioTracks documentation> -getAudioTracks ::-               (MonadIO m, IsHTMLMediaElement self) =>-                 self -> m (Maybe AudioTrackList)-getAudioTracks self-  = liftIO-      (nullableToMaybe <$> (js_getAudioTracks (toHTMLMediaElement self)))- -foreign import javascript unsafe "$1[\"textTracks\"]"-        js_getTextTracks :: HTMLMediaElement -> IO (Nullable TextTrackList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.textTracks Mozilla HTMLMediaElement.textTracks documentation> -getTextTracks ::-              (MonadIO m, IsHTMLMediaElement self) =>-                self -> m (Maybe TextTrackList)-getTextTracks self-  = liftIO-      (nullableToMaybe <$> (js_getTextTracks (toHTMLMediaElement self)))- -foreign import javascript unsafe "$1[\"videoTracks\"]"-        js_getVideoTracks ::-        HTMLMediaElement -> IO (Nullable VideoTrackList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.videoTracks Mozilla HTMLMediaElement.videoTracks documentation> -getVideoTracks ::-               (MonadIO m, IsHTMLMediaElement self) =>-                 self -> m (Maybe VideoTrackList)-getVideoTracks self-  = liftIO-      (nullableToMaybe <$> (js_getVideoTracks (toHTMLMediaElement self)))- -foreign import javascript unsafe "$1[\"mediaGroup\"] = $2;"-        js_setMediaGroup :: HTMLMediaElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.mediaGroup Mozilla HTMLMediaElement.mediaGroup documentation> -setMediaGroup ::-              (MonadIO m, IsHTMLMediaElement self, ToJSString val) =>-                self -> Maybe val -> m ()-setMediaGroup self val-  = liftIO-      (js_setMediaGroup (toHTMLMediaElement self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"mediaGroup\"]"-        js_getMediaGroup :: HTMLMediaElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.mediaGroup Mozilla HTMLMediaElement.mediaGroup documentation> -getMediaGroup ::-              (MonadIO m, IsHTMLMediaElement self, FromJSString result) =>-                self -> m (Maybe result)-getMediaGroup self-  = liftIO-      (fromMaybeJSString <$>-         (js_getMediaGroup (toHTMLMediaElement self)))- -foreign import javascript unsafe "$1[\"controller\"] = $2;"-        js_setController ::-        HTMLMediaElement -> Nullable MediaController -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.controller Mozilla HTMLMediaElement.controller documentation> -setController ::-              (MonadIO m, IsHTMLMediaElement self) =>-                self -> Maybe MediaController -> m ()-setController self val-  = liftIO-      (js_setController (toHTMLMediaElement self) (maybeToNullable val))- -foreign import javascript unsafe "$1[\"controller\"]"-        js_getController ::-        HTMLMediaElement -> IO (Nullable MediaController)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.controller Mozilla HTMLMediaElement.controller documentation> -getController ::-              (MonadIO m, IsHTMLMediaElement self) =>-                self -> m (Maybe MediaController)-getController self-  = liftIO-      (nullableToMaybe <$> (js_getController (toHTMLMediaElement self)))- -foreign import javascript unsafe-        "($1[\"webkitCurrentPlaybackTargetIsWireless\"] ? 1 : 0)"-        js_getWebkitCurrentPlaybackTargetIsWireless ::-        HTMLMediaElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.webkitCurrentPlaybackTargetIsWireless Mozilla HTMLMediaElement.webkitCurrentPlaybackTargetIsWireless documentation> -getWebkitCurrentPlaybackTargetIsWireless ::-                                         (MonadIO m, IsHTMLMediaElement self) => self -> m Bool-getWebkitCurrentPlaybackTargetIsWireless self-  = liftIO-      (js_getWebkitCurrentPlaybackTargetIsWireless-         (toHTMLMediaElement self))---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.onwebkitcurrentplaybacktargetiswirelesschanged Mozilla HTMLMediaElement.onwebkitcurrentplaybacktargetiswirelesschanged documentation> -webKitCurrentPlaybackTargetIsWirelessChanged ::-                                             (IsHTMLMediaElement self, IsEventTarget self) =>-                                               EventName self Event-webKitCurrentPlaybackTargetIsWirelessChanged-  = unsafeEventName-      (toJSString "webkitcurrentplaybacktargetiswirelesschanged")---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.onwebkitplaybacktargetavailabilitychanged Mozilla HTMLMediaElement.onwebkitplaybacktargetavailabilitychanged documentation> -webKitPlaybackTargetAvailabilityChanged ::-                                        (IsHTMLMediaElement self, IsEventTarget self) =>-                                          EventName self Event-webKitPlaybackTargetAvailabilityChanged-  = unsafeEventName-      (toJSString "webkitplaybacktargetavailabilitychanged")- -foreign import javascript unsafe "$1[\"srcObject\"] = $2;"-        js_setSrcObject ::-        HTMLMediaElement -> Nullable MediaStream -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.srcObject Mozilla HTMLMediaElement.srcObject documentation> -setSrcObject ::-             (MonadIO m, IsHTMLMediaElement self) =>-               self -> Maybe MediaStream -> m ()-setSrcObject self val-  = liftIO-      (js_setSrcObject (toHTMLMediaElement self) (maybeToNullable val))- -foreign import javascript unsafe "$1[\"srcObject\"]"-        js_getSrcObject :: HTMLMediaElement -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.srcObject Mozilla HTMLMediaElement.srcObject documentation> -getSrcObject ::-             (MonadIO m, IsHTMLMediaElement self) =>-               self -> m (Maybe MediaStream)-getSrcObject self-  = liftIO-      ((js_getSrcObject (toHTMLMediaElement self)) >>=-         fromJSValUnchecked)

− src/GHCJS/DOM/JSFFI/Generated/HTMLMenuElement.hs

@@ -1,33 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLMenuElement-       (js_setCompact, setCompact, js_getCompact, getCompact,-        HTMLMenuElement, castToHTMLMenuElement, gTypeHTMLMenuElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"compact\"] = $2;"-        js_setCompact :: HTMLMenuElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMenuElement.compact Mozilla HTMLMenuElement.compact documentation> -setCompact :: (MonadIO m) => HTMLMenuElement -> Bool -> m ()-setCompact self val = liftIO (js_setCompact (self) val)- -foreign import javascript unsafe "($1[\"compact\"] ? 1 : 0)"-        js_getCompact :: HTMLMenuElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMenuElement.compact Mozilla HTMLMenuElement.compact documentation> -getCompact :: (MonadIO m) => HTMLMenuElement -> m Bool-getCompact self = liftIO (js_getCompact (self))

− src/GHCJS/DOM/JSFFI/Generated/HTMLMetaElement.hs

@@ -1,89 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLMetaElement-       (js_setContent, setContent, js_getContent, getContent,-        js_setHttpEquiv, setHttpEquiv, js_getHttpEquiv, getHttpEquiv,-        js_setName, setName, js_getName, getName, js_setScheme, setScheme,-        js_getScheme, getScheme, HTMLMetaElement, castToHTMLMetaElement,-        gTypeHTMLMetaElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"content\"] = $2;"-        js_setContent :: HTMLMetaElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMetaElement.content Mozilla HTMLMetaElement.content documentation> -setContent ::-           (MonadIO m, ToJSString val) => HTMLMetaElement -> val -> m ()-setContent self val-  = liftIO (js_setContent (self) (toJSString val))- -foreign import javascript unsafe "$1[\"content\"]" js_getContent ::-        HTMLMetaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMetaElement.content Mozilla HTMLMetaElement.content documentation> -getContent ::-           (MonadIO m, FromJSString result) => HTMLMetaElement -> m result-getContent self = liftIO (fromJSString <$> (js_getContent (self)))- -foreign import javascript unsafe "$1[\"httpEquiv\"] = $2;"-        js_setHttpEquiv :: HTMLMetaElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMetaElement.httpEquiv Mozilla HTMLMetaElement.httpEquiv documentation> -setHttpEquiv ::-             (MonadIO m, ToJSString val) => HTMLMetaElement -> val -> m ()-setHttpEquiv self val-  = liftIO (js_setHttpEquiv (self) (toJSString val))- -foreign import javascript unsafe "$1[\"httpEquiv\"]"-        js_getHttpEquiv :: HTMLMetaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMetaElement.httpEquiv Mozilla HTMLMetaElement.httpEquiv documentation> -getHttpEquiv ::-             (MonadIO m, FromJSString result) => HTMLMetaElement -> m result-getHttpEquiv self-  = liftIO (fromJSString <$> (js_getHttpEquiv (self)))- -foreign import javascript unsafe "$1[\"name\"] = $2;" js_setName ::-        HTMLMetaElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMetaElement.name Mozilla HTMLMetaElement.name documentation> -setName ::-        (MonadIO m, ToJSString val) => HTMLMetaElement -> val -> m ()-setName self val = liftIO (js_setName (self) (toJSString val))- -foreign import javascript unsafe "$1[\"name\"]" js_getName ::-        HTMLMetaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMetaElement.name Mozilla HTMLMetaElement.name documentation> -getName ::-        (MonadIO m, FromJSString result) => HTMLMetaElement -> m result-getName self = liftIO (fromJSString <$> (js_getName (self)))- -foreign import javascript unsafe "$1[\"scheme\"] = $2;"-        js_setScheme :: HTMLMetaElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMetaElement.scheme Mozilla HTMLMetaElement.scheme documentation> -setScheme ::-          (MonadIO m, ToJSString val) => HTMLMetaElement -> val -> m ()-setScheme self val = liftIO (js_setScheme (self) (toJSString val))- -foreign import javascript unsafe "$1[\"scheme\"]" js_getScheme ::-        HTMLMetaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMetaElement.scheme Mozilla HTMLMetaElement.scheme documentation> -getScheme ::-          (MonadIO m, FromJSString result) => HTMLMetaElement -> m result-getScheme self = liftIO (fromJSString <$> (js_getScheme (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLMeterElement.hs

@@ -1,114 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLMeterElement-       (js_setValue, setValue, js_getValue, getValue, js_setMin, setMin,-        js_getMin, getMin, js_setMax, setMax, js_getMax, getMax, js_setLow,-        setLow, js_getLow, getLow, js_setHigh, setHigh, js_getHigh,-        getHigh, js_setOptimum, setOptimum, js_getOptimum, getOptimum,-        js_getLabels, getLabels, HTMLMeterElement, castToHTMLMeterElement,-        gTypeHTMLMeterElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"value\"] = $2;" js_setValue-        :: HTMLMeterElement -> Double -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMeterElement.value Mozilla HTMLMeterElement.value documentation> -setValue :: (MonadIO m) => HTMLMeterElement -> Double -> m ()-setValue self val = liftIO (js_setValue (self) val)- -foreign import javascript unsafe "$1[\"value\"]" js_getValue ::-        HTMLMeterElement -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMeterElement.value Mozilla HTMLMeterElement.value documentation> -getValue :: (MonadIO m) => HTMLMeterElement -> m Double-getValue self = liftIO (js_getValue (self))- -foreign import javascript unsafe "$1[\"min\"] = $2;" js_setMin ::-        HTMLMeterElement -> Double -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMeterElement.min Mozilla HTMLMeterElement.min documentation> -setMin :: (MonadIO m) => HTMLMeterElement -> Double -> m ()-setMin self val = liftIO (js_setMin (self) val)- -foreign import javascript unsafe "$1[\"min\"]" js_getMin ::-        HTMLMeterElement -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMeterElement.min Mozilla HTMLMeterElement.min documentation> -getMin :: (MonadIO m) => HTMLMeterElement -> m Double-getMin self = liftIO (js_getMin (self))- -foreign import javascript unsafe "$1[\"max\"] = $2;" js_setMax ::-        HTMLMeterElement -> Double -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMeterElement.max Mozilla HTMLMeterElement.max documentation> -setMax :: (MonadIO m) => HTMLMeterElement -> Double -> m ()-setMax self val = liftIO (js_setMax (self) val)- -foreign import javascript unsafe "$1[\"max\"]" js_getMax ::-        HTMLMeterElement -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMeterElement.max Mozilla HTMLMeterElement.max documentation> -getMax :: (MonadIO m) => HTMLMeterElement -> m Double-getMax self = liftIO (js_getMax (self))- -foreign import javascript unsafe "$1[\"low\"] = $2;" js_setLow ::-        HTMLMeterElement -> Double -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMeterElement.low Mozilla HTMLMeterElement.low documentation> -setLow :: (MonadIO m) => HTMLMeterElement -> Double -> m ()-setLow self val = liftIO (js_setLow (self) val)- -foreign import javascript unsafe "$1[\"low\"]" js_getLow ::-        HTMLMeterElement -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMeterElement.low Mozilla HTMLMeterElement.low documentation> -getLow :: (MonadIO m) => HTMLMeterElement -> m Double-getLow self = liftIO (js_getLow (self))- -foreign import javascript unsafe "$1[\"high\"] = $2;" js_setHigh ::-        HTMLMeterElement -> Double -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMeterElement.high Mozilla HTMLMeterElement.high documentation> -setHigh :: (MonadIO m) => HTMLMeterElement -> Double -> m ()-setHigh self val = liftIO (js_setHigh (self) val)- -foreign import javascript unsafe "$1[\"high\"]" js_getHigh ::-        HTMLMeterElement -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMeterElement.high Mozilla HTMLMeterElement.high documentation> -getHigh :: (MonadIO m) => HTMLMeterElement -> m Double-getHigh self = liftIO (js_getHigh (self))- -foreign import javascript unsafe "$1[\"optimum\"] = $2;"-        js_setOptimum :: HTMLMeterElement -> Double -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMeterElement.optimum Mozilla HTMLMeterElement.optimum documentation> -setOptimum :: (MonadIO m) => HTMLMeterElement -> Double -> m ()-setOptimum self val = liftIO (js_setOptimum (self) val)- -foreign import javascript unsafe "$1[\"optimum\"]" js_getOptimum ::-        HTMLMeterElement -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMeterElement.optimum Mozilla HTMLMeterElement.optimum documentation> -getOptimum :: (MonadIO m) => HTMLMeterElement -> m Double-getOptimum self = liftIO (js_getOptimum (self))- -foreign import javascript unsafe "$1[\"labels\"]" js_getLabels ::-        HTMLMeterElement -> IO (Nullable NodeList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMeterElement.labels Mozilla HTMLMeterElement.labels documentation> -getLabels :: (MonadIO m) => HTMLMeterElement -> m (Maybe NodeList)-getLabels self = liftIO (nullableToMaybe <$> (js_getLabels (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLModElement.hs

@@ -1,54 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLModElement-       (js_setCite, setCite, js_getCite, getCite, js_setDateTime,-        setDateTime, js_getDateTime, getDateTime, HTMLModElement,-        castToHTMLModElement, gTypeHTMLModElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"cite\"] = $2;" js_setCite ::-        HTMLModElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLModElement.cite Mozilla HTMLModElement.cite documentation> -setCite ::-        (MonadIO m, ToJSString val) => HTMLModElement -> val -> m ()-setCite self val = liftIO (js_setCite (self) (toJSString val))- -foreign import javascript unsafe "$1[\"cite\"]" js_getCite ::-        HTMLModElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLModElement.cite Mozilla HTMLModElement.cite documentation> -getCite ::-        (MonadIO m, FromJSString result) => HTMLModElement -> m result-getCite self = liftIO (fromJSString <$> (js_getCite (self)))- -foreign import javascript unsafe "$1[\"dateTime\"] = $2;"-        js_setDateTime :: HTMLModElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLModElement.dateTime Mozilla HTMLModElement.dateTime documentation> -setDateTime ::-            (MonadIO m, ToJSString val) => HTMLModElement -> val -> m ()-setDateTime self val-  = liftIO (js_setDateTime (self) (toJSString val))- -foreign import javascript unsafe "$1[\"dateTime\"]" js_getDateTime-        :: HTMLModElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLModElement.dateTime Mozilla HTMLModElement.dateTime documentation> -getDateTime ::-            (MonadIO m, FromJSString result) => HTMLModElement -> m result-getDateTime self-  = liftIO (fromJSString <$> (js_getDateTime (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLOListElement.hs

@@ -1,80 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLOListElement-       (js_setCompact, setCompact, js_getCompact, getCompact, js_setStart,-        setStart, js_getStart, getStart, js_setReversed, setReversed,-        js_getReversed, getReversed, js_setType, setType, js_getType,-        getType, HTMLOListElement, castToHTMLOListElement,-        gTypeHTMLOListElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"compact\"] = $2;"-        js_setCompact :: HTMLOListElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOListElement.compact Mozilla HTMLOListElement.compact documentation> -setCompact :: (MonadIO m) => HTMLOListElement -> Bool -> m ()-setCompact self val = liftIO (js_setCompact (self) val)- -foreign import javascript unsafe "($1[\"compact\"] ? 1 : 0)"-        js_getCompact :: HTMLOListElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOListElement.compact Mozilla HTMLOListElement.compact documentation> -getCompact :: (MonadIO m) => HTMLOListElement -> m Bool-getCompact self = liftIO (js_getCompact (self))- -foreign import javascript unsafe "$1[\"start\"] = $2;" js_setStart-        :: HTMLOListElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOListElement.start Mozilla HTMLOListElement.start documentation> -setStart :: (MonadIO m) => HTMLOListElement -> Int -> m ()-setStart self val = liftIO (js_setStart (self) val)- -foreign import javascript unsafe "$1[\"start\"]" js_getStart ::-        HTMLOListElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOListElement.start Mozilla HTMLOListElement.start documentation> -getStart :: (MonadIO m) => HTMLOListElement -> m Int-getStart self = liftIO (js_getStart (self))- -foreign import javascript unsafe "$1[\"reversed\"] = $2;"-        js_setReversed :: HTMLOListElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOListElement.reversed Mozilla HTMLOListElement.reversed documentation> -setReversed :: (MonadIO m) => HTMLOListElement -> Bool -> m ()-setReversed self val = liftIO (js_setReversed (self) val)- -foreign import javascript unsafe "($1[\"reversed\"] ? 1 : 0)"-        js_getReversed :: HTMLOListElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOListElement.reversed Mozilla HTMLOListElement.reversed documentation> -getReversed :: (MonadIO m) => HTMLOListElement -> m Bool-getReversed self = liftIO (js_getReversed (self))- -foreign import javascript unsafe "$1[\"type\"] = $2;" js_setType ::-        HTMLOListElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOListElement.type Mozilla HTMLOListElement.type documentation> -setType ::-        (MonadIO m, ToJSString val) => HTMLOListElement -> val -> m ()-setType self val = liftIO (js_setType (self) (toJSString val))- -foreign import javascript unsafe "$1[\"type\"]" js_getType ::-        HTMLOListElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOListElement.type Mozilla HTMLOListElement.type documentation> -getType ::-        (MonadIO m, FromJSString result) => HTMLOListElement -> m result-getType self = liftIO (fromJSString <$> (js_getType (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLObjectElement.hs

@@ -1,363 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLObjectElement-       (js_checkValidity, checkValidity, js_setCustomValidity,-        setCustomValidity, js_getSVGDocument, getSVGDocument, js_getForm,-        getForm, js_setCode, setCode, js_getCode, getCode, js_setAlign,-        setAlign, js_getAlign, getAlign, js_setArchive, setArchive,-        js_getArchive, getArchive, js_setBorder, setBorder, js_getBorder,-        getBorder, js_setCodeBase, setCodeBase, js_getCodeBase,-        getCodeBase, js_setCodeType, setCodeType, js_getCodeType,-        getCodeType, js_setData, setData, js_getData, getData,-        js_setDeclare, setDeclare, js_getDeclare, getDeclare, js_setHeight,-        setHeight, js_getHeight, getHeight, js_setHspace, setHspace,-        js_getHspace, getHspace, js_setName, setName, js_getName, getName,-        js_setStandby, setStandby, js_getStandby, getStandby, js_setType,-        setType, js_getType, getType, js_setUseMap, setUseMap,-        js_getUseMap, getUseMap, js_setVspace, setVspace, js_getVspace,-        getVspace, js_setWidth, setWidth, js_getWidth, getWidth,-        js_getWillValidate, getWillValidate, js_getValidity, getValidity,-        js_getValidationMessage, getValidationMessage,-        js_getContentDocument, getContentDocument, HTMLObjectElement,-        castToHTMLObjectElement, gTypeHTMLObjectElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe-        "($1[\"checkValidity\"]() ? 1 : 0)" js_checkValidity ::-        HTMLObjectElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.checkValidity Mozilla HTMLObjectElement.checkValidity documentation> -checkValidity :: (MonadIO m) => HTMLObjectElement -> m Bool-checkValidity self = liftIO (js_checkValidity (self))- -foreign import javascript unsafe "$1[\"setCustomValidity\"]($2)"-        js_setCustomValidity ::-        HTMLObjectElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.setCustomValidity Mozilla HTMLObjectElement.setCustomValidity documentation> -setCustomValidity ::-                  (MonadIO m, ToJSString error) =>-                    HTMLObjectElement -> Maybe error -> m ()-setCustomValidity self error-  = liftIO (js_setCustomValidity (self) (toMaybeJSString error))- -foreign import javascript unsafe "$1[\"getSVGDocument\"]()"-        js_getSVGDocument :: HTMLObjectElement -> IO (Nullable SVGDocument)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.getSVGDocument Mozilla HTMLObjectElement.getSVGDocument documentation> -getSVGDocument ::-               (MonadIO m) => HTMLObjectElement -> m (Maybe SVGDocument)-getSVGDocument self-  = liftIO (nullableToMaybe <$> (js_getSVGDocument (self)))- -foreign import javascript unsafe "$1[\"form\"]" js_getForm ::-        HTMLObjectElement -> IO (Nullable HTMLFormElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.form Mozilla HTMLObjectElement.form documentation> -getForm ::-        (MonadIO m) => HTMLObjectElement -> m (Maybe HTMLFormElement)-getForm self = liftIO (nullableToMaybe <$> (js_getForm (self)))- -foreign import javascript unsafe "$1[\"code\"] = $2;" js_setCode ::-        HTMLObjectElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.code Mozilla HTMLObjectElement.code documentation> -setCode ::-        (MonadIO m, ToJSString val) => HTMLObjectElement -> val -> m ()-setCode self val = liftIO (js_setCode (self) (toJSString val))- -foreign import javascript unsafe "$1[\"code\"]" js_getCode ::-        HTMLObjectElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.code Mozilla HTMLObjectElement.code documentation> -getCode ::-        (MonadIO m, FromJSString result) => HTMLObjectElement -> m result-getCode self = liftIO (fromJSString <$> (js_getCode (self)))- -foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign-        :: HTMLObjectElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.align Mozilla HTMLObjectElement.align documentation> -setAlign ::-         (MonadIO m, ToJSString val) => HTMLObjectElement -> val -> m ()-setAlign self val = liftIO (js_setAlign (self) (toJSString val))- -foreign import javascript unsafe "$1[\"align\"]" js_getAlign ::-        HTMLObjectElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.align Mozilla HTMLObjectElement.align documentation> -getAlign ::-         (MonadIO m, FromJSString result) => HTMLObjectElement -> m result-getAlign self = liftIO (fromJSString <$> (js_getAlign (self)))- -foreign import javascript unsafe "$1[\"archive\"] = $2;"-        js_setArchive :: HTMLObjectElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.archive Mozilla HTMLObjectElement.archive documentation> -setArchive ::-           (MonadIO m, ToJSString val) => HTMLObjectElement -> val -> m ()-setArchive self val-  = liftIO (js_setArchive (self) (toJSString val))- -foreign import javascript unsafe "$1[\"archive\"]" js_getArchive ::-        HTMLObjectElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.archive Mozilla HTMLObjectElement.archive documentation> -getArchive ::-           (MonadIO m, FromJSString result) => HTMLObjectElement -> m result-getArchive self = liftIO (fromJSString <$> (js_getArchive (self)))- -foreign import javascript unsafe "$1[\"border\"] = $2;"-        js_setBorder :: HTMLObjectElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.border Mozilla HTMLObjectElement.border documentation> -setBorder ::-          (MonadIO m, ToJSString val) => HTMLObjectElement -> val -> m ()-setBorder self val = liftIO (js_setBorder (self) (toJSString val))- -foreign import javascript unsafe "$1[\"border\"]" js_getBorder ::-        HTMLObjectElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.border Mozilla HTMLObjectElement.border documentation> -getBorder ::-          (MonadIO m, FromJSString result) => HTMLObjectElement -> m result-getBorder self = liftIO (fromJSString <$> (js_getBorder (self)))- -foreign import javascript unsafe "$1[\"codeBase\"] = $2;"-        js_setCodeBase :: HTMLObjectElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.codeBase Mozilla HTMLObjectElement.codeBase documentation> -setCodeBase ::-            (MonadIO m, ToJSString val) => HTMLObjectElement -> val -> m ()-setCodeBase self val-  = liftIO (js_setCodeBase (self) (toJSString val))- -foreign import javascript unsafe "$1[\"codeBase\"]" js_getCodeBase-        :: HTMLObjectElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.codeBase Mozilla HTMLObjectElement.codeBase documentation> -getCodeBase ::-            (MonadIO m, FromJSString result) => HTMLObjectElement -> m result-getCodeBase self-  = liftIO (fromJSString <$> (js_getCodeBase (self)))- -foreign import javascript unsafe "$1[\"codeType\"] = $2;"-        js_setCodeType :: HTMLObjectElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.codeType Mozilla HTMLObjectElement.codeType documentation> -setCodeType ::-            (MonadIO m, ToJSString val) => HTMLObjectElement -> val -> m ()-setCodeType self val-  = liftIO (js_setCodeType (self) (toJSString val))- -foreign import javascript unsafe "$1[\"codeType\"]" js_getCodeType-        :: HTMLObjectElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.codeType Mozilla HTMLObjectElement.codeType documentation> -getCodeType ::-            (MonadIO m, FromJSString result) => HTMLObjectElement -> m result-getCodeType self-  = liftIO (fromJSString <$> (js_getCodeType (self)))- -foreign import javascript unsafe "$1[\"data\"] = $2;" js_setData ::-        HTMLObjectElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.data Mozilla HTMLObjectElement.data documentation> -setData ::-        (MonadIO m, ToJSString val) => HTMLObjectElement -> val -> m ()-setData self val = liftIO (js_setData (self) (toJSString val))- -foreign import javascript unsafe "$1[\"data\"]" js_getData ::-        HTMLObjectElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.data Mozilla HTMLObjectElement.data documentation> -getData ::-        (MonadIO m, FromJSString result) => HTMLObjectElement -> m result-getData self = liftIO (fromJSString <$> (js_getData (self)))- -foreign import javascript unsafe "$1[\"declare\"] = $2;"-        js_setDeclare :: HTMLObjectElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.declare Mozilla HTMLObjectElement.declare documentation> -setDeclare :: (MonadIO m) => HTMLObjectElement -> Bool -> m ()-setDeclare self val = liftIO (js_setDeclare (self) val)- -foreign import javascript unsafe "($1[\"declare\"] ? 1 : 0)"-        js_getDeclare :: HTMLObjectElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.declare Mozilla HTMLObjectElement.declare documentation> -getDeclare :: (MonadIO m) => HTMLObjectElement -> m Bool-getDeclare self = liftIO (js_getDeclare (self))- -foreign import javascript unsafe "$1[\"height\"] = $2;"-        js_setHeight :: HTMLObjectElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.height Mozilla HTMLObjectElement.height documentation> -setHeight ::-          (MonadIO m, ToJSString val) => HTMLObjectElement -> val -> m ()-setHeight self val = liftIO (js_setHeight (self) (toJSString val))- -foreign import javascript unsafe "$1[\"height\"]" js_getHeight ::-        HTMLObjectElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.height Mozilla HTMLObjectElement.height documentation> -getHeight ::-          (MonadIO m, FromJSString result) => HTMLObjectElement -> m result-getHeight self = liftIO (fromJSString <$> (js_getHeight (self)))- -foreign import javascript unsafe "$1[\"hspace\"] = $2;"-        js_setHspace :: HTMLObjectElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.hspace Mozilla HTMLObjectElement.hspace documentation> -setHspace :: (MonadIO m) => HTMLObjectElement -> Int -> m ()-setHspace self val = liftIO (js_setHspace (self) val)- -foreign import javascript unsafe "$1[\"hspace\"]" js_getHspace ::-        HTMLObjectElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.hspace Mozilla HTMLObjectElement.hspace documentation> -getHspace :: (MonadIO m) => HTMLObjectElement -> m Int-getHspace self = liftIO (js_getHspace (self))- -foreign import javascript unsafe "$1[\"name\"] = $2;" js_setName ::-        HTMLObjectElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.name Mozilla HTMLObjectElement.name documentation> -setName ::-        (MonadIO m, ToJSString val) => HTMLObjectElement -> val -> m ()-setName self val = liftIO (js_setName (self) (toJSString val))- -foreign import javascript unsafe "$1[\"name\"]" js_getName ::-        HTMLObjectElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.name Mozilla HTMLObjectElement.name documentation> -getName ::-        (MonadIO m, FromJSString result) => HTMLObjectElement -> m result-getName self = liftIO (fromJSString <$> (js_getName (self)))- -foreign import javascript unsafe "$1[\"standby\"] = $2;"-        js_setStandby :: HTMLObjectElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.standby Mozilla HTMLObjectElement.standby documentation> -setStandby ::-           (MonadIO m, ToJSString val) => HTMLObjectElement -> val -> m ()-setStandby self val-  = liftIO (js_setStandby (self) (toJSString val))- -foreign import javascript unsafe "$1[\"standby\"]" js_getStandby ::-        HTMLObjectElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.standby Mozilla HTMLObjectElement.standby documentation> -getStandby ::-           (MonadIO m, FromJSString result) => HTMLObjectElement -> m result-getStandby self = liftIO (fromJSString <$> (js_getStandby (self)))- -foreign import javascript unsafe "$1[\"type\"] = $2;" js_setType ::-        HTMLObjectElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.type Mozilla HTMLObjectElement.type documentation> -setType ::-        (MonadIO m, ToJSString val) => HTMLObjectElement -> val -> m ()-setType self val = liftIO (js_setType (self) (toJSString val))- -foreign import javascript unsafe "$1[\"type\"]" js_getType ::-        HTMLObjectElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.type Mozilla HTMLObjectElement.type documentation> -getType ::-        (MonadIO m, FromJSString result) => HTMLObjectElement -> m result-getType self = liftIO (fromJSString <$> (js_getType (self)))- -foreign import javascript unsafe "$1[\"useMap\"] = $2;"-        js_setUseMap :: HTMLObjectElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.useMap Mozilla HTMLObjectElement.useMap documentation> -setUseMap ::-          (MonadIO m, ToJSString val) => HTMLObjectElement -> val -> m ()-setUseMap self val = liftIO (js_setUseMap (self) (toJSString val))- -foreign import javascript unsafe "$1[\"useMap\"]" js_getUseMap ::-        HTMLObjectElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.useMap Mozilla HTMLObjectElement.useMap documentation> -getUseMap ::-          (MonadIO m, FromJSString result) => HTMLObjectElement -> m result-getUseMap self = liftIO (fromJSString <$> (js_getUseMap (self)))- -foreign import javascript unsafe "$1[\"vspace\"] = $2;"-        js_setVspace :: HTMLObjectElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.vspace Mozilla HTMLObjectElement.vspace documentation> -setVspace :: (MonadIO m) => HTMLObjectElement -> Int -> m ()-setVspace self val = liftIO (js_setVspace (self) val)- -foreign import javascript unsafe "$1[\"vspace\"]" js_getVspace ::-        HTMLObjectElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.vspace Mozilla HTMLObjectElement.vspace documentation> -getVspace :: (MonadIO m) => HTMLObjectElement -> m Int-getVspace self = liftIO (js_getVspace (self))- -foreign import javascript unsafe "$1[\"width\"] = $2;" js_setWidth-        :: HTMLObjectElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.width Mozilla HTMLObjectElement.width documentation> -setWidth ::-         (MonadIO m, ToJSString val) => HTMLObjectElement -> val -> m ()-setWidth self val = liftIO (js_setWidth (self) (toJSString val))- -foreign import javascript unsafe "$1[\"width\"]" js_getWidth ::-        HTMLObjectElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.width Mozilla HTMLObjectElement.width documentation> -getWidth ::-         (MonadIO m, FromJSString result) => HTMLObjectElement -> m result-getWidth self = liftIO (fromJSString <$> (js_getWidth (self)))- -foreign import javascript unsafe "($1[\"willValidate\"] ? 1 : 0)"-        js_getWillValidate :: HTMLObjectElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.willValidate Mozilla HTMLObjectElement.willValidate documentation> -getWillValidate :: (MonadIO m) => HTMLObjectElement -> m Bool-getWillValidate self = liftIO (js_getWillValidate (self))- -foreign import javascript unsafe "$1[\"validity\"]" js_getValidity-        :: HTMLObjectElement -> IO (Nullable ValidityState)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.validity Mozilla HTMLObjectElement.validity documentation> -getValidity ::-            (MonadIO m) => HTMLObjectElement -> m (Maybe ValidityState)-getValidity self-  = liftIO (nullableToMaybe <$> (js_getValidity (self)))- -foreign import javascript unsafe "$1[\"validationMessage\"]"-        js_getValidationMessage :: HTMLObjectElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.validationMessage Mozilla HTMLObjectElement.validationMessage documentation> -getValidationMessage ::-                     (MonadIO m, FromJSString result) => HTMLObjectElement -> m result-getValidationMessage self-  = liftIO (fromJSString <$> (js_getValidationMessage (self)))- -foreign import javascript unsafe "$1[\"contentDocument\"]"-        js_getContentDocument ::-        HTMLObjectElement -> IO (Nullable Document)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.contentDocument Mozilla HTMLObjectElement.contentDocument documentation> -getContentDocument ::-                   (MonadIO m) => HTMLObjectElement -> m (Maybe Document)-getContentDocument self-  = liftIO (nullableToMaybe <$> (js_getContentDocument (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLOptGroupElement.hs

@@ -1,50 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLOptGroupElement-       (js_setDisabled, setDisabled, js_getDisabled, getDisabled,-        js_setLabel, setLabel, js_getLabel, getLabel, HTMLOptGroupElement,-        castToHTMLOptGroupElement, gTypeHTMLOptGroupElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"disabled\"] = $2;"-        js_setDisabled :: HTMLOptGroupElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptGroupElement.disabled Mozilla HTMLOptGroupElement.disabled documentation> -setDisabled :: (MonadIO m) => HTMLOptGroupElement -> Bool -> m ()-setDisabled self val = liftIO (js_setDisabled (self) val)- -foreign import javascript unsafe "($1[\"disabled\"] ? 1 : 0)"-        js_getDisabled :: HTMLOptGroupElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptGroupElement.disabled Mozilla HTMLOptGroupElement.disabled documentation> -getDisabled :: (MonadIO m) => HTMLOptGroupElement -> m Bool-getDisabled self = liftIO (js_getDisabled (self))- -foreign import javascript unsafe "$1[\"label\"] = $2;" js_setLabel-        :: HTMLOptGroupElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptGroupElement.label Mozilla HTMLOptGroupElement.label documentation> -setLabel ::-         (MonadIO m, ToJSString val) => HTMLOptGroupElement -> val -> m ()-setLabel self val = liftIO (js_setLabel (self) (toJSString val))- -foreign import javascript unsafe "$1[\"label\"]" js_getLabel ::-        HTMLOptGroupElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptGroupElement.label Mozilla HTMLOptGroupElement.label documentation> -getLabel ::-         (MonadIO m, FromJSString result) => HTMLOptGroupElement -> m result-getLabel self = liftIO (fromJSString <$> (js_getLabel (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLOptionElement.hs

@@ -1,132 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLOptionElement-       (js_setDisabled, setDisabled, js_getDisabled, getDisabled,-        js_getForm, getForm, js_setLabel, setLabel, js_getLabel, getLabel,-        js_setDefaultSelected, setDefaultSelected, js_getDefaultSelected,-        getDefaultSelected, js_setSelected, setSelected, js_getSelected,-        getSelected, js_setValue, setValue, js_getValue, getValue,-        js_setText, setText, js_getText, getText, js_getIndex, getIndex,-        HTMLOptionElement, castToHTMLOptionElement, gTypeHTMLOptionElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"disabled\"] = $2;"-        js_setDisabled :: HTMLOptionElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptionElement.disabled Mozilla HTMLOptionElement.disabled documentation> -setDisabled :: (MonadIO m) => HTMLOptionElement -> Bool -> m ()-setDisabled self val = liftIO (js_setDisabled (self) val)- -foreign import javascript unsafe "($1[\"disabled\"] ? 1 : 0)"-        js_getDisabled :: HTMLOptionElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptionElement.disabled Mozilla HTMLOptionElement.disabled documentation> -getDisabled :: (MonadIO m) => HTMLOptionElement -> m Bool-getDisabled self = liftIO (js_getDisabled (self))- -foreign import javascript unsafe "$1[\"form\"]" js_getForm ::-        HTMLOptionElement -> IO (Nullable HTMLFormElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptionElement.form Mozilla HTMLOptionElement.form documentation> -getForm ::-        (MonadIO m) => HTMLOptionElement -> m (Maybe HTMLFormElement)-getForm self = liftIO (nullableToMaybe <$> (js_getForm (self)))- -foreign import javascript unsafe "$1[\"label\"] = $2;" js_setLabel-        :: HTMLOptionElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptionElement.label Mozilla HTMLOptionElement.label documentation> -setLabel ::-         (MonadIO m, ToJSString val) => HTMLOptionElement -> val -> m ()-setLabel self val = liftIO (js_setLabel (self) (toJSString val))- -foreign import javascript unsafe "$1[\"label\"]" js_getLabel ::-        HTMLOptionElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptionElement.label Mozilla HTMLOptionElement.label documentation> -getLabel ::-         (MonadIO m, FromJSString result) => HTMLOptionElement -> m result-getLabel self = liftIO (fromJSString <$> (js_getLabel (self)))- -foreign import javascript unsafe "$1[\"defaultSelected\"] = $2;"-        js_setDefaultSelected :: HTMLOptionElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptionElement.defaultSelected Mozilla HTMLOptionElement.defaultSelected documentation> -setDefaultSelected ::-                   (MonadIO m) => HTMLOptionElement -> Bool -> m ()-setDefaultSelected self val-  = liftIO (js_setDefaultSelected (self) val)- -foreign import javascript unsafe-        "($1[\"defaultSelected\"] ? 1 : 0)" js_getDefaultSelected ::-        HTMLOptionElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptionElement.defaultSelected Mozilla HTMLOptionElement.defaultSelected documentation> -getDefaultSelected :: (MonadIO m) => HTMLOptionElement -> m Bool-getDefaultSelected self = liftIO (js_getDefaultSelected (self))- -foreign import javascript unsafe "$1[\"selected\"] = $2;"-        js_setSelected :: HTMLOptionElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptionElement.selected Mozilla HTMLOptionElement.selected documentation> -setSelected :: (MonadIO m) => HTMLOptionElement -> Bool -> m ()-setSelected self val = liftIO (js_setSelected (self) val)- -foreign import javascript unsafe "($1[\"selected\"] ? 1 : 0)"-        js_getSelected :: HTMLOptionElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptionElement.selected Mozilla HTMLOptionElement.selected documentation> -getSelected :: (MonadIO m) => HTMLOptionElement -> m Bool-getSelected self = liftIO (js_getSelected (self))- -foreign import javascript unsafe "$1[\"value\"] = $2;" js_setValue-        :: HTMLOptionElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptionElement.value Mozilla HTMLOptionElement.value documentation> -setValue ::-         (MonadIO m, ToJSString val) => HTMLOptionElement -> val -> m ()-setValue self val = liftIO (js_setValue (self) (toJSString val))- -foreign import javascript unsafe "$1[\"value\"]" js_getValue ::-        HTMLOptionElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptionElement.value Mozilla HTMLOptionElement.value documentation> -getValue ::-         (MonadIO m, FromJSString result) => HTMLOptionElement -> m result-getValue self = liftIO (fromJSString <$> (js_getValue (self)))- -foreign import javascript unsafe "$1[\"text\"] = $2;" js_setText ::-        HTMLOptionElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptionElement.text Mozilla HTMLOptionElement.text documentation> -setText ::-        (MonadIO m, ToJSString val) => HTMLOptionElement -> val -> m ()-setText self val = liftIO (js_setText (self) (toJSString val))- -foreign import javascript unsafe "$1[\"text\"]" js_getText ::-        HTMLOptionElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptionElement.text Mozilla HTMLOptionElement.text documentation> -getText ::-        (MonadIO m, FromJSString result) => HTMLOptionElement -> m result-getText self = liftIO (fromJSString <$> (js_getText (self)))- -foreign import javascript unsafe "$1[\"index\"]" js_getIndex ::-        HTMLOptionElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptionElement.index Mozilla HTMLOptionElement.index documentation> -getIndex :: (MonadIO m) => HTMLOptionElement -> m Int-getIndex self = liftIO (js_getIndex (self))

− src/GHCJS/DOM/JSFFI/Generated/HTMLOptionsCollection.hs

@@ -1,96 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLOptionsCollection-       (js_namedItem, namedItem, js_addBefore, addBefore, js_add, add,-        js_remove, remove, js_setSelectedIndex, setSelectedIndex,-        js_getSelectedIndex, getSelectedIndex, js_setLength, setLength,-        js_getLength, getLength, HTMLOptionsCollection,-        castToHTMLOptionsCollection, gTypeHTMLOptionsCollection)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"namedItem\"]($2)"-        js_namedItem ::-        HTMLOptionsCollection -> JSString -> IO (Nullable Node)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptionsCollection.namedItem Mozilla HTMLOptionsCollection.namedItem documentation> -namedItem ::-          (MonadIO m, ToJSString name) =>-            HTMLOptionsCollection -> name -> m (Maybe Node)-namedItem self name-  = liftIO-      (nullableToMaybe <$> (js_namedItem (self) (toJSString name)))- -foreign import javascript unsafe "$1[\"add\"]($2, $3)" js_addBefore-        ::-        HTMLOptionsCollection ->-          Nullable HTMLElement -> Nullable HTMLElement -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptionsCollection.add Mozilla HTMLOptionsCollection.add documentation> -addBefore ::-          (MonadIO m, IsHTMLElement element, IsHTMLElement before) =>-            HTMLOptionsCollection -> Maybe element -> Maybe before -> m ()-addBefore self element before-  = liftIO-      (js_addBefore (self) (maybeToNullable (fmap toHTMLElement element))-         (maybeToNullable (fmap toHTMLElement before)))- -foreign import javascript unsafe "$1[\"add\"]($2, $3)" js_add ::-        HTMLOptionsCollection -> Nullable HTMLElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptionsCollection.add Mozilla HTMLOptionsCollection.add documentation> -add ::-    (MonadIO m, IsHTMLElement element) =>-      HTMLOptionsCollection -> Maybe element -> Int -> m ()-add self element index-  = liftIO-      (js_add (self) (maybeToNullable (fmap toHTMLElement element))-         index)- -foreign import javascript unsafe "$1[\"remove\"]($2)" js_remove ::-        HTMLOptionsCollection -> Word -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptionsCollection.remove Mozilla HTMLOptionsCollection.remove documentation> -remove :: (MonadIO m) => HTMLOptionsCollection -> Word -> m ()-remove self index = liftIO (js_remove (self) index)- -foreign import javascript unsafe "$1[\"selectedIndex\"] = $2;"-        js_setSelectedIndex :: HTMLOptionsCollection -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptionsCollection.selectedIndex Mozilla HTMLOptionsCollection.selectedIndex documentation> -setSelectedIndex ::-                 (MonadIO m) => HTMLOptionsCollection -> Int -> m ()-setSelectedIndex self val = liftIO (js_setSelectedIndex (self) val)- -foreign import javascript unsafe "$1[\"selectedIndex\"]"-        js_getSelectedIndex :: HTMLOptionsCollection -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptionsCollection.selectedIndex Mozilla HTMLOptionsCollection.selectedIndex documentation> -getSelectedIndex :: (MonadIO m) => HTMLOptionsCollection -> m Int-getSelectedIndex self = liftIO (js_getSelectedIndex (self))- -foreign import javascript unsafe "$1[\"length\"] = $2;"-        js_setLength :: HTMLOptionsCollection -> Word -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptionsCollection.length Mozilla HTMLOptionsCollection.length documentation> -setLength :: (MonadIO m) => HTMLOptionsCollection -> Word -> m ()-setLength self val = liftIO (js_setLength (self) val)- -foreign import javascript unsafe "$1[\"length\"]" js_getLength ::-        HTMLOptionsCollection -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptionsCollection.length Mozilla HTMLOptionsCollection.length documentation> -getLength :: (MonadIO m) => HTMLOptionsCollection -> m Word-getLength self = liftIO (js_getLength (self))

− src/GHCJS/DOM/JSFFI/Generated/HTMLOutputElement.hs

@@ -1,158 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLOutputElement-       (js_checkValidity, checkValidity, js_setCustomValidity,-        setCustomValidity, js_getHtmlFor, getHtmlFor, js_getForm, getForm,-        js_setName, setName, js_getName, getName, js_getType, getType,-        js_setDefaultValue, setDefaultValue, js_getDefaultValue,-        getDefaultValue, js_setValue, setValue, js_getValue, getValue,-        js_getWillValidate, getWillValidate, js_getValidity, getValidity,-        js_getValidationMessage, getValidationMessage, js_getLabels,-        getLabels, HTMLOutputElement, castToHTMLOutputElement,-        gTypeHTMLOutputElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe-        "($1[\"checkValidity\"]() ? 1 : 0)" js_checkValidity ::-        HTMLOutputElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOutputElement.checkValidity Mozilla HTMLOutputElement.checkValidity documentation> -checkValidity :: (MonadIO m) => HTMLOutputElement -> m Bool-checkValidity self = liftIO (js_checkValidity (self))- -foreign import javascript unsafe "$1[\"setCustomValidity\"]($2)"-        js_setCustomValidity ::-        HTMLOutputElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOutputElement.setCustomValidity Mozilla HTMLOutputElement.setCustomValidity documentation> -setCustomValidity ::-                  (MonadIO m, ToJSString error) =>-                    HTMLOutputElement -> Maybe error -> m ()-setCustomValidity self error-  = liftIO (js_setCustomValidity (self) (toMaybeJSString error))- -foreign import javascript unsafe "$1[\"htmlFor\"]" js_getHtmlFor ::-        HTMLOutputElement -> IO (Nullable DOMSettableTokenList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOutputElement.htmlFor Mozilla HTMLOutputElement.htmlFor documentation> -getHtmlFor ::-           (MonadIO m) => HTMLOutputElement -> m (Maybe DOMSettableTokenList)-getHtmlFor self-  = liftIO (nullableToMaybe <$> (js_getHtmlFor (self)))- -foreign import javascript unsafe "$1[\"form\"]" js_getForm ::-        HTMLOutputElement -> IO (Nullable HTMLFormElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOutputElement.form Mozilla HTMLOutputElement.form documentation> -getForm ::-        (MonadIO m) => HTMLOutputElement -> m (Maybe HTMLFormElement)-getForm self = liftIO (nullableToMaybe <$> (js_getForm (self)))- -foreign import javascript unsafe "$1[\"name\"] = $2;" js_setName ::-        HTMLOutputElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOutputElement.name Mozilla HTMLOutputElement.name documentation> -setName ::-        (MonadIO m, ToJSString val) => HTMLOutputElement -> val -> m ()-setName self val = liftIO (js_setName (self) (toJSString val))- -foreign import javascript unsafe "$1[\"name\"]" js_getName ::-        HTMLOutputElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOutputElement.name Mozilla HTMLOutputElement.name documentation> -getName ::-        (MonadIO m, FromJSString result) => HTMLOutputElement -> m result-getName self = liftIO (fromJSString <$> (js_getName (self)))- -foreign import javascript unsafe "$1[\"type\"]" js_getType ::-        HTMLOutputElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOutputElement.type Mozilla HTMLOutputElement.type documentation> -getType ::-        (MonadIO m, FromJSString result) => HTMLOutputElement -> m result-getType self = liftIO (fromJSString <$> (js_getType (self)))- -foreign import javascript unsafe "$1[\"defaultValue\"] = $2;"-        js_setDefaultValue ::-        HTMLOutputElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOutputElement.defaultValue Mozilla HTMLOutputElement.defaultValue documentation> -setDefaultValue ::-                (MonadIO m, ToJSString val) =>-                  HTMLOutputElement -> Maybe val -> m ()-setDefaultValue self val-  = liftIO (js_setDefaultValue (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"defaultValue\"]"-        js_getDefaultValue :: HTMLOutputElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOutputElement.defaultValue Mozilla HTMLOutputElement.defaultValue documentation> -getDefaultValue ::-                (MonadIO m, FromJSString result) =>-                  HTMLOutputElement -> m (Maybe result)-getDefaultValue self-  = liftIO (fromMaybeJSString <$> (js_getDefaultValue (self)))- -foreign import javascript unsafe "$1[\"value\"] = $2;" js_setValue-        :: HTMLOutputElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOutputElement.value Mozilla HTMLOutputElement.value documentation> -setValue ::-         (MonadIO m, ToJSString val) =>-           HTMLOutputElement -> Maybe val -> m ()-setValue self val-  = liftIO (js_setValue (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"value\"]" js_getValue ::-        HTMLOutputElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOutputElement.value Mozilla HTMLOutputElement.value documentation> -getValue ::-         (MonadIO m, FromJSString result) =>-           HTMLOutputElement -> m (Maybe result)-getValue self = liftIO (fromMaybeJSString <$> (js_getValue (self)))- -foreign import javascript unsafe "($1[\"willValidate\"] ? 1 : 0)"-        js_getWillValidate :: HTMLOutputElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOutputElement.willValidate Mozilla HTMLOutputElement.willValidate documentation> -getWillValidate :: (MonadIO m) => HTMLOutputElement -> m Bool-getWillValidate self = liftIO (js_getWillValidate (self))- -foreign import javascript unsafe "$1[\"validity\"]" js_getValidity-        :: HTMLOutputElement -> IO (Nullable ValidityState)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOutputElement.validity Mozilla HTMLOutputElement.validity documentation> -getValidity ::-            (MonadIO m) => HTMLOutputElement -> m (Maybe ValidityState)-getValidity self-  = liftIO (nullableToMaybe <$> (js_getValidity (self)))- -foreign import javascript unsafe "$1[\"validationMessage\"]"-        js_getValidationMessage :: HTMLOutputElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOutputElement.validationMessage Mozilla HTMLOutputElement.validationMessage documentation> -getValidationMessage ::-                     (MonadIO m, FromJSString result) => HTMLOutputElement -> m result-getValidationMessage self-  = liftIO (fromJSString <$> (js_getValidationMessage (self)))- -foreign import javascript unsafe "$1[\"labels\"]" js_getLabels ::-        HTMLOutputElement -> IO (Nullable NodeList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOutputElement.labels Mozilla HTMLOutputElement.labels documentation> -getLabels :: (MonadIO m) => HTMLOutputElement -> m (Maybe NodeList)-getLabels self = liftIO (nullableToMaybe <$> (js_getLabels (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLParagraphElement.hs

@@ -1,37 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLParagraphElement-       (js_setAlign, setAlign, js_getAlign, getAlign,-        HTMLParagraphElement, castToHTMLParagraphElement,-        gTypeHTMLParagraphElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign-        :: HTMLParagraphElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLParagraphElement.align Mozilla HTMLParagraphElement.align documentation> -setAlign ::-         (MonadIO m, ToJSString val) => HTMLParagraphElement -> val -> m ()-setAlign self val = liftIO (js_setAlign (self) (toJSString val))- -foreign import javascript unsafe "$1[\"align\"]" js_getAlign ::-        HTMLParagraphElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLParagraphElement.align Mozilla HTMLParagraphElement.align documentation> -getAlign ::-         (MonadIO m, FromJSString result) =>-           HTMLParagraphElement -> m result-getAlign self = liftIO (fromJSString <$> (js_getAlign (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLParamElement.hs

@@ -1,87 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLParamElement-       (js_setName, setName, js_getName, getName, js_setType, setType,-        js_getType, getType, js_setValue, setValue, js_getValue, getValue,-        js_setValueType, setValueType, js_getValueType, getValueType,-        HTMLParamElement, castToHTMLParamElement, gTypeHTMLParamElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"name\"] = $2;" js_setName ::-        HTMLParamElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLParamElement.name Mozilla HTMLParamElement.name documentation> -setName ::-        (MonadIO m, ToJSString val) => HTMLParamElement -> val -> m ()-setName self val = liftIO (js_setName (self) (toJSString val))- -foreign import javascript unsafe "$1[\"name\"]" js_getName ::-        HTMLParamElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLParamElement.name Mozilla HTMLParamElement.name documentation> -getName ::-        (MonadIO m, FromJSString result) => HTMLParamElement -> m result-getName self = liftIO (fromJSString <$> (js_getName (self)))- -foreign import javascript unsafe "$1[\"type\"] = $2;" js_setType ::-        HTMLParamElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLParamElement.type Mozilla HTMLParamElement.type documentation> -setType ::-        (MonadIO m, ToJSString val) => HTMLParamElement -> val -> m ()-setType self val = liftIO (js_setType (self) (toJSString val))- -foreign import javascript unsafe "$1[\"type\"]" js_getType ::-        HTMLParamElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLParamElement.type Mozilla HTMLParamElement.type documentation> -getType ::-        (MonadIO m, FromJSString result) => HTMLParamElement -> m result-getType self = liftIO (fromJSString <$> (js_getType (self)))- -foreign import javascript unsafe "$1[\"value\"] = $2;" js_setValue-        :: HTMLParamElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLParamElement.value Mozilla HTMLParamElement.value documentation> -setValue ::-         (MonadIO m, ToJSString val) => HTMLParamElement -> val -> m ()-setValue self val = liftIO (js_setValue (self) (toJSString val))- -foreign import javascript unsafe "$1[\"value\"]" js_getValue ::-        HTMLParamElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLParamElement.value Mozilla HTMLParamElement.value documentation> -getValue ::-         (MonadIO m, FromJSString result) => HTMLParamElement -> m result-getValue self = liftIO (fromJSString <$> (js_getValue (self)))- -foreign import javascript unsafe "$1[\"valueType\"] = $2;"-        js_setValueType :: HTMLParamElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLParamElement.valueType Mozilla HTMLParamElement.valueType documentation> -setValueType ::-             (MonadIO m, ToJSString val) => HTMLParamElement -> val -> m ()-setValueType self val-  = liftIO (js_setValueType (self) (toJSString val))- -foreign import javascript unsafe "$1[\"valueType\"]"-        js_getValueType :: HTMLParamElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLParamElement.valueType Mozilla HTMLParamElement.valueType documentation> -getValueType ::-             (MonadIO m, FromJSString result) => HTMLParamElement -> m result-getValueType self-  = liftIO (fromJSString <$> (js_getValueType (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLPreElement.hs

@@ -1,48 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLPreElement-       (js_setWidth, setWidth, js_getWidth, getWidth, js_setWrap, setWrap,-        js_getWrap, getWrap, HTMLPreElement, castToHTMLPreElement,-        gTypeHTMLPreElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"width\"] = $2;" js_setWidth-        :: HTMLPreElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLPreElement.width Mozilla HTMLPreElement.width documentation> -setWidth :: (MonadIO m) => HTMLPreElement -> Int -> m ()-setWidth self val = liftIO (js_setWidth (self) val)- -foreign import javascript unsafe "$1[\"width\"]" js_getWidth ::-        HTMLPreElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLPreElement.width Mozilla HTMLPreElement.width documentation> -getWidth :: (MonadIO m) => HTMLPreElement -> m Int-getWidth self = liftIO (js_getWidth (self))- -foreign import javascript unsafe "$1[\"wrap\"] = $2;" js_setWrap ::-        HTMLPreElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLPreElement.wrap Mozilla HTMLPreElement.wrap documentation> -setWrap :: (MonadIO m) => HTMLPreElement -> Bool -> m ()-setWrap self val = liftIO (js_setWrap (self) val)- -foreign import javascript unsafe "($1[\"wrap\"] ? 1 : 0)"-        js_getWrap :: HTMLPreElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLPreElement.wrap Mozilla HTMLPreElement.wrap documentation> -getWrap :: (MonadIO m) => HTMLPreElement -> m Bool-getWrap self = liftIO (js_getWrap (self))

− src/GHCJS/DOM/JSFFI/Generated/HTMLProgressElement.hs

@@ -1,64 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLProgressElement-       (js_setValue, setValue, js_getValue, getValue, js_setMax, setMax,-        js_getMax, getMax, js_getPosition, getPosition, js_getLabels,-        getLabels, HTMLProgressElement, castToHTMLProgressElement,-        gTypeHTMLProgressElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"value\"] = $2;" js_setValue-        :: HTMLProgressElement -> Double -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLProgressElement.value Mozilla HTMLProgressElement.value documentation> -setValue :: (MonadIO m) => HTMLProgressElement -> Double -> m ()-setValue self val = liftIO (js_setValue (self) val)- -foreign import javascript unsafe "$1[\"value\"]" js_getValue ::-        HTMLProgressElement -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLProgressElement.value Mozilla HTMLProgressElement.value documentation> -getValue :: (MonadIO m) => HTMLProgressElement -> m Double-getValue self = liftIO (js_getValue (self))- -foreign import javascript unsafe "$1[\"max\"] = $2;" js_setMax ::-        HTMLProgressElement -> Double -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLProgressElement.max Mozilla HTMLProgressElement.max documentation> -setMax :: (MonadIO m) => HTMLProgressElement -> Double -> m ()-setMax self val = liftIO (js_setMax (self) val)- -foreign import javascript unsafe "$1[\"max\"]" js_getMax ::-        HTMLProgressElement -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLProgressElement.max Mozilla HTMLProgressElement.max documentation> -getMax :: (MonadIO m) => HTMLProgressElement -> m Double-getMax self = liftIO (js_getMax (self))- -foreign import javascript unsafe "$1[\"position\"]" js_getPosition-        :: HTMLProgressElement -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLProgressElement.position Mozilla HTMLProgressElement.position documentation> -getPosition :: (MonadIO m) => HTMLProgressElement -> m Double-getPosition self = liftIO (js_getPosition (self))- -foreign import javascript unsafe "$1[\"labels\"]" js_getLabels ::-        HTMLProgressElement -> IO (Nullable NodeList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLProgressElement.labels Mozilla HTMLProgressElement.labels documentation> -getLabels ::-          (MonadIO m) => HTMLProgressElement -> m (Maybe NodeList)-getLabels self = liftIO (nullableToMaybe <$> (js_getLabels (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLQuoteElement.hs

@@ -1,35 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLQuoteElement-       (js_setCite, setCite, js_getCite, getCite, HTMLQuoteElement,-        castToHTMLQuoteElement, gTypeHTMLQuoteElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"cite\"] = $2;" js_setCite ::-        HTMLQuoteElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLQuoteElement.cite Mozilla HTMLQuoteElement.cite documentation> -setCite ::-        (MonadIO m, ToJSString val) => HTMLQuoteElement -> val -> m ()-setCite self val = liftIO (js_setCite (self) (toJSString val))- -foreign import javascript unsafe "$1[\"cite\"]" js_getCite ::-        HTMLQuoteElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLQuoteElement.cite Mozilla HTMLQuoteElement.cite documentation> -getCite ::-        (MonadIO m, FromJSString result) => HTMLQuoteElement -> m result-getCite self = liftIO (fromJSString <$> (js_getCite (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLScriptElement.hs

@@ -1,188 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLScriptElement-       (js_setText, setText, js_getText, getText, js_setHtmlFor,-        setHtmlFor, js_getHtmlFor, getHtmlFor, js_setEvent, setEvent,-        js_getEvent, getEvent, js_setCharset, setCharset, js_getCharset,-        getCharset, js_setAsync, setAsync, js_getAsync, getAsync,-        js_setDefer, setDefer, js_getDefer, getDefer, js_setSrc, setSrc,-        js_getSrc, getSrc, js_setType, setType, js_getType, getType,-        js_setCrossOrigin, setCrossOrigin, js_getCrossOrigin,-        getCrossOrigin, js_setNonce, setNonce, js_getNonce, getNonce,-        HTMLScriptElement, castToHTMLScriptElement, gTypeHTMLScriptElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"text\"] = $2;" js_setText ::-        HTMLScriptElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLScriptElement.text Mozilla HTMLScriptElement.text documentation> -setText ::-        (MonadIO m, ToJSString val) =>-          HTMLScriptElement -> Maybe val -> m ()-setText self val = liftIO (js_setText (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"text\"]" js_getText ::-        HTMLScriptElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLScriptElement.text Mozilla HTMLScriptElement.text documentation> -getText ::-        (MonadIO m, FromJSString result) =>-          HTMLScriptElement -> m (Maybe result)-getText self = liftIO (fromMaybeJSString <$> (js_getText (self)))- -foreign import javascript unsafe "$1[\"htmlFor\"] = $2;"-        js_setHtmlFor :: HTMLScriptElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLScriptElement.htmlFor Mozilla HTMLScriptElement.htmlFor documentation> -setHtmlFor ::-           (MonadIO m, ToJSString val) => HTMLScriptElement -> val -> m ()-setHtmlFor self val-  = liftIO (js_setHtmlFor (self) (toJSString val))- -foreign import javascript unsafe "$1[\"htmlFor\"]" js_getHtmlFor ::-        HTMLScriptElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLScriptElement.htmlFor Mozilla HTMLScriptElement.htmlFor documentation> -getHtmlFor ::-           (MonadIO m, FromJSString result) => HTMLScriptElement -> m result-getHtmlFor self = liftIO (fromJSString <$> (js_getHtmlFor (self)))- -foreign import javascript unsafe "$1[\"event\"] = $2;" js_setEvent-        :: HTMLScriptElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLScriptElement.event Mozilla HTMLScriptElement.event documentation> -setEvent ::-         (MonadIO m, ToJSString val) => HTMLScriptElement -> val -> m ()-setEvent self val = liftIO (js_setEvent (self) (toJSString val))- -foreign import javascript unsafe "$1[\"event\"]" js_getEvent ::-        HTMLScriptElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLScriptElement.event Mozilla HTMLScriptElement.event documentation> -getEvent ::-         (MonadIO m, FromJSString result) => HTMLScriptElement -> m result-getEvent self = liftIO (fromJSString <$> (js_getEvent (self)))- -foreign import javascript unsafe "$1[\"charset\"] = $2;"-        js_setCharset :: HTMLScriptElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLScriptElement.charset Mozilla HTMLScriptElement.charset documentation> -setCharset ::-           (MonadIO m, ToJSString val) => HTMLScriptElement -> val -> m ()-setCharset self val-  = liftIO (js_setCharset (self) (toJSString val))- -foreign import javascript unsafe "$1[\"charset\"]" js_getCharset ::-        HTMLScriptElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLScriptElement.charset Mozilla HTMLScriptElement.charset documentation> -getCharset ::-           (MonadIO m, FromJSString result) => HTMLScriptElement -> m result-getCharset self = liftIO (fromJSString <$> (js_getCharset (self)))- -foreign import javascript unsafe "$1[\"async\"] = $2;" js_setAsync-        :: HTMLScriptElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLScriptElement.async Mozilla HTMLScriptElement.async documentation> -setAsync :: (MonadIO m) => HTMLScriptElement -> Bool -> m ()-setAsync self val = liftIO (js_setAsync (self) val)- -foreign import javascript unsafe "($1[\"async\"] ? 1 : 0)"-        js_getAsync :: HTMLScriptElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLScriptElement.async Mozilla HTMLScriptElement.async documentation> -getAsync :: (MonadIO m) => HTMLScriptElement -> m Bool-getAsync self = liftIO (js_getAsync (self))- -foreign import javascript unsafe "$1[\"defer\"] = $2;" js_setDefer-        :: HTMLScriptElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLScriptElement.defer Mozilla HTMLScriptElement.defer documentation> -setDefer :: (MonadIO m) => HTMLScriptElement -> Bool -> m ()-setDefer self val = liftIO (js_setDefer (self) val)- -foreign import javascript unsafe "($1[\"defer\"] ? 1 : 0)"-        js_getDefer :: HTMLScriptElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLScriptElement.defer Mozilla HTMLScriptElement.defer documentation> -getDefer :: (MonadIO m) => HTMLScriptElement -> m Bool-getDefer self = liftIO (js_getDefer (self))- -foreign import javascript unsafe "$1[\"src\"] = $2;" js_setSrc ::-        HTMLScriptElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLScriptElement.src Mozilla HTMLScriptElement.src documentation> -setSrc ::-       (MonadIO m, ToJSString val) => HTMLScriptElement -> val -> m ()-setSrc self val = liftIO (js_setSrc (self) (toJSString val))- -foreign import javascript unsafe "$1[\"src\"]" js_getSrc ::-        HTMLScriptElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLScriptElement.src Mozilla HTMLScriptElement.src documentation> -getSrc ::-       (MonadIO m, FromJSString result) => HTMLScriptElement -> m result-getSrc self = liftIO (fromJSString <$> (js_getSrc (self)))- -foreign import javascript unsafe "$1[\"type\"] = $2;" js_setType ::-        HTMLScriptElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLScriptElement.type Mozilla HTMLScriptElement.type documentation> -setType ::-        (MonadIO m, ToJSString val) => HTMLScriptElement -> val -> m ()-setType self val = liftIO (js_setType (self) (toJSString val))- -foreign import javascript unsafe "$1[\"type\"]" js_getType ::-        HTMLScriptElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLScriptElement.type Mozilla HTMLScriptElement.type documentation> -getType ::-        (MonadIO m, FromJSString result) => HTMLScriptElement -> m result-getType self = liftIO (fromJSString <$> (js_getType (self)))- -foreign import javascript unsafe "$1[\"crossOrigin\"] = $2;"-        js_setCrossOrigin :: HTMLScriptElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLScriptElement.crossOrigin Mozilla HTMLScriptElement.crossOrigin documentation> -setCrossOrigin ::-               (MonadIO m, ToJSString val) => HTMLScriptElement -> val -> m ()-setCrossOrigin self val-  = liftIO (js_setCrossOrigin (self) (toJSString val))- -foreign import javascript unsafe "$1[\"crossOrigin\"]"-        js_getCrossOrigin :: HTMLScriptElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLScriptElement.crossOrigin Mozilla HTMLScriptElement.crossOrigin documentation> -getCrossOrigin ::-               (MonadIO m, FromJSString result) => HTMLScriptElement -> m result-getCrossOrigin self-  = liftIO (fromJSString <$> (js_getCrossOrigin (self)))- -foreign import javascript unsafe "$1[\"nonce\"] = $2;" js_setNonce-        :: HTMLScriptElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLScriptElement.nonce Mozilla HTMLScriptElement.nonce documentation> -setNonce ::-         (MonadIO m, ToJSString val) => HTMLScriptElement -> val -> m ()-setNonce self val = liftIO (js_setNonce (self) (toJSString val))- -foreign import javascript unsafe "$1[\"nonce\"]" js_getNonce ::-        HTMLScriptElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLScriptElement.nonce Mozilla HTMLScriptElement.nonce documentation> -getNonce ::-         (MonadIO m, FromJSString result) => HTMLScriptElement -> m result-getNonce self = liftIO (fromJSString <$> (js_getNonce (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLSelectElement.hs

@@ -1,305 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLSelectElement-       (js_item, item, js_namedItem, namedItem, js_addBefore, addBefore,-        js_add, add, js_remove, remove, js_checkValidity, checkValidity,-        js_setCustomValidity, setCustomValidity, js_setAutofocus,-        setAutofocus, js_getAutofocus, getAutofocus, js_setDisabled,-        setDisabled, js_getDisabled, getDisabled, js_getForm, getForm,-        js_setMultiple, setMultiple, js_getMultiple, getMultiple,-        js_setName, setName, js_getName, getName, js_setRequired,-        setRequired, js_getRequired, getRequired, js_setSize, setSize,-        js_getSize, getSize, js_getType, getType, js_getOptions,-        getOptions, js_setLength, setLength, js_getLength, getLength,-        js_getSelectedOptions, getSelectedOptions, js_setSelectedIndex,-        setSelectedIndex, js_getSelectedIndex, getSelectedIndex,-        js_setValue, setValue, js_getValue, getValue, js_getWillValidate,-        getWillValidate, js_getValidity, getValidity,-        js_getValidationMessage, getValidationMessage, js_getLabels,-        getLabels, HTMLSelectElement, castToHTMLSelectElement,-        gTypeHTMLSelectElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"item\"]($2)" js_item ::-        HTMLSelectElement -> Word -> IO (Nullable Node)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.item Mozilla HTMLSelectElement.item documentation> -item :: (MonadIO m) => HTMLSelectElement -> Word -> m (Maybe Node)-item self index-  = liftIO (nullableToMaybe <$> (js_item (self) index))- -foreign import javascript unsafe "$1[\"namedItem\"]($2)"-        js_namedItem :: HTMLSelectElement -> JSString -> IO (Nullable Node)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.namedItem Mozilla HTMLSelectElement.namedItem documentation> -namedItem ::-          (MonadIO m, ToJSString name) =>-            HTMLSelectElement -> name -> m (Maybe Node)-namedItem self name-  = liftIO-      (nullableToMaybe <$> (js_namedItem (self) (toJSString name)))- -foreign import javascript unsafe "$1[\"add\"]($2, $3)" js_addBefore-        ::-        HTMLSelectElement ->-          Nullable HTMLElement -> Nullable HTMLElement -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.add Mozilla HTMLSelectElement.add documentation> -addBefore ::-          (MonadIO m, IsHTMLElement element, IsHTMLElement before) =>-            HTMLSelectElement -> Maybe element -> Maybe before -> m ()-addBefore self element before-  = liftIO-      (js_addBefore (self) (maybeToNullable (fmap toHTMLElement element))-         (maybeToNullable (fmap toHTMLElement before)))- -foreign import javascript unsafe "$1[\"add\"]($2, $3)" js_add ::-        HTMLSelectElement -> Nullable HTMLElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.add Mozilla HTMLSelectElement.add documentation> -add ::-    (MonadIO m, IsHTMLElement element) =>-      HTMLSelectElement -> Maybe element -> Int -> m ()-add self element index-  = liftIO-      (js_add (self) (maybeToNullable (fmap toHTMLElement element))-         index)- -foreign import javascript unsafe "$1[\"remove\"]()" js_remove ::-        HTMLSelectElement -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.remove Mozilla HTMLSelectElement.remove documentation> -remove :: (MonadIO m) => HTMLSelectElement -> m ()-remove self = liftIO (js_remove (self))- -foreign import javascript unsafe-        "($1[\"checkValidity\"]() ? 1 : 0)" js_checkValidity ::-        HTMLSelectElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.checkValidity Mozilla HTMLSelectElement.checkValidity documentation> -checkValidity :: (MonadIO m) => HTMLSelectElement -> m Bool-checkValidity self = liftIO (js_checkValidity (self))- -foreign import javascript unsafe "$1[\"setCustomValidity\"]($2)"-        js_setCustomValidity ::-        HTMLSelectElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.setCustomValidity Mozilla HTMLSelectElement.setCustomValidity documentation> -setCustomValidity ::-                  (MonadIO m, ToJSString error) =>-                    HTMLSelectElement -> Maybe error -> m ()-setCustomValidity self error-  = liftIO (js_setCustomValidity (self) (toMaybeJSString error))- -foreign import javascript unsafe "$1[\"autofocus\"] = $2;"-        js_setAutofocus :: HTMLSelectElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.autofocus Mozilla HTMLSelectElement.autofocus documentation> -setAutofocus :: (MonadIO m) => HTMLSelectElement -> Bool -> m ()-setAutofocus self val = liftIO (js_setAutofocus (self) val)- -foreign import javascript unsafe "($1[\"autofocus\"] ? 1 : 0)"-        js_getAutofocus :: HTMLSelectElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.autofocus Mozilla HTMLSelectElement.autofocus documentation> -getAutofocus :: (MonadIO m) => HTMLSelectElement -> m Bool-getAutofocus self = liftIO (js_getAutofocus (self))- -foreign import javascript unsafe "$1[\"disabled\"] = $2;"-        js_setDisabled :: HTMLSelectElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.disabled Mozilla HTMLSelectElement.disabled documentation> -setDisabled :: (MonadIO m) => HTMLSelectElement -> Bool -> m ()-setDisabled self val = liftIO (js_setDisabled (self) val)- -foreign import javascript unsafe "($1[\"disabled\"] ? 1 : 0)"-        js_getDisabled :: HTMLSelectElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.disabled Mozilla HTMLSelectElement.disabled documentation> -getDisabled :: (MonadIO m) => HTMLSelectElement -> m Bool-getDisabled self = liftIO (js_getDisabled (self))- -foreign import javascript unsafe "$1[\"form\"]" js_getForm ::-        HTMLSelectElement -> IO (Nullable HTMLFormElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.form Mozilla HTMLSelectElement.form documentation> -getForm ::-        (MonadIO m) => HTMLSelectElement -> m (Maybe HTMLFormElement)-getForm self = liftIO (nullableToMaybe <$> (js_getForm (self)))- -foreign import javascript unsafe "$1[\"multiple\"] = $2;"-        js_setMultiple :: HTMLSelectElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.multiple Mozilla HTMLSelectElement.multiple documentation> -setMultiple :: (MonadIO m) => HTMLSelectElement -> Bool -> m ()-setMultiple self val = liftIO (js_setMultiple (self) val)- -foreign import javascript unsafe "($1[\"multiple\"] ? 1 : 0)"-        js_getMultiple :: HTMLSelectElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.multiple Mozilla HTMLSelectElement.multiple documentation> -getMultiple :: (MonadIO m) => HTMLSelectElement -> m Bool-getMultiple self = liftIO (js_getMultiple (self))- -foreign import javascript unsafe "$1[\"name\"] = $2;" js_setName ::-        HTMLSelectElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.name Mozilla HTMLSelectElement.name documentation> -setName ::-        (MonadIO m, ToJSString val) => HTMLSelectElement -> val -> m ()-setName self val = liftIO (js_setName (self) (toJSString val))- -foreign import javascript unsafe "$1[\"name\"]" js_getName ::-        HTMLSelectElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.name Mozilla HTMLSelectElement.name documentation> -getName ::-        (MonadIO m, FromJSString result) => HTMLSelectElement -> m result-getName self = liftIO (fromJSString <$> (js_getName (self)))- -foreign import javascript unsafe "$1[\"required\"] = $2;"-        js_setRequired :: HTMLSelectElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.required Mozilla HTMLSelectElement.required documentation> -setRequired :: (MonadIO m) => HTMLSelectElement -> Bool -> m ()-setRequired self val = liftIO (js_setRequired (self) val)- -foreign import javascript unsafe "($1[\"required\"] ? 1 : 0)"-        js_getRequired :: HTMLSelectElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.required Mozilla HTMLSelectElement.required documentation> -getRequired :: (MonadIO m) => HTMLSelectElement -> m Bool-getRequired self = liftIO (js_getRequired (self))- -foreign import javascript unsafe "$1[\"size\"] = $2;" js_setSize ::-        HTMLSelectElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.size Mozilla HTMLSelectElement.size documentation> -setSize :: (MonadIO m) => HTMLSelectElement -> Int -> m ()-setSize self val = liftIO (js_setSize (self) val)- -foreign import javascript unsafe "$1[\"size\"]" js_getSize ::-        HTMLSelectElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.size Mozilla HTMLSelectElement.size documentation> -getSize :: (MonadIO m) => HTMLSelectElement -> m Int-getSize self = liftIO (js_getSize (self))- -foreign import javascript unsafe "$1[\"type\"]" js_getType ::-        HTMLSelectElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.type Mozilla HTMLSelectElement.type documentation> -getType ::-        (MonadIO m, FromJSString result) => HTMLSelectElement -> m result-getType self = liftIO (fromJSString <$> (js_getType (self)))- -foreign import javascript unsafe "$1[\"options\"]" js_getOptions ::-        HTMLSelectElement -> IO (Nullable HTMLOptionsCollection)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.options Mozilla HTMLSelectElement.options documentation> -getOptions ::-           (MonadIO m) => HTMLSelectElement -> m (Maybe HTMLOptionsCollection)-getOptions self-  = liftIO (nullableToMaybe <$> (js_getOptions (self)))- -foreign import javascript unsafe "$1[\"length\"] = $2;"-        js_setLength :: HTMLSelectElement -> Word -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.length Mozilla HTMLSelectElement.length documentation> -setLength :: (MonadIO m) => HTMLSelectElement -> Word -> m ()-setLength self val = liftIO (js_setLength (self) val)- -foreign import javascript unsafe "$1[\"length\"]" js_getLength ::-        HTMLSelectElement -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.length Mozilla HTMLSelectElement.length documentation> -getLength :: (MonadIO m) => HTMLSelectElement -> m Word-getLength self = liftIO (js_getLength (self))- -foreign import javascript unsafe "$1[\"selectedOptions\"]"-        js_getSelectedOptions ::-        HTMLSelectElement -> IO (Nullable HTMLCollection)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.selectedOptions Mozilla HTMLSelectElement.selectedOptions documentation> -getSelectedOptions ::-                   (MonadIO m) => HTMLSelectElement -> m (Maybe HTMLCollection)-getSelectedOptions self-  = liftIO (nullableToMaybe <$> (js_getSelectedOptions (self)))- -foreign import javascript unsafe "$1[\"selectedIndex\"] = $2;"-        js_setSelectedIndex :: HTMLSelectElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.selectedIndex Mozilla HTMLSelectElement.selectedIndex documentation> -setSelectedIndex :: (MonadIO m) => HTMLSelectElement -> Int -> m ()-setSelectedIndex self val = liftIO (js_setSelectedIndex (self) val)- -foreign import javascript unsafe "$1[\"selectedIndex\"]"-        js_getSelectedIndex :: HTMLSelectElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.selectedIndex Mozilla HTMLSelectElement.selectedIndex documentation> -getSelectedIndex :: (MonadIO m) => HTMLSelectElement -> m Int-getSelectedIndex self = liftIO (js_getSelectedIndex (self))- -foreign import javascript unsafe "$1[\"value\"] = $2;" js_setValue-        :: HTMLSelectElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.value Mozilla HTMLSelectElement.value documentation> -setValue ::-         (MonadIO m, ToJSString val) =>-           HTMLSelectElement -> Maybe val -> m ()-setValue self val-  = liftIO (js_setValue (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"value\"]" js_getValue ::-        HTMLSelectElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.value Mozilla HTMLSelectElement.value documentation> -getValue ::-         (MonadIO m, FromJSString result) =>-           HTMLSelectElement -> m (Maybe result)-getValue self = liftIO (fromMaybeJSString <$> (js_getValue (self)))- -foreign import javascript unsafe "($1[\"willValidate\"] ? 1 : 0)"-        js_getWillValidate :: HTMLSelectElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.willValidate Mozilla HTMLSelectElement.willValidate documentation> -getWillValidate :: (MonadIO m) => HTMLSelectElement -> m Bool-getWillValidate self = liftIO (js_getWillValidate (self))- -foreign import javascript unsafe "$1[\"validity\"]" js_getValidity-        :: HTMLSelectElement -> IO (Nullable ValidityState)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.validity Mozilla HTMLSelectElement.validity documentation> -getValidity ::-            (MonadIO m) => HTMLSelectElement -> m (Maybe ValidityState)-getValidity self-  = liftIO (nullableToMaybe <$> (js_getValidity (self)))- -foreign import javascript unsafe "$1[\"validationMessage\"]"-        js_getValidationMessage :: HTMLSelectElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.validationMessage Mozilla HTMLSelectElement.validationMessage documentation> -getValidationMessage ::-                     (MonadIO m, FromJSString result) => HTMLSelectElement -> m result-getValidationMessage self-  = liftIO (fromJSString <$> (js_getValidationMessage (self)))- -foreign import javascript unsafe "$1[\"labels\"]" js_getLabels ::-        HTMLSelectElement -> IO (Nullable NodeList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.labels Mozilla HTMLSelectElement.labels documentation> -getLabels :: (MonadIO m) => HTMLSelectElement -> m (Maybe NodeList)-getLabels self = liftIO (nullableToMaybe <$> (js_getLabels (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLSourceElement.hs

@@ -1,68 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLSourceElement-       (js_setSrc, setSrc, js_getSrc, getSrc, js_setType, setType,-        js_getType, getType, js_setMedia, setMedia, js_getMedia, getMedia,-        HTMLSourceElement, castToHTMLSourceElement, gTypeHTMLSourceElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"src\"] = $2;" js_setSrc ::-        HTMLSourceElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSourceElement.src Mozilla HTMLSourceElement.src documentation> -setSrc ::-       (MonadIO m, ToJSString val) => HTMLSourceElement -> val -> m ()-setSrc self val = liftIO (js_setSrc (self) (toJSString val))- -foreign import javascript unsafe "$1[\"src\"]" js_getSrc ::-        HTMLSourceElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSourceElement.src Mozilla HTMLSourceElement.src documentation> -getSrc ::-       (MonadIO m, FromJSString result) => HTMLSourceElement -> m result-getSrc self = liftIO (fromJSString <$> (js_getSrc (self)))- -foreign import javascript unsafe "$1[\"type\"] = $2;" js_setType ::-        HTMLSourceElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSourceElement.type Mozilla HTMLSourceElement.type documentation> -setType ::-        (MonadIO m, ToJSString val) => HTMLSourceElement -> val -> m ()-setType self val = liftIO (js_setType (self) (toJSString val))- -foreign import javascript unsafe "$1[\"type\"]" js_getType ::-        HTMLSourceElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSourceElement.type Mozilla HTMLSourceElement.type documentation> -getType ::-        (MonadIO m, FromJSString result) => HTMLSourceElement -> m result-getType self = liftIO (fromJSString <$> (js_getType (self)))- -foreign import javascript unsafe "$1[\"media\"] = $2;" js_setMedia-        :: HTMLSourceElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSourceElement.media Mozilla HTMLSourceElement.media documentation> -setMedia ::-         (MonadIO m, ToJSString val) => HTMLSourceElement -> val -> m ()-setMedia self val = liftIO (js_setMedia (self) (toJSString val))- -foreign import javascript unsafe "$1[\"media\"]" js_getMedia ::-        HTMLSourceElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSourceElement.media Mozilla HTMLSourceElement.media documentation> -getMedia ::-         (MonadIO m, FromJSString result) => HTMLSourceElement -> m result-getMedia self = liftIO (fromJSString <$> (js_getMedia (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLStyleElement.hs

@@ -1,74 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLStyleElement-       (js_setDisabled, setDisabled, js_getDisabled, getDisabled,-        js_setMedia, setMedia, js_getMedia, getMedia, js_setType, setType,-        js_getType, getType, js_getSheet, getSheet, HTMLStyleElement,-        castToHTMLStyleElement, gTypeHTMLStyleElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"disabled\"] = $2;"-        js_setDisabled :: HTMLStyleElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLStyleElement.disabled Mozilla HTMLStyleElement.disabled documentation> -setDisabled :: (MonadIO m) => HTMLStyleElement -> Bool -> m ()-setDisabled self val = liftIO (js_setDisabled (self) val)- -foreign import javascript unsafe "($1[\"disabled\"] ? 1 : 0)"-        js_getDisabled :: HTMLStyleElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLStyleElement.disabled Mozilla HTMLStyleElement.disabled documentation> -getDisabled :: (MonadIO m) => HTMLStyleElement -> m Bool-getDisabled self = liftIO (js_getDisabled (self))- -foreign import javascript unsafe "$1[\"media\"] = $2;" js_setMedia-        :: HTMLStyleElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLStyleElement.media Mozilla HTMLStyleElement.media documentation> -setMedia ::-         (MonadIO m, ToJSString val) => HTMLStyleElement -> val -> m ()-setMedia self val = liftIO (js_setMedia (self) (toJSString val))- -foreign import javascript unsafe "$1[\"media\"]" js_getMedia ::-        HTMLStyleElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLStyleElement.media Mozilla HTMLStyleElement.media documentation> -getMedia ::-         (MonadIO m, FromJSString result) => HTMLStyleElement -> m result-getMedia self = liftIO (fromJSString <$> (js_getMedia (self)))- -foreign import javascript unsafe "$1[\"type\"] = $2;" js_setType ::-        HTMLStyleElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLStyleElement.type Mozilla HTMLStyleElement.type documentation> -setType ::-        (MonadIO m, ToJSString val) => HTMLStyleElement -> val -> m ()-setType self val = liftIO (js_setType (self) (toJSString val))- -foreign import javascript unsafe "$1[\"type\"]" js_getType ::-        HTMLStyleElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLStyleElement.type Mozilla HTMLStyleElement.type documentation> -getType ::-        (MonadIO m, FromJSString result) => HTMLStyleElement -> m result-getType self = liftIO (fromJSString <$> (js_getType (self)))- -foreign import javascript unsafe "$1[\"sheet\"]" js_getSheet ::-        HTMLStyleElement -> IO (Nullable StyleSheet)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLStyleElement.sheet Mozilla HTMLStyleElement.sheet documentation> -getSheet :: (MonadIO m) => HTMLStyleElement -> m (Maybe StyleSheet)-getSheet self = liftIO (nullableToMaybe <$> (js_getSheet (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLTableCaptionElement.hs

@@ -1,38 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLTableCaptionElement-       (js_setAlign, setAlign, js_getAlign, getAlign,-        HTMLTableCaptionElement, castToHTMLTableCaptionElement,-        gTypeHTMLTableCaptionElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign-        :: HTMLTableCaptionElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCaptionElement.align Mozilla HTMLTableCaptionElement.align documentation> -setAlign ::-         (MonadIO m, ToJSString val) =>-           HTMLTableCaptionElement -> val -> m ()-setAlign self val = liftIO (js_setAlign (self) (toJSString val))- -foreign import javascript unsafe "$1[\"align\"]" js_getAlign ::-        HTMLTableCaptionElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCaptionElement.align Mozilla HTMLTableCaptionElement.align documentation> -getAlign ::-         (MonadIO m, FromJSString result) =>-           HTMLTableCaptionElement -> m result-getAlign self = liftIO (fromJSString <$> (js_getAlign (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLTableCellElement.hs

@@ -1,268 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLTableCellElement-       (js_getCellIndex, getCellIndex, js_setAbbr, setAbbr, js_getAbbr,-        getAbbr, js_setAlign, setAlign, js_getAlign, getAlign, js_setAxis,-        setAxis, js_getAxis, getAxis, js_setBgColor, setBgColor,-        js_getBgColor, getBgColor, js_setCh, setCh, js_getCh, getCh,-        js_setChOff, setChOff, js_getChOff, getChOff, js_setColSpan,-        setColSpan, js_getColSpan, getColSpan, js_setHeaders, setHeaders,-        js_getHeaders, getHeaders, js_setHeight, setHeight, js_getHeight,-        getHeight, js_setNoWrap, setNoWrap, js_getNoWrap, getNoWrap,-        js_setRowSpan, setRowSpan, js_getRowSpan, getRowSpan, js_setScope,-        setScope, js_getScope, getScope, js_setVAlign, setVAlign,-        js_getVAlign, getVAlign, js_setWidth, setWidth, js_getWidth,-        getWidth, HTMLTableCellElement, castToHTMLTableCellElement,-        gTypeHTMLTableCellElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"cellIndex\"]"-        js_getCellIndex :: HTMLTableCellElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.cellIndex Mozilla HTMLTableCellElement.cellIndex documentation> -getCellIndex :: (MonadIO m) => HTMLTableCellElement -> m Int-getCellIndex self = liftIO (js_getCellIndex (self))- -foreign import javascript unsafe "$1[\"abbr\"] = $2;" js_setAbbr ::-        HTMLTableCellElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.abbr Mozilla HTMLTableCellElement.abbr documentation> -setAbbr ::-        (MonadIO m, ToJSString val) => HTMLTableCellElement -> val -> m ()-setAbbr self val = liftIO (js_setAbbr (self) (toJSString val))- -foreign import javascript unsafe "$1[\"abbr\"]" js_getAbbr ::-        HTMLTableCellElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.abbr Mozilla HTMLTableCellElement.abbr documentation> -getAbbr ::-        (MonadIO m, FromJSString result) =>-          HTMLTableCellElement -> m result-getAbbr self = liftIO (fromJSString <$> (js_getAbbr (self)))- -foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign-        :: HTMLTableCellElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.align Mozilla HTMLTableCellElement.align documentation> -setAlign ::-         (MonadIO m, ToJSString val) => HTMLTableCellElement -> val -> m ()-setAlign self val = liftIO (js_setAlign (self) (toJSString val))- -foreign import javascript unsafe "$1[\"align\"]" js_getAlign ::-        HTMLTableCellElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.align Mozilla HTMLTableCellElement.align documentation> -getAlign ::-         (MonadIO m, FromJSString result) =>-           HTMLTableCellElement -> m result-getAlign self = liftIO (fromJSString <$> (js_getAlign (self)))- -foreign import javascript unsafe "$1[\"axis\"] = $2;" js_setAxis ::-        HTMLTableCellElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.axis Mozilla HTMLTableCellElement.axis documentation> -setAxis ::-        (MonadIO m, ToJSString val) => HTMLTableCellElement -> val -> m ()-setAxis self val = liftIO (js_setAxis (self) (toJSString val))- -foreign import javascript unsafe "$1[\"axis\"]" js_getAxis ::-        HTMLTableCellElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.axis Mozilla HTMLTableCellElement.axis documentation> -getAxis ::-        (MonadIO m, FromJSString result) =>-          HTMLTableCellElement -> m result-getAxis self = liftIO (fromJSString <$> (js_getAxis (self)))- -foreign import javascript unsafe "$1[\"bgColor\"] = $2;"-        js_setBgColor :: HTMLTableCellElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.bgColor Mozilla HTMLTableCellElement.bgColor documentation> -setBgColor ::-           (MonadIO m, ToJSString val) => HTMLTableCellElement -> val -> m ()-setBgColor self val-  = liftIO (js_setBgColor (self) (toJSString val))- -foreign import javascript unsafe "$1[\"bgColor\"]" js_getBgColor ::-        HTMLTableCellElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.bgColor Mozilla HTMLTableCellElement.bgColor documentation> -getBgColor ::-           (MonadIO m, FromJSString result) =>-             HTMLTableCellElement -> m result-getBgColor self = liftIO (fromJSString <$> (js_getBgColor (self)))- -foreign import javascript unsafe "$1[\"ch\"] = $2;" js_setCh ::-        HTMLTableCellElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.ch Mozilla HTMLTableCellElement.ch documentation> -setCh ::-      (MonadIO m, ToJSString val) => HTMLTableCellElement -> val -> m ()-setCh self val = liftIO (js_setCh (self) (toJSString val))- -foreign import javascript unsafe "$1[\"ch\"]" js_getCh ::-        HTMLTableCellElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.ch Mozilla HTMLTableCellElement.ch documentation> -getCh ::-      (MonadIO m, FromJSString result) =>-        HTMLTableCellElement -> m result-getCh self = liftIO (fromJSString <$> (js_getCh (self)))- -foreign import javascript unsafe "$1[\"chOff\"] = $2;" js_setChOff-        :: HTMLTableCellElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.chOff Mozilla HTMLTableCellElement.chOff documentation> -setChOff ::-         (MonadIO m, ToJSString val) => HTMLTableCellElement -> val -> m ()-setChOff self val = liftIO (js_setChOff (self) (toJSString val))- -foreign import javascript unsafe "$1[\"chOff\"]" js_getChOff ::-        HTMLTableCellElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.chOff Mozilla HTMLTableCellElement.chOff documentation> -getChOff ::-         (MonadIO m, FromJSString result) =>-           HTMLTableCellElement -> m result-getChOff self = liftIO (fromJSString <$> (js_getChOff (self)))- -foreign import javascript unsafe "$1[\"colSpan\"] = $2;"-        js_setColSpan :: HTMLTableCellElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.colSpan Mozilla HTMLTableCellElement.colSpan documentation> -setColSpan :: (MonadIO m) => HTMLTableCellElement -> Int -> m ()-setColSpan self val = liftIO (js_setColSpan (self) val)- -foreign import javascript unsafe "$1[\"colSpan\"]" js_getColSpan ::-        HTMLTableCellElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.colSpan Mozilla HTMLTableCellElement.colSpan documentation> -getColSpan :: (MonadIO m) => HTMLTableCellElement -> m Int-getColSpan self = liftIO (js_getColSpan (self))- -foreign import javascript unsafe "$1[\"headers\"] = $2;"-        js_setHeaders :: HTMLTableCellElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.headers Mozilla HTMLTableCellElement.headers documentation> -setHeaders ::-           (MonadIO m, ToJSString val) => HTMLTableCellElement -> val -> m ()-setHeaders self val-  = liftIO (js_setHeaders (self) (toJSString val))- -foreign import javascript unsafe "$1[\"headers\"]" js_getHeaders ::-        HTMLTableCellElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.headers Mozilla HTMLTableCellElement.headers documentation> -getHeaders ::-           (MonadIO m, FromJSString result) =>-             HTMLTableCellElement -> m result-getHeaders self = liftIO (fromJSString <$> (js_getHeaders (self)))- -foreign import javascript unsafe "$1[\"height\"] = $2;"-        js_setHeight :: HTMLTableCellElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.height Mozilla HTMLTableCellElement.height documentation> -setHeight ::-          (MonadIO m, ToJSString val) => HTMLTableCellElement -> val -> m ()-setHeight self val = liftIO (js_setHeight (self) (toJSString val))- -foreign import javascript unsafe "$1[\"height\"]" js_getHeight ::-        HTMLTableCellElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.height Mozilla HTMLTableCellElement.height documentation> -getHeight ::-          (MonadIO m, FromJSString result) =>-            HTMLTableCellElement -> m result-getHeight self = liftIO (fromJSString <$> (js_getHeight (self)))- -foreign import javascript unsafe "$1[\"noWrap\"] = $2;"-        js_setNoWrap :: HTMLTableCellElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.noWrap Mozilla HTMLTableCellElement.noWrap documentation> -setNoWrap :: (MonadIO m) => HTMLTableCellElement -> Bool -> m ()-setNoWrap self val = liftIO (js_setNoWrap (self) val)- -foreign import javascript unsafe "($1[\"noWrap\"] ? 1 : 0)"-        js_getNoWrap :: HTMLTableCellElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.noWrap Mozilla HTMLTableCellElement.noWrap documentation> -getNoWrap :: (MonadIO m) => HTMLTableCellElement -> m Bool-getNoWrap self = liftIO (js_getNoWrap (self))- -foreign import javascript unsafe "$1[\"rowSpan\"] = $2;"-        js_setRowSpan :: HTMLTableCellElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.rowSpan Mozilla HTMLTableCellElement.rowSpan documentation> -setRowSpan :: (MonadIO m) => HTMLTableCellElement -> Int -> m ()-setRowSpan self val = liftIO (js_setRowSpan (self) val)- -foreign import javascript unsafe "$1[\"rowSpan\"]" js_getRowSpan ::-        HTMLTableCellElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.rowSpan Mozilla HTMLTableCellElement.rowSpan documentation> -getRowSpan :: (MonadIO m) => HTMLTableCellElement -> m Int-getRowSpan self = liftIO (js_getRowSpan (self))- -foreign import javascript unsafe "$1[\"scope\"] = $2;" js_setScope-        :: HTMLTableCellElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.scope Mozilla HTMLTableCellElement.scope documentation> -setScope ::-         (MonadIO m, ToJSString val) => HTMLTableCellElement -> val -> m ()-setScope self val = liftIO (js_setScope (self) (toJSString val))- -foreign import javascript unsafe "$1[\"scope\"]" js_getScope ::-        HTMLTableCellElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.scope Mozilla HTMLTableCellElement.scope documentation> -getScope ::-         (MonadIO m, FromJSString result) =>-           HTMLTableCellElement -> m result-getScope self = liftIO (fromJSString <$> (js_getScope (self)))- -foreign import javascript unsafe "$1[\"vAlign\"] = $2;"-        js_setVAlign :: HTMLTableCellElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.vAlign Mozilla HTMLTableCellElement.vAlign documentation> -setVAlign ::-          (MonadIO m, ToJSString val) => HTMLTableCellElement -> val -> m ()-setVAlign self val = liftIO (js_setVAlign (self) (toJSString val))- -foreign import javascript unsafe "$1[\"vAlign\"]" js_getVAlign ::-        HTMLTableCellElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.vAlign Mozilla HTMLTableCellElement.vAlign documentation> -getVAlign ::-          (MonadIO m, FromJSString result) =>-            HTMLTableCellElement -> m result-getVAlign self = liftIO (fromJSString <$> (js_getVAlign (self)))- -foreign import javascript unsafe "$1[\"width\"] = $2;" js_setWidth-        :: HTMLTableCellElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.width Mozilla HTMLTableCellElement.width documentation> -setWidth ::-         (MonadIO m, ToJSString val) => HTMLTableCellElement -> val -> m ()-setWidth self val = liftIO (js_setWidth (self) (toJSString val))- -foreign import javascript unsafe "$1[\"width\"]" js_getWidth ::-        HTMLTableCellElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableCellElement.width Mozilla HTMLTableCellElement.width documentation> -getWidth ::-         (MonadIO m, FromJSString result) =>-           HTMLTableCellElement -> m result-getWidth self = liftIO (fromJSString <$> (js_getWidth (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLTableColElement.hs

@@ -1,117 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLTableColElement-       (js_setAlign, setAlign, js_getAlign, getAlign, js_setCh, setCh,-        js_getCh, getCh, js_setChOff, setChOff, js_getChOff, getChOff,-        js_setSpan, setSpan, js_getSpan, getSpan, js_setVAlign, setVAlign,-        js_getVAlign, getVAlign, js_setWidth, setWidth, js_getWidth,-        getWidth, HTMLTableColElement, castToHTMLTableColElement,-        gTypeHTMLTableColElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign-        :: HTMLTableColElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableColElement.align Mozilla HTMLTableColElement.align documentation> -setAlign ::-         (MonadIO m, ToJSString val) => HTMLTableColElement -> val -> m ()-setAlign self val = liftIO (js_setAlign (self) (toJSString val))- -foreign import javascript unsafe "$1[\"align\"]" js_getAlign ::-        HTMLTableColElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableColElement.align Mozilla HTMLTableColElement.align documentation> -getAlign ::-         (MonadIO m, FromJSString result) => HTMLTableColElement -> m result-getAlign self = liftIO (fromJSString <$> (js_getAlign (self)))- -foreign import javascript unsafe "$1[\"ch\"] = $2;" js_setCh ::-        HTMLTableColElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableColElement.ch Mozilla HTMLTableColElement.ch documentation> -setCh ::-      (MonadIO m, ToJSString val) => HTMLTableColElement -> val -> m ()-setCh self val = liftIO (js_setCh (self) (toJSString val))- -foreign import javascript unsafe "$1[\"ch\"]" js_getCh ::-        HTMLTableColElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableColElement.ch Mozilla HTMLTableColElement.ch documentation> -getCh ::-      (MonadIO m, FromJSString result) => HTMLTableColElement -> m result-getCh self = liftIO (fromJSString <$> (js_getCh (self)))- -foreign import javascript unsafe "$1[\"chOff\"] = $2;" js_setChOff-        :: HTMLTableColElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableColElement.chOff Mozilla HTMLTableColElement.chOff documentation> -setChOff ::-         (MonadIO m, ToJSString val) => HTMLTableColElement -> val -> m ()-setChOff self val = liftIO (js_setChOff (self) (toJSString val))- -foreign import javascript unsafe "$1[\"chOff\"]" js_getChOff ::-        HTMLTableColElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableColElement.chOff Mozilla HTMLTableColElement.chOff documentation> -getChOff ::-         (MonadIO m, FromJSString result) => HTMLTableColElement -> m result-getChOff self = liftIO (fromJSString <$> (js_getChOff (self)))- -foreign import javascript unsafe "$1[\"span\"] = $2;" js_setSpan ::-        HTMLTableColElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableColElement.span Mozilla HTMLTableColElement.span documentation> -setSpan :: (MonadIO m) => HTMLTableColElement -> Int -> m ()-setSpan self val = liftIO (js_setSpan (self) val)- -foreign import javascript unsafe "$1[\"span\"]" js_getSpan ::-        HTMLTableColElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableColElement.span Mozilla HTMLTableColElement.span documentation> -getSpan :: (MonadIO m) => HTMLTableColElement -> m Int-getSpan self = liftIO (js_getSpan (self))- -foreign import javascript unsafe "$1[\"vAlign\"] = $2;"-        js_setVAlign :: HTMLTableColElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableColElement.vAlign Mozilla HTMLTableColElement.vAlign documentation> -setVAlign ::-          (MonadIO m, ToJSString val) => HTMLTableColElement -> val -> m ()-setVAlign self val = liftIO (js_setVAlign (self) (toJSString val))- -foreign import javascript unsafe "$1[\"vAlign\"]" js_getVAlign ::-        HTMLTableColElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableColElement.vAlign Mozilla HTMLTableColElement.vAlign documentation> -getVAlign ::-          (MonadIO m, FromJSString result) => HTMLTableColElement -> m result-getVAlign self = liftIO (fromJSString <$> (js_getVAlign (self)))- -foreign import javascript unsafe "$1[\"width\"] = $2;" js_setWidth-        :: HTMLTableColElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableColElement.width Mozilla HTMLTableColElement.width documentation> -setWidth ::-         (MonadIO m, ToJSString val) => HTMLTableColElement -> val -> m ()-setWidth self val = liftIO (js_setWidth (self) (toJSString val))- -foreign import javascript unsafe "$1[\"width\"]" js_getWidth ::-        HTMLTableColElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableColElement.width Mozilla HTMLTableColElement.width documentation> -getWidth ::-         (MonadIO m, FromJSString result) => HTMLTableColElement -> m result-getWidth self = liftIO (fromJSString <$> (js_getWidth (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLTableElement.hs

@@ -1,334 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLTableElement-       (js_createTHead, createTHead, js_deleteTHead, deleteTHead,-        js_createTFoot, createTFoot, js_deleteTFoot, deleteTFoot,-        js_createTBody, createTBody, js_createCaption, createCaption,-        js_deleteCaption, deleteCaption, js_insertRow, insertRow,-        js_deleteRow, deleteRow, js_setCaption, setCaption, js_getCaption,-        getCaption, js_setTHead, setTHead, js_getTHead, getTHead,-        js_setTFoot, setTFoot, js_getTFoot, getTFoot, js_getRows, getRows,-        js_getTBodies, getTBodies, js_setAlign, setAlign, js_getAlign,-        getAlign, js_setBgColor, setBgColor, js_getBgColor, getBgColor,-        js_setBorder, setBorder, js_getBorder, getBorder,-        js_setCellPadding, setCellPadding, js_getCellPadding,-        getCellPadding, js_setCellSpacing, setCellSpacing,-        js_getCellSpacing, getCellSpacing, js_setFrame, setFrame,-        js_getFrame, getFrame, js_setRules, setRules, js_getRules,-        getRules, js_setSummary, setSummary, js_getSummary, getSummary,-        js_setWidth, setWidth, js_getWidth, getWidth, HTMLTableElement,-        castToHTMLTableElement, gTypeHTMLTableElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"createTHead\"]()"-        js_createTHead :: HTMLTableElement -> IO (Nullable HTMLElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.createTHead Mozilla HTMLTableElement.createTHead documentation> -createTHead ::-            (MonadIO m) => HTMLTableElement -> m (Maybe HTMLElement)-createTHead self-  = liftIO (nullableToMaybe <$> (js_createTHead (self)))- -foreign import javascript unsafe "$1[\"deleteTHead\"]()"-        js_deleteTHead :: HTMLTableElement -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.deleteTHead Mozilla HTMLTableElement.deleteTHead documentation> -deleteTHead :: (MonadIO m) => HTMLTableElement -> m ()-deleteTHead self = liftIO (js_deleteTHead (self))- -foreign import javascript unsafe "$1[\"createTFoot\"]()"-        js_createTFoot :: HTMLTableElement -> IO (Nullable HTMLElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.createTFoot Mozilla HTMLTableElement.createTFoot documentation> -createTFoot ::-            (MonadIO m) => HTMLTableElement -> m (Maybe HTMLElement)-createTFoot self-  = liftIO (nullableToMaybe <$> (js_createTFoot (self)))- -foreign import javascript unsafe "$1[\"deleteTFoot\"]()"-        js_deleteTFoot :: HTMLTableElement -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.deleteTFoot Mozilla HTMLTableElement.deleteTFoot documentation> -deleteTFoot :: (MonadIO m) => HTMLTableElement -> m ()-deleteTFoot self = liftIO (js_deleteTFoot (self))- -foreign import javascript unsafe "$1[\"createTBody\"]()"-        js_createTBody :: HTMLTableElement -> IO (Nullable HTMLElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.createTBody Mozilla HTMLTableElement.createTBody documentation> -createTBody ::-            (MonadIO m) => HTMLTableElement -> m (Maybe HTMLElement)-createTBody self-  = liftIO (nullableToMaybe <$> (js_createTBody (self)))- -foreign import javascript unsafe "$1[\"createCaption\"]()"-        js_createCaption :: HTMLTableElement -> IO (Nullable HTMLElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.createCaption Mozilla HTMLTableElement.createCaption documentation> -createCaption ::-              (MonadIO m) => HTMLTableElement -> m (Maybe HTMLElement)-createCaption self-  = liftIO (nullableToMaybe <$> (js_createCaption (self)))- -foreign import javascript unsafe "$1[\"deleteCaption\"]()"-        js_deleteCaption :: HTMLTableElement -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.deleteCaption Mozilla HTMLTableElement.deleteCaption documentation> -deleteCaption :: (MonadIO m) => HTMLTableElement -> m ()-deleteCaption self = liftIO (js_deleteCaption (self))- -foreign import javascript unsafe "$1[\"insertRow\"]($2)"-        js_insertRow ::-        HTMLTableElement -> Int -> IO (Nullable HTMLElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.insertRow Mozilla HTMLTableElement.insertRow documentation> -insertRow ::-          (MonadIO m) => HTMLTableElement -> Int -> m (Maybe HTMLElement)-insertRow self index-  = liftIO (nullableToMaybe <$> (js_insertRow (self) index))- -foreign import javascript unsafe "$1[\"deleteRow\"]($2)"-        js_deleteRow :: HTMLTableElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.deleteRow Mozilla HTMLTableElement.deleteRow documentation> -deleteRow :: (MonadIO m) => HTMLTableElement -> Int -> m ()-deleteRow self index = liftIO (js_deleteRow (self) index)- -foreign import javascript unsafe "$1[\"caption\"] = $2;"-        js_setCaption ::-        HTMLTableElement -> Nullable HTMLTableCaptionElement -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.caption Mozilla HTMLTableElement.caption documentation> -setCaption ::-           (MonadIO m) =>-             HTMLTableElement -> Maybe HTMLTableCaptionElement -> m ()-setCaption self val-  = liftIO (js_setCaption (self) (maybeToNullable val))- -foreign import javascript unsafe "$1[\"caption\"]" js_getCaption ::-        HTMLTableElement -> IO (Nullable HTMLTableCaptionElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.caption Mozilla HTMLTableElement.caption documentation> -getCaption ::-           (MonadIO m) =>-             HTMLTableElement -> m (Maybe HTMLTableCaptionElement)-getCaption self-  = liftIO (nullableToMaybe <$> (js_getCaption (self)))- -foreign import javascript unsafe "$1[\"tHead\"] = $2;" js_setTHead-        :: HTMLTableElement -> Nullable HTMLTableSectionElement -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.tHead Mozilla HTMLTableElement.tHead documentation> -setTHead ::-         (MonadIO m) =>-           HTMLTableElement -> Maybe HTMLTableSectionElement -> m ()-setTHead self val-  = liftIO (js_setTHead (self) (maybeToNullable val))- -foreign import javascript unsafe "$1[\"tHead\"]" js_getTHead ::-        HTMLTableElement -> IO (Nullable HTMLTableSectionElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.tHead Mozilla HTMLTableElement.tHead documentation> -getTHead ::-         (MonadIO m) =>-           HTMLTableElement -> m (Maybe HTMLTableSectionElement)-getTHead self = liftIO (nullableToMaybe <$> (js_getTHead (self)))- -foreign import javascript unsafe "$1[\"tFoot\"] = $2;" js_setTFoot-        :: HTMLTableElement -> Nullable HTMLTableSectionElement -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.tFoot Mozilla HTMLTableElement.tFoot documentation> -setTFoot ::-         (MonadIO m) =>-           HTMLTableElement -> Maybe HTMLTableSectionElement -> m ()-setTFoot self val-  = liftIO (js_setTFoot (self) (maybeToNullable val))- -foreign import javascript unsafe "$1[\"tFoot\"]" js_getTFoot ::-        HTMLTableElement -> IO (Nullable HTMLTableSectionElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.tFoot Mozilla HTMLTableElement.tFoot documentation> -getTFoot ::-         (MonadIO m) =>-           HTMLTableElement -> m (Maybe HTMLTableSectionElement)-getTFoot self = liftIO (nullableToMaybe <$> (js_getTFoot (self)))- -foreign import javascript unsafe "$1[\"rows\"]" js_getRows ::-        HTMLTableElement -> IO (Nullable HTMLCollection)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.rows Mozilla HTMLTableElement.rows documentation> -getRows ::-        (MonadIO m) => HTMLTableElement -> m (Maybe HTMLCollection)-getRows self = liftIO (nullableToMaybe <$> (js_getRows (self)))- -foreign import javascript unsafe "$1[\"tBodies\"]" js_getTBodies ::-        HTMLTableElement -> IO (Nullable HTMLCollection)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.tBodies Mozilla HTMLTableElement.tBodies documentation> -getTBodies ::-           (MonadIO m) => HTMLTableElement -> m (Maybe HTMLCollection)-getTBodies self-  = liftIO (nullableToMaybe <$> (js_getTBodies (self)))- -foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign-        :: HTMLTableElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.align Mozilla HTMLTableElement.align documentation> -setAlign ::-         (MonadIO m, ToJSString val) => HTMLTableElement -> val -> m ()-setAlign self val = liftIO (js_setAlign (self) (toJSString val))- -foreign import javascript unsafe "$1[\"align\"]" js_getAlign ::-        HTMLTableElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.align Mozilla HTMLTableElement.align documentation> -getAlign ::-         (MonadIO m, FromJSString result) => HTMLTableElement -> m result-getAlign self = liftIO (fromJSString <$> (js_getAlign (self)))- -foreign import javascript unsafe "$1[\"bgColor\"] = $2;"-        js_setBgColor :: HTMLTableElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.bgColor Mozilla HTMLTableElement.bgColor documentation> -setBgColor ::-           (MonadIO m, ToJSString val) => HTMLTableElement -> val -> m ()-setBgColor self val-  = liftIO (js_setBgColor (self) (toJSString val))- -foreign import javascript unsafe "$1[\"bgColor\"]" js_getBgColor ::-        HTMLTableElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.bgColor Mozilla HTMLTableElement.bgColor documentation> -getBgColor ::-           (MonadIO m, FromJSString result) => HTMLTableElement -> m result-getBgColor self = liftIO (fromJSString <$> (js_getBgColor (self)))- -foreign import javascript unsafe "$1[\"border\"] = $2;"-        js_setBorder :: HTMLTableElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.border Mozilla HTMLTableElement.border documentation> -setBorder ::-          (MonadIO m, ToJSString val) => HTMLTableElement -> val -> m ()-setBorder self val = liftIO (js_setBorder (self) (toJSString val))- -foreign import javascript unsafe "$1[\"border\"]" js_getBorder ::-        HTMLTableElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.border Mozilla HTMLTableElement.border documentation> -getBorder ::-          (MonadIO m, FromJSString result) => HTMLTableElement -> m result-getBorder self = liftIO (fromJSString <$> (js_getBorder (self)))- -foreign import javascript unsafe "$1[\"cellPadding\"] = $2;"-        js_setCellPadding :: HTMLTableElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.cellPadding Mozilla HTMLTableElement.cellPadding documentation> -setCellPadding ::-               (MonadIO m, ToJSString val) => HTMLTableElement -> val -> m ()-setCellPadding self val-  = liftIO (js_setCellPadding (self) (toJSString val))- -foreign import javascript unsafe "$1[\"cellPadding\"]"-        js_getCellPadding :: HTMLTableElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.cellPadding Mozilla HTMLTableElement.cellPadding documentation> -getCellPadding ::-               (MonadIO m, FromJSString result) => HTMLTableElement -> m result-getCellPadding self-  = liftIO (fromJSString <$> (js_getCellPadding (self)))- -foreign import javascript unsafe "$1[\"cellSpacing\"] = $2;"-        js_setCellSpacing :: HTMLTableElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.cellSpacing Mozilla HTMLTableElement.cellSpacing documentation> -setCellSpacing ::-               (MonadIO m, ToJSString val) => HTMLTableElement -> val -> m ()-setCellSpacing self val-  = liftIO (js_setCellSpacing (self) (toJSString val))- -foreign import javascript unsafe "$1[\"cellSpacing\"]"-        js_getCellSpacing :: HTMLTableElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.cellSpacing Mozilla HTMLTableElement.cellSpacing documentation> -getCellSpacing ::-               (MonadIO m, FromJSString result) => HTMLTableElement -> m result-getCellSpacing self-  = liftIO (fromJSString <$> (js_getCellSpacing (self)))- -foreign import javascript unsafe "$1[\"frame\"] = $2;" js_setFrame-        :: HTMLTableElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.frame Mozilla HTMLTableElement.frame documentation> -setFrame ::-         (MonadIO m, ToJSString val) => HTMLTableElement -> val -> m ()-setFrame self val = liftIO (js_setFrame (self) (toJSString val))- -foreign import javascript unsafe "$1[\"frame\"]" js_getFrame ::-        HTMLTableElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.frame Mozilla HTMLTableElement.frame documentation> -getFrame ::-         (MonadIO m, FromJSString result) => HTMLTableElement -> m result-getFrame self = liftIO (fromJSString <$> (js_getFrame (self)))- -foreign import javascript unsafe "$1[\"rules\"] = $2;" js_setRules-        :: HTMLTableElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.rules Mozilla HTMLTableElement.rules documentation> -setRules ::-         (MonadIO m, ToJSString val) => HTMLTableElement -> val -> m ()-setRules self val = liftIO (js_setRules (self) (toJSString val))- -foreign import javascript unsafe "$1[\"rules\"]" js_getRules ::-        HTMLTableElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.rules Mozilla HTMLTableElement.rules documentation> -getRules ::-         (MonadIO m, FromJSString result) => HTMLTableElement -> m result-getRules self = liftIO (fromJSString <$> (js_getRules (self)))- -foreign import javascript unsafe "$1[\"summary\"] = $2;"-        js_setSummary :: HTMLTableElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.summary Mozilla HTMLTableElement.summary documentation> -setSummary ::-           (MonadIO m, ToJSString val) => HTMLTableElement -> val -> m ()-setSummary self val-  = liftIO (js_setSummary (self) (toJSString val))- -foreign import javascript unsafe "$1[\"summary\"]" js_getSummary ::-        HTMLTableElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.summary Mozilla HTMLTableElement.summary documentation> -getSummary ::-           (MonadIO m, FromJSString result) => HTMLTableElement -> m result-getSummary self = liftIO (fromJSString <$> (js_getSummary (self)))- -foreign import javascript unsafe "$1[\"width\"] = $2;" js_setWidth-        :: HTMLTableElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.width Mozilla HTMLTableElement.width documentation> -setWidth ::-         (MonadIO m, ToJSString val) => HTMLTableElement -> val -> m ()-setWidth self val = liftIO (js_setWidth (self) (toJSString val))- -foreign import javascript unsafe "$1[\"width\"]" js_getWidth ::-        HTMLTableElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.width Mozilla HTMLTableElement.width documentation> -getWidth ::-         (MonadIO m, FromJSString result) => HTMLTableElement -> m result-getWidth self = liftIO (fromJSString <$> (js_getWidth (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLTableRowElement.hs

@@ -1,145 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLTableRowElement-       (js_insertCell, insertCell, js_deleteCell, deleteCell,-        js_getRowIndex, getRowIndex, js_getSectionRowIndex,-        getSectionRowIndex, js_getCells, getCells, js_setAlign, setAlign,-        js_getAlign, getAlign, js_setBgColor, setBgColor, js_getBgColor,-        getBgColor, js_setCh, setCh, js_getCh, getCh, js_setChOff,-        setChOff, js_getChOff, getChOff, js_setVAlign, setVAlign,-        js_getVAlign, getVAlign, HTMLTableRowElement,-        castToHTMLTableRowElement, gTypeHTMLTableRowElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"insertCell\"]($2)"-        js_insertCell ::-        HTMLTableRowElement -> Int -> IO (Nullable HTMLElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableRowElement.insertCell Mozilla HTMLTableRowElement.insertCell documentation> -insertCell ::-           (MonadIO m) => HTMLTableRowElement -> Int -> m (Maybe HTMLElement)-insertCell self index-  = liftIO (nullableToMaybe <$> (js_insertCell (self) index))- -foreign import javascript unsafe "$1[\"deleteCell\"]($2)"-        js_deleteCell :: HTMLTableRowElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableRowElement.deleteCell Mozilla HTMLTableRowElement.deleteCell documentation> -deleteCell :: (MonadIO m) => HTMLTableRowElement -> Int -> m ()-deleteCell self index = liftIO (js_deleteCell (self) index)- -foreign import javascript unsafe "$1[\"rowIndex\"]" js_getRowIndex-        :: HTMLTableRowElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableRowElement.rowIndex Mozilla HTMLTableRowElement.rowIndex documentation> -getRowIndex :: (MonadIO m) => HTMLTableRowElement -> m Int-getRowIndex self = liftIO (js_getRowIndex (self))- -foreign import javascript unsafe "$1[\"sectionRowIndex\"]"-        js_getSectionRowIndex :: HTMLTableRowElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableRowElement.sectionRowIndex Mozilla HTMLTableRowElement.sectionRowIndex documentation> -getSectionRowIndex :: (MonadIO m) => HTMLTableRowElement -> m Int-getSectionRowIndex self = liftIO (js_getSectionRowIndex (self))- -foreign import javascript unsafe "$1[\"cells\"]" js_getCells ::-        HTMLTableRowElement -> IO (Nullable HTMLCollection)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableRowElement.cells Mozilla HTMLTableRowElement.cells documentation> -getCells ::-         (MonadIO m) => HTMLTableRowElement -> m (Maybe HTMLCollection)-getCells self = liftIO (nullableToMaybe <$> (js_getCells (self)))- -foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign-        :: HTMLTableRowElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableRowElement.align Mozilla HTMLTableRowElement.align documentation> -setAlign ::-         (MonadIO m, ToJSString val) => HTMLTableRowElement -> val -> m ()-setAlign self val = liftIO (js_setAlign (self) (toJSString val))- -foreign import javascript unsafe "$1[\"align\"]" js_getAlign ::-        HTMLTableRowElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableRowElement.align Mozilla HTMLTableRowElement.align documentation> -getAlign ::-         (MonadIO m, FromJSString result) => HTMLTableRowElement -> m result-getAlign self = liftIO (fromJSString <$> (js_getAlign (self)))- -foreign import javascript unsafe "$1[\"bgColor\"] = $2;"-        js_setBgColor :: HTMLTableRowElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableRowElement.bgColor Mozilla HTMLTableRowElement.bgColor documentation> -setBgColor ::-           (MonadIO m, ToJSString val) => HTMLTableRowElement -> val -> m ()-setBgColor self val-  = liftIO (js_setBgColor (self) (toJSString val))- -foreign import javascript unsafe "$1[\"bgColor\"]" js_getBgColor ::-        HTMLTableRowElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableRowElement.bgColor Mozilla HTMLTableRowElement.bgColor documentation> -getBgColor ::-           (MonadIO m, FromJSString result) => HTMLTableRowElement -> m result-getBgColor self = liftIO (fromJSString <$> (js_getBgColor (self)))- -foreign import javascript unsafe "$1[\"ch\"] = $2;" js_setCh ::-        HTMLTableRowElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableRowElement.ch Mozilla HTMLTableRowElement.ch documentation> -setCh ::-      (MonadIO m, ToJSString val) => HTMLTableRowElement -> val -> m ()-setCh self val = liftIO (js_setCh (self) (toJSString val))- -foreign import javascript unsafe "$1[\"ch\"]" js_getCh ::-        HTMLTableRowElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableRowElement.ch Mozilla HTMLTableRowElement.ch documentation> -getCh ::-      (MonadIO m, FromJSString result) => HTMLTableRowElement -> m result-getCh self = liftIO (fromJSString <$> (js_getCh (self)))- -foreign import javascript unsafe "$1[\"chOff\"] = $2;" js_setChOff-        :: HTMLTableRowElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableRowElement.chOff Mozilla HTMLTableRowElement.chOff documentation> -setChOff ::-         (MonadIO m, ToJSString val) => HTMLTableRowElement -> val -> m ()-setChOff self val = liftIO (js_setChOff (self) (toJSString val))- -foreign import javascript unsafe "$1[\"chOff\"]" js_getChOff ::-        HTMLTableRowElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableRowElement.chOff Mozilla HTMLTableRowElement.chOff documentation> -getChOff ::-         (MonadIO m, FromJSString result) => HTMLTableRowElement -> m result-getChOff self = liftIO (fromJSString <$> (js_getChOff (self)))- -foreign import javascript unsafe "$1[\"vAlign\"] = $2;"-        js_setVAlign :: HTMLTableRowElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableRowElement.vAlign Mozilla HTMLTableRowElement.vAlign documentation> -setVAlign ::-          (MonadIO m, ToJSString val) => HTMLTableRowElement -> val -> m ()-setVAlign self val = liftIO (js_setVAlign (self) (toJSString val))- -foreign import javascript unsafe "$1[\"vAlign\"]" js_getVAlign ::-        HTMLTableRowElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableRowElement.vAlign Mozilla HTMLTableRowElement.vAlign documentation> -getVAlign ::-          (MonadIO m, FromJSString result) => HTMLTableRowElement -> m result-getVAlign self = liftIO (fromJSString <$> (js_getVAlign (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLTableSectionElement.hs

@@ -1,121 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLTableSectionElement-       (js_insertRow, insertRow, js_deleteRow, deleteRow, js_setAlign,-        setAlign, js_getAlign, getAlign, js_setCh, setCh, js_getCh, getCh,-        js_setChOff, setChOff, js_getChOff, getChOff, js_setVAlign,-        setVAlign, js_getVAlign, getVAlign, js_getRows, getRows,-        HTMLTableSectionElement, castToHTMLTableSectionElement,-        gTypeHTMLTableSectionElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"insertRow\"]($2)"-        js_insertRow ::-        HTMLTableSectionElement -> Int -> IO (Nullable HTMLElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableSectionElement.insertRow Mozilla HTMLTableSectionElement.insertRow documentation> -insertRow ::-          (MonadIO m) =>-            HTMLTableSectionElement -> Int -> m (Maybe HTMLElement)-insertRow self index-  = liftIO (nullableToMaybe <$> (js_insertRow (self) index))- -foreign import javascript unsafe "$1[\"deleteRow\"]($2)"-        js_deleteRow :: HTMLTableSectionElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableSectionElement.deleteRow Mozilla HTMLTableSectionElement.deleteRow documentation> -deleteRow :: (MonadIO m) => HTMLTableSectionElement -> Int -> m ()-deleteRow self index = liftIO (js_deleteRow (self) index)- -foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign-        :: HTMLTableSectionElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableSectionElement.align Mozilla HTMLTableSectionElement.align documentation> -setAlign ::-         (MonadIO m, ToJSString val) =>-           HTMLTableSectionElement -> val -> m ()-setAlign self val = liftIO (js_setAlign (self) (toJSString val))- -foreign import javascript unsafe "$1[\"align\"]" js_getAlign ::-        HTMLTableSectionElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableSectionElement.align Mozilla HTMLTableSectionElement.align documentation> -getAlign ::-         (MonadIO m, FromJSString result) =>-           HTMLTableSectionElement -> m result-getAlign self = liftIO (fromJSString <$> (js_getAlign (self)))- -foreign import javascript unsafe "$1[\"ch\"] = $2;" js_setCh ::-        HTMLTableSectionElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableSectionElement.ch Mozilla HTMLTableSectionElement.ch documentation> -setCh ::-      (MonadIO m, ToJSString val) =>-        HTMLTableSectionElement -> val -> m ()-setCh self val = liftIO (js_setCh (self) (toJSString val))- -foreign import javascript unsafe "$1[\"ch\"]" js_getCh ::-        HTMLTableSectionElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableSectionElement.ch Mozilla HTMLTableSectionElement.ch documentation> -getCh ::-      (MonadIO m, FromJSString result) =>-        HTMLTableSectionElement -> m result-getCh self = liftIO (fromJSString <$> (js_getCh (self)))- -foreign import javascript unsafe "$1[\"chOff\"] = $2;" js_setChOff-        :: HTMLTableSectionElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableSectionElement.chOff Mozilla HTMLTableSectionElement.chOff documentation> -setChOff ::-         (MonadIO m, ToJSString val) =>-           HTMLTableSectionElement -> val -> m ()-setChOff self val = liftIO (js_setChOff (self) (toJSString val))- -foreign import javascript unsafe "$1[\"chOff\"]" js_getChOff ::-        HTMLTableSectionElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableSectionElement.chOff Mozilla HTMLTableSectionElement.chOff documentation> -getChOff ::-         (MonadIO m, FromJSString result) =>-           HTMLTableSectionElement -> m result-getChOff self = liftIO (fromJSString <$> (js_getChOff (self)))- -foreign import javascript unsafe "$1[\"vAlign\"] = $2;"-        js_setVAlign :: HTMLTableSectionElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableSectionElement.vAlign Mozilla HTMLTableSectionElement.vAlign documentation> -setVAlign ::-          (MonadIO m, ToJSString val) =>-            HTMLTableSectionElement -> val -> m ()-setVAlign self val = liftIO (js_setVAlign (self) (toJSString val))- -foreign import javascript unsafe "$1[\"vAlign\"]" js_getVAlign ::-        HTMLTableSectionElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableSectionElement.vAlign Mozilla HTMLTableSectionElement.vAlign documentation> -getVAlign ::-          (MonadIO m, FromJSString result) =>-            HTMLTableSectionElement -> m result-getVAlign self = liftIO (fromJSString <$> (js_getVAlign (self)))- -foreign import javascript unsafe "$1[\"rows\"]" js_getRows ::-        HTMLTableSectionElement -> IO (Nullable HTMLCollection)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableSectionElement.rows Mozilla HTMLTableSectionElement.rows documentation> -getRows ::-        (MonadIO m) => HTMLTableSectionElement -> m (Maybe HTMLCollection)-getRows self = liftIO (nullableToMaybe <$> (js_getRows (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLTemplateElement.hs

@@ -1,28 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLTemplateElement-       (js_getContent, getContent, HTMLTemplateElement,-        castToHTMLTemplateElement, gTypeHTMLTemplateElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"content\"]" js_getContent ::-        HTMLTemplateElement -> IO (Nullable DocumentFragment)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTemplateElement.content Mozilla HTMLTemplateElement.content documentation> -getContent ::-           (MonadIO m) => HTMLTemplateElement -> m (Maybe DocumentFragment)-getContent self-  = liftIO (nullableToMaybe <$> (js_getContent (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLTextAreaElement.hs

@@ -1,456 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLTextAreaElement-       (js_checkValidity, checkValidity, js_setCustomValidity,-        setCustomValidity, js_select, select, js_setRangeText,-        setRangeText, js_setRangeText4, setRangeText4,-        js_setSelectionRange, setSelectionRange, js_setAutofocus,-        setAutofocus, js_getAutofocus, getAutofocus, js_setCols, setCols,-        js_getCols, getCols, js_setDirName, setDirName, js_getDirName,-        getDirName, js_setDisabled, setDisabled, js_getDisabled,-        getDisabled, js_getForm, getForm, js_setMaxLength, setMaxLength,-        js_getMaxLength, getMaxLength, js_setName, setName, js_getName,-        getName, js_setPlaceholder, setPlaceholder, js_getPlaceholder,-        getPlaceholder, js_setReadOnly, setReadOnly, js_getReadOnly,-        getReadOnly, js_setRequired, setRequired, js_getRequired,-        getRequired, js_setRows, setRows, js_getRows, getRows, js_setWrap,-        setWrap, js_getWrap, getWrap, js_getType, getType,-        js_setDefaultValue, setDefaultValue, js_getDefaultValue,-        getDefaultValue, js_setValue, setValue, js_getValue, getValue,-        js_getTextLength, getTextLength, js_getWillValidate,-        getWillValidate, js_getValidity, getValidity,-        js_getValidationMessage, getValidationMessage, js_getLabels,-        getLabels, js_setSelectionStart, setSelectionStart,-        js_getSelectionStart, getSelectionStart, js_setSelectionEnd,-        setSelectionEnd, js_getSelectionEnd, getSelectionEnd,-        js_setSelectionDirection, setSelectionDirection,-        js_getSelectionDirection, getSelectionDirection, js_setAutocorrect,-        setAutocorrect, js_getAutocorrect, getAutocorrect,-        js_setAutocapitalize, setAutocapitalize, js_getAutocapitalize,-        getAutocapitalize, HTMLTextAreaElement, castToHTMLTextAreaElement,-        gTypeHTMLTextAreaElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe-        "($1[\"checkValidity\"]() ? 1 : 0)" js_checkValidity ::-        HTMLTextAreaElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.checkValidity Mozilla HTMLTextAreaElement.checkValidity documentation> -checkValidity :: (MonadIO m) => HTMLTextAreaElement -> m Bool-checkValidity self = liftIO (js_checkValidity (self))- -foreign import javascript unsafe "$1[\"setCustomValidity\"]($2)"-        js_setCustomValidity ::-        HTMLTextAreaElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.setCustomValidity Mozilla HTMLTextAreaElement.setCustomValidity documentation> -setCustomValidity ::-                  (MonadIO m, ToJSString error) =>-                    HTMLTextAreaElement -> Maybe error -> m ()-setCustomValidity self error-  = liftIO (js_setCustomValidity (self) (toMaybeJSString error))- -foreign import javascript unsafe "$1[\"select\"]()" js_select ::-        HTMLTextAreaElement -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.select Mozilla HTMLTextAreaElement.select documentation> -select :: (MonadIO m) => HTMLTextAreaElement -> m ()-select self = liftIO (js_select (self))- -foreign import javascript unsafe "$1[\"setRangeText\"]($2)"-        js_setRangeText :: HTMLTextAreaElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.setRangeText Mozilla HTMLTextAreaElement.setRangeText documentation> -setRangeText ::-             (MonadIO m, ToJSString replacement) =>-               HTMLTextAreaElement -> replacement -> m ()-setRangeText self replacement-  = liftIO (js_setRangeText (self) (toJSString replacement))- -foreign import javascript unsafe-        "$1[\"setRangeText\"]($2, $3, $4,\n$5)" js_setRangeText4 ::-        HTMLTextAreaElement ->-          JSString -> Word -> Word -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.setRangeText Mozilla HTMLTextAreaElement.setRangeText documentation> -setRangeText4 ::-              (MonadIO m, ToJSString replacement, ToJSString selectionMode) =>-                HTMLTextAreaElement ->-                  replacement -> Word -> Word -> selectionMode -> m ()-setRangeText4 self replacement start end selectionMode-  = liftIO-      (js_setRangeText4 (self) (toJSString replacement) start end-         (toJSString selectionMode))- -foreign import javascript unsafe-        "$1[\"setSelectionRange\"]($2, $3,\n$4)" js_setSelectionRange ::-        HTMLTextAreaElement -> Int -> Int -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.setSelectionRange Mozilla HTMLTextAreaElement.setSelectionRange documentation> -setSelectionRange ::-                  (MonadIO m, ToJSString direction) =>-                    HTMLTextAreaElement -> Int -> Int -> direction -> m ()-setSelectionRange self start end direction-  = liftIO-      (js_setSelectionRange (self) start end (toJSString direction))- -foreign import javascript unsafe "$1[\"autofocus\"] = $2;"-        js_setAutofocus :: HTMLTextAreaElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.autofocus Mozilla HTMLTextAreaElement.autofocus documentation> -setAutofocus :: (MonadIO m) => HTMLTextAreaElement -> Bool -> m ()-setAutofocus self val = liftIO (js_setAutofocus (self) val)- -foreign import javascript unsafe "($1[\"autofocus\"] ? 1 : 0)"-        js_getAutofocus :: HTMLTextAreaElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.autofocus Mozilla HTMLTextAreaElement.autofocus documentation> -getAutofocus :: (MonadIO m) => HTMLTextAreaElement -> m Bool-getAutofocus self = liftIO (js_getAutofocus (self))- -foreign import javascript unsafe "$1[\"cols\"] = $2;" js_setCols ::-        HTMLTextAreaElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.cols Mozilla HTMLTextAreaElement.cols documentation> -setCols :: (MonadIO m) => HTMLTextAreaElement -> Int -> m ()-setCols self val = liftIO (js_setCols (self) val)- -foreign import javascript unsafe "$1[\"cols\"]" js_getCols ::-        HTMLTextAreaElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.cols Mozilla HTMLTextAreaElement.cols documentation> -getCols :: (MonadIO m) => HTMLTextAreaElement -> m Int-getCols self = liftIO (js_getCols (self))- -foreign import javascript unsafe "$1[\"dirName\"] = $2;"-        js_setDirName :: HTMLTextAreaElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.dirName Mozilla HTMLTextAreaElement.dirName documentation> -setDirName ::-           (MonadIO m, ToJSString val) => HTMLTextAreaElement -> val -> m ()-setDirName self val-  = liftIO (js_setDirName (self) (toJSString val))- -foreign import javascript unsafe "$1[\"dirName\"]" js_getDirName ::-        HTMLTextAreaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.dirName Mozilla HTMLTextAreaElement.dirName documentation> -getDirName ::-           (MonadIO m, FromJSString result) => HTMLTextAreaElement -> m result-getDirName self = liftIO (fromJSString <$> (js_getDirName (self)))- -foreign import javascript unsafe "$1[\"disabled\"] = $2;"-        js_setDisabled :: HTMLTextAreaElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.disabled Mozilla HTMLTextAreaElement.disabled documentation> -setDisabled :: (MonadIO m) => HTMLTextAreaElement -> Bool -> m ()-setDisabled self val = liftIO (js_setDisabled (self) val)- -foreign import javascript unsafe "($1[\"disabled\"] ? 1 : 0)"-        js_getDisabled :: HTMLTextAreaElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.disabled Mozilla HTMLTextAreaElement.disabled documentation> -getDisabled :: (MonadIO m) => HTMLTextAreaElement -> m Bool-getDisabled self = liftIO (js_getDisabled (self))- -foreign import javascript unsafe "$1[\"form\"]" js_getForm ::-        HTMLTextAreaElement -> IO (Nullable HTMLFormElement)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.form Mozilla HTMLTextAreaElement.form documentation> -getForm ::-        (MonadIO m) => HTMLTextAreaElement -> m (Maybe HTMLFormElement)-getForm self = liftIO (nullableToMaybe <$> (js_getForm (self)))- -foreign import javascript unsafe "$1[\"maxLength\"] = $2;"-        js_setMaxLength :: HTMLTextAreaElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.maxLength Mozilla HTMLTextAreaElement.maxLength documentation> -setMaxLength :: (MonadIO m) => HTMLTextAreaElement -> Int -> m ()-setMaxLength self val = liftIO (js_setMaxLength (self) val)- -foreign import javascript unsafe "$1[\"maxLength\"]"-        js_getMaxLength :: HTMLTextAreaElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.maxLength Mozilla HTMLTextAreaElement.maxLength documentation> -getMaxLength :: (MonadIO m) => HTMLTextAreaElement -> m Int-getMaxLength self = liftIO (js_getMaxLength (self))- -foreign import javascript unsafe "$1[\"name\"] = $2;" js_setName ::-        HTMLTextAreaElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.name Mozilla HTMLTextAreaElement.name documentation> -setName ::-        (MonadIO m, ToJSString val) => HTMLTextAreaElement -> val -> m ()-setName self val = liftIO (js_setName (self) (toJSString val))- -foreign import javascript unsafe "$1[\"name\"]" js_getName ::-        HTMLTextAreaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.name Mozilla HTMLTextAreaElement.name documentation> -getName ::-        (MonadIO m, FromJSString result) => HTMLTextAreaElement -> m result-getName self = liftIO (fromJSString <$> (js_getName (self)))- -foreign import javascript unsafe "$1[\"placeholder\"] = $2;"-        js_setPlaceholder :: HTMLTextAreaElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.placeholder Mozilla HTMLTextAreaElement.placeholder documentation> -setPlaceholder ::-               (MonadIO m, ToJSString val) => HTMLTextAreaElement -> val -> m ()-setPlaceholder self val-  = liftIO (js_setPlaceholder (self) (toJSString val))- -foreign import javascript unsafe "$1[\"placeholder\"]"-        js_getPlaceholder :: HTMLTextAreaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.placeholder Mozilla HTMLTextAreaElement.placeholder documentation> -getPlaceholder ::-               (MonadIO m, FromJSString result) => HTMLTextAreaElement -> m result-getPlaceholder self-  = liftIO (fromJSString <$> (js_getPlaceholder (self)))- -foreign import javascript unsafe "$1[\"readOnly\"] = $2;"-        js_setReadOnly :: HTMLTextAreaElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.readOnly Mozilla HTMLTextAreaElement.readOnly documentation> -setReadOnly :: (MonadIO m) => HTMLTextAreaElement -> Bool -> m ()-setReadOnly self val = liftIO (js_setReadOnly (self) val)- -foreign import javascript unsafe "($1[\"readOnly\"] ? 1 : 0)"-        js_getReadOnly :: HTMLTextAreaElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.readOnly Mozilla HTMLTextAreaElement.readOnly documentation> -getReadOnly :: (MonadIO m) => HTMLTextAreaElement -> m Bool-getReadOnly self = liftIO (js_getReadOnly (self))- -foreign import javascript unsafe "$1[\"required\"] = $2;"-        js_setRequired :: HTMLTextAreaElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.required Mozilla HTMLTextAreaElement.required documentation> -setRequired :: (MonadIO m) => HTMLTextAreaElement -> Bool -> m ()-setRequired self val = liftIO (js_setRequired (self) val)- -foreign import javascript unsafe "($1[\"required\"] ? 1 : 0)"-        js_getRequired :: HTMLTextAreaElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.required Mozilla HTMLTextAreaElement.required documentation> -getRequired :: (MonadIO m) => HTMLTextAreaElement -> m Bool-getRequired self = liftIO (js_getRequired (self))- -foreign import javascript unsafe "$1[\"rows\"] = $2;" js_setRows ::-        HTMLTextAreaElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.rows Mozilla HTMLTextAreaElement.rows documentation> -setRows :: (MonadIO m) => HTMLTextAreaElement -> Int -> m ()-setRows self val = liftIO (js_setRows (self) val)- -foreign import javascript unsafe "$1[\"rows\"]" js_getRows ::-        HTMLTextAreaElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.rows Mozilla HTMLTextAreaElement.rows documentation> -getRows :: (MonadIO m) => HTMLTextAreaElement -> m Int-getRows self = liftIO (js_getRows (self))- -foreign import javascript unsafe "$1[\"wrap\"] = $2;" js_setWrap ::-        HTMLTextAreaElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.wrap Mozilla HTMLTextAreaElement.wrap documentation> -setWrap ::-        (MonadIO m, ToJSString val) => HTMLTextAreaElement -> val -> m ()-setWrap self val = liftIO (js_setWrap (self) (toJSString val))- -foreign import javascript unsafe "$1[\"wrap\"]" js_getWrap ::-        HTMLTextAreaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.wrap Mozilla HTMLTextAreaElement.wrap documentation> -getWrap ::-        (MonadIO m, FromJSString result) => HTMLTextAreaElement -> m result-getWrap self = liftIO (fromJSString <$> (js_getWrap (self)))- -foreign import javascript unsafe "$1[\"type\"]" js_getType ::-        HTMLTextAreaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.type Mozilla HTMLTextAreaElement.type documentation> -getType ::-        (MonadIO m, FromJSString result) => HTMLTextAreaElement -> m result-getType self = liftIO (fromJSString <$> (js_getType (self)))- -foreign import javascript unsafe "$1[\"defaultValue\"] = $2;"-        js_setDefaultValue ::-        HTMLTextAreaElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.defaultValue Mozilla HTMLTextAreaElement.defaultValue documentation> -setDefaultValue ::-                (MonadIO m, ToJSString val) =>-                  HTMLTextAreaElement -> Maybe val -> m ()-setDefaultValue self val-  = liftIO (js_setDefaultValue (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"defaultValue\"]"-        js_getDefaultValue :: HTMLTextAreaElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.defaultValue Mozilla HTMLTextAreaElement.defaultValue documentation> -getDefaultValue ::-                (MonadIO m, FromJSString result) =>-                  HTMLTextAreaElement -> m (Maybe result)-getDefaultValue self-  = liftIO (fromMaybeJSString <$> (js_getDefaultValue (self)))- -foreign import javascript unsafe "$1[\"value\"] = $2;" js_setValue-        :: HTMLTextAreaElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.value Mozilla HTMLTextAreaElement.value documentation> -setValue ::-         (MonadIO m, ToJSString val) =>-           HTMLTextAreaElement -> Maybe val -> m ()-setValue self val-  = liftIO (js_setValue (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"value\"]" js_getValue ::-        HTMLTextAreaElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.value Mozilla HTMLTextAreaElement.value documentation> -getValue ::-         (MonadIO m, FromJSString result) =>-           HTMLTextAreaElement -> m (Maybe result)-getValue self = liftIO (fromMaybeJSString <$> (js_getValue (self)))- -foreign import javascript unsafe "$1[\"textLength\"]"-        js_getTextLength :: HTMLTextAreaElement -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.textLength Mozilla HTMLTextAreaElement.textLength documentation> -getTextLength :: (MonadIO m) => HTMLTextAreaElement -> m Word-getTextLength self = liftIO (js_getTextLength (self))- -foreign import javascript unsafe "($1[\"willValidate\"] ? 1 : 0)"-        js_getWillValidate :: HTMLTextAreaElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.willValidate Mozilla HTMLTextAreaElement.willValidate documentation> -getWillValidate :: (MonadIO m) => HTMLTextAreaElement -> m Bool-getWillValidate self = liftIO (js_getWillValidate (self))- -foreign import javascript unsafe "$1[\"validity\"]" js_getValidity-        :: HTMLTextAreaElement -> IO (Nullable ValidityState)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.validity Mozilla HTMLTextAreaElement.validity documentation> -getValidity ::-            (MonadIO m) => HTMLTextAreaElement -> m (Maybe ValidityState)-getValidity self-  = liftIO (nullableToMaybe <$> (js_getValidity (self)))- -foreign import javascript unsafe "$1[\"validationMessage\"]"-        js_getValidationMessage :: HTMLTextAreaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.validationMessage Mozilla HTMLTextAreaElement.validationMessage documentation> -getValidationMessage ::-                     (MonadIO m, FromJSString result) => HTMLTextAreaElement -> m result-getValidationMessage self-  = liftIO (fromJSString <$> (js_getValidationMessage (self)))- -foreign import javascript unsafe "$1[\"labels\"]" js_getLabels ::-        HTMLTextAreaElement -> IO (Nullable NodeList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.labels Mozilla HTMLTextAreaElement.labels documentation> -getLabels ::-          (MonadIO m) => HTMLTextAreaElement -> m (Maybe NodeList)-getLabels self = liftIO (nullableToMaybe <$> (js_getLabels (self)))- -foreign import javascript unsafe "$1[\"selectionStart\"] = $2;"-        js_setSelectionStart :: HTMLTextAreaElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.selectionStart Mozilla HTMLTextAreaElement.selectionStart documentation> -setSelectionStart ::-                  (MonadIO m) => HTMLTextAreaElement -> Int -> m ()-setSelectionStart self val-  = liftIO (js_setSelectionStart (self) val)- -foreign import javascript unsafe "$1[\"selectionStart\"]"-        js_getSelectionStart :: HTMLTextAreaElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.selectionStart Mozilla HTMLTextAreaElement.selectionStart documentation> -getSelectionStart :: (MonadIO m) => HTMLTextAreaElement -> m Int-getSelectionStart self = liftIO (js_getSelectionStart (self))- -foreign import javascript unsafe "$1[\"selectionEnd\"] = $2;"-        js_setSelectionEnd :: HTMLTextAreaElement -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.selectionEnd Mozilla HTMLTextAreaElement.selectionEnd documentation> -setSelectionEnd ::-                (MonadIO m) => HTMLTextAreaElement -> Int -> m ()-setSelectionEnd self val = liftIO (js_setSelectionEnd (self) val)- -foreign import javascript unsafe "$1[\"selectionEnd\"]"-        js_getSelectionEnd :: HTMLTextAreaElement -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.selectionEnd Mozilla HTMLTextAreaElement.selectionEnd documentation> -getSelectionEnd :: (MonadIO m) => HTMLTextAreaElement -> m Int-getSelectionEnd self = liftIO (js_getSelectionEnd (self))- -foreign import javascript unsafe "$1[\"selectionDirection\"] = $2;"-        js_setSelectionDirection ::-        HTMLTextAreaElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.selectionDirection Mozilla HTMLTextAreaElement.selectionDirection documentation> -setSelectionDirection ::-                      (MonadIO m, ToJSString val) => HTMLTextAreaElement -> val -> m ()-setSelectionDirection self val-  = liftIO (js_setSelectionDirection (self) (toJSString val))- -foreign import javascript unsafe "$1[\"selectionDirection\"]"-        js_getSelectionDirection :: HTMLTextAreaElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.selectionDirection Mozilla HTMLTextAreaElement.selectionDirection documentation> -getSelectionDirection ::-                      (MonadIO m, FromJSString result) => HTMLTextAreaElement -> m result-getSelectionDirection self-  = liftIO (fromJSString <$> (js_getSelectionDirection (self)))- -foreign import javascript unsafe "$1[\"autocorrect\"] = $2;"-        js_setAutocorrect :: HTMLTextAreaElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.autocorrect Mozilla HTMLTextAreaElement.autocorrect documentation> -setAutocorrect ::-               (MonadIO m) => HTMLTextAreaElement -> Bool -> m ()-setAutocorrect self val = liftIO (js_setAutocorrect (self) val)- -foreign import javascript unsafe "($1[\"autocorrect\"] ? 1 : 0)"-        js_getAutocorrect :: HTMLTextAreaElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.autocorrect Mozilla HTMLTextAreaElement.autocorrect documentation> -getAutocorrect :: (MonadIO m) => HTMLTextAreaElement -> m Bool-getAutocorrect self = liftIO (js_getAutocorrect (self))- -foreign import javascript unsafe "$1[\"autocapitalize\"] = $2;"-        js_setAutocapitalize ::-        HTMLTextAreaElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.autocapitalize Mozilla HTMLTextAreaElement.autocapitalize documentation> -setAutocapitalize ::-                  (MonadIO m, ToJSString val) =>-                    HTMLTextAreaElement -> Maybe val -> m ()-setAutocapitalize self val-  = liftIO (js_setAutocapitalize (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"autocapitalize\"]"-        js_getAutocapitalize ::-        HTMLTextAreaElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.autocapitalize Mozilla HTMLTextAreaElement.autocapitalize documentation> -getAutocapitalize ::-                  (MonadIO m, FromJSString result) =>-                    HTMLTextAreaElement -> m (Maybe result)-getAutocapitalize self-  = liftIO (fromMaybeJSString <$> (js_getAutocapitalize (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLTitleElement.hs

@@ -1,37 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLTitleElement-       (js_setText, setText, js_getText, getText, HTMLTitleElement,-        castToHTMLTitleElement, gTypeHTMLTitleElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"text\"] = $2;" js_setText ::-        HTMLTitleElement -> Nullable JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTitleElement.text Mozilla HTMLTitleElement.text documentation> -setText ::-        (MonadIO m, ToJSString val) =>-          HTMLTitleElement -> Maybe val -> m ()-setText self val = liftIO (js_setText (self) (toMaybeJSString val))- -foreign import javascript unsafe "$1[\"text\"]" js_getText ::-        HTMLTitleElement -> IO (Nullable JSString)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTitleElement.text Mozilla HTMLTitleElement.text documentation> -getText ::-        (MonadIO m, FromJSString result) =>-          HTMLTitleElement -> m (Maybe result)-getText self = liftIO (fromMaybeJSString <$> (js_getText (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLTrackElement.hs

@@ -1,121 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLTrackElement-       (pattern NONE, pattern LOADING, pattern LOADED, pattern ERROR,-        js_setKind, setKind, js_getKind, getKind, js_setSrc, setSrc,-        js_getSrc, getSrc, js_setSrclang, setSrclang, js_getSrclang,-        getSrclang, js_setLabel, setLabel, js_getLabel, getLabel,-        js_setDefault, setDefault, js_getDefault, getDefault,-        js_getReadyState, getReadyState, js_getTrack, getTrack,-        HTMLTrackElement, castToHTMLTrackElement, gTypeHTMLTrackElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums-pattern NONE = 0-pattern LOADING = 1-pattern LOADED = 2-pattern ERROR = 3- -foreign import javascript unsafe "$1[\"kind\"] = $2;" js_setKind ::-        HTMLTrackElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTrackElement.kind Mozilla HTMLTrackElement.kind documentation> -setKind ::-        (MonadIO m, ToJSString val) => HTMLTrackElement -> val -> m ()-setKind self val = liftIO (js_setKind (self) (toJSString val))- -foreign import javascript unsafe "$1[\"kind\"]" js_getKind ::-        HTMLTrackElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTrackElement.kind Mozilla HTMLTrackElement.kind documentation> -getKind ::-        (MonadIO m, FromJSString result) => HTMLTrackElement -> m result-getKind self = liftIO (fromJSString <$> (js_getKind (self)))- -foreign import javascript unsafe "$1[\"src\"] = $2;" js_setSrc ::-        HTMLTrackElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTrackElement.src Mozilla HTMLTrackElement.src documentation> -setSrc ::-       (MonadIO m, ToJSString val) => HTMLTrackElement -> val -> m ()-setSrc self val = liftIO (js_setSrc (self) (toJSString val))- -foreign import javascript unsafe "$1[\"src\"]" js_getSrc ::-        HTMLTrackElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTrackElement.src Mozilla HTMLTrackElement.src documentation> -getSrc ::-       (MonadIO m, FromJSString result) => HTMLTrackElement -> m result-getSrc self = liftIO (fromJSString <$> (js_getSrc (self)))- -foreign import javascript unsafe "$1[\"srclang\"] = $2;"-        js_setSrclang :: HTMLTrackElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTrackElement.srclang Mozilla HTMLTrackElement.srclang documentation> -setSrclang ::-           (MonadIO m, ToJSString val) => HTMLTrackElement -> val -> m ()-setSrclang self val-  = liftIO (js_setSrclang (self) (toJSString val))- -foreign import javascript unsafe "$1[\"srclang\"]" js_getSrclang ::-        HTMLTrackElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTrackElement.srclang Mozilla HTMLTrackElement.srclang documentation> -getSrclang ::-           (MonadIO m, FromJSString result) => HTMLTrackElement -> m result-getSrclang self = liftIO (fromJSString <$> (js_getSrclang (self)))- -foreign import javascript unsafe "$1[\"label\"] = $2;" js_setLabel-        :: HTMLTrackElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTrackElement.label Mozilla HTMLTrackElement.label documentation> -setLabel ::-         (MonadIO m, ToJSString val) => HTMLTrackElement -> val -> m ()-setLabel self val = liftIO (js_setLabel (self) (toJSString val))- -foreign import javascript unsafe "$1[\"label\"]" js_getLabel ::-        HTMLTrackElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTrackElement.label Mozilla HTMLTrackElement.label documentation> -getLabel ::-         (MonadIO m, FromJSString result) => HTMLTrackElement -> m result-getLabel self = liftIO (fromJSString <$> (js_getLabel (self)))- -foreign import javascript unsafe "$1[\"default\"] = $2;"-        js_setDefault :: HTMLTrackElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTrackElement.default Mozilla HTMLTrackElement.default documentation> -setDefault :: (MonadIO m) => HTMLTrackElement -> Bool -> m ()-setDefault self val = liftIO (js_setDefault (self) val)- -foreign import javascript unsafe "($1[\"default\"] ? 1 : 0)"-        js_getDefault :: HTMLTrackElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTrackElement.default Mozilla HTMLTrackElement.default documentation> -getDefault :: (MonadIO m) => HTMLTrackElement -> m Bool-getDefault self = liftIO (js_getDefault (self))- -foreign import javascript unsafe "$1[\"readyState\"]"-        js_getReadyState :: HTMLTrackElement -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTrackElement.readyState Mozilla HTMLTrackElement.readyState documentation> -getReadyState :: (MonadIO m) => HTMLTrackElement -> m Word-getReadyState self = liftIO (js_getReadyState (self))- -foreign import javascript unsafe "$1[\"track\"]" js_getTrack ::-        HTMLTrackElement -> IO (Nullable TextTrack)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTrackElement.track Mozilla HTMLTrackElement.track documentation> -getTrack :: (MonadIO m) => HTMLTrackElement -> m (Maybe TextTrack)-getTrack self = liftIO (nullableToMaybe <$> (js_getTrack (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLUListElement.hs

@@ -1,50 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLUListElement-       (js_setCompact, setCompact, js_getCompact, getCompact, js_setType,-        setType, js_getType, getType, HTMLUListElement,-        castToHTMLUListElement, gTypeHTMLUListElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"compact\"] = $2;"-        js_setCompact :: HTMLUListElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLUListElement.compact Mozilla HTMLUListElement.compact documentation> -setCompact :: (MonadIO m) => HTMLUListElement -> Bool -> m ()-setCompact self val = liftIO (js_setCompact (self) val)- -foreign import javascript unsafe "($1[\"compact\"] ? 1 : 0)"-        js_getCompact :: HTMLUListElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLUListElement.compact Mozilla HTMLUListElement.compact documentation> -getCompact :: (MonadIO m) => HTMLUListElement -> m Bool-getCompact self = liftIO (js_getCompact (self))- -foreign import javascript unsafe "$1[\"type\"] = $2;" js_setType ::-        HTMLUListElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLUListElement.type Mozilla HTMLUListElement.type documentation> -setType ::-        (MonadIO m, ToJSString val) => HTMLUListElement -> val -> m ()-setType self val = liftIO (js_setType (self) (toJSString val))- -foreign import javascript unsafe "$1[\"type\"]" js_getType ::-        HTMLUListElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLUListElement.type Mozilla HTMLUListElement.type documentation> -getType ::-        (MonadIO m, FromJSString result) => HTMLUListElement -> m result-getType self = liftIO (fromJSString <$> (js_getType (self)))

− src/GHCJS/DOM/JSFFI/Generated/HTMLVideoElement.hs

@@ -1,222 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HTMLVideoElement-       (js_webkitEnterFullscreen, webkitEnterFullscreen,-        js_webkitExitFullscreen, webkitExitFullscreen,-        js_webkitEnterFullScreen, webkitEnterFullScreen,-        js_webkitExitFullScreen, webkitExitFullScreen,-        js_webkitSupportsPresentationMode, webkitSupportsPresentationMode,-        js_webkitSetPresentationMode, webkitSetPresentationMode,-        js_setWidth, setWidth, js_getWidth, getWidth, js_setHeight,-        setHeight, js_getHeight, getHeight, js_getVideoWidth,-        getVideoWidth, js_getVideoHeight, getVideoHeight, js_setPoster,-        setPoster, js_getPoster, getPoster, js_getWebkitSupportsFullscreen,-        getWebkitSupportsFullscreen, js_getWebkitDisplayingFullscreen,-        getWebkitDisplayingFullscreen,-        js_setWebkitWirelessVideoPlaybackDisabled,-        setWebkitWirelessVideoPlaybackDisabled,-        js_getWebkitWirelessVideoPlaybackDisabled,-        getWebkitWirelessVideoPlaybackDisabled,-        js_getWebkitDecodedFrameCount, getWebkitDecodedFrameCount,-        js_getWebkitDroppedFrameCount, getWebkitDroppedFrameCount,-        js_getWebkitPresentationMode, getWebkitPresentationMode,-        webKitPresentationModeChanged, HTMLVideoElement,-        castToHTMLVideoElement, gTypeHTMLVideoElement)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"webkitEnterFullscreen\"]()"-        js_webkitEnterFullscreen :: HTMLVideoElement -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLVideoElement.webkitEnterFullscreen Mozilla HTMLVideoElement.webkitEnterFullscreen documentation> -webkitEnterFullscreen :: (MonadIO m) => HTMLVideoElement -> m ()-webkitEnterFullscreen self-  = liftIO (js_webkitEnterFullscreen (self))- -foreign import javascript unsafe "$1[\"webkitExitFullscreen\"]()"-        js_webkitExitFullscreen :: HTMLVideoElement -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLVideoElement.webkitExitFullscreen Mozilla HTMLVideoElement.webkitExitFullscreen documentation> -webkitExitFullscreen :: (MonadIO m) => HTMLVideoElement -> m ()-webkitExitFullscreen self = liftIO (js_webkitExitFullscreen (self))- -foreign import javascript unsafe "$1[\"webkitEnterFullScreen\"]()"-        js_webkitEnterFullScreen :: HTMLVideoElement -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLVideoElement.webkitEnterFullScreen Mozilla HTMLVideoElement.webkitEnterFullScreen documentation> -webkitEnterFullScreen :: (MonadIO m) => HTMLVideoElement -> m ()-webkitEnterFullScreen self-  = liftIO (js_webkitEnterFullScreen (self))- -foreign import javascript unsafe "$1[\"webkitExitFullScreen\"]()"-        js_webkitExitFullScreen :: HTMLVideoElement -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLVideoElement.webkitExitFullScreen Mozilla HTMLVideoElement.webkitExitFullScreen documentation> -webkitExitFullScreen :: (MonadIO m) => HTMLVideoElement -> m ()-webkitExitFullScreen self = liftIO (js_webkitExitFullScreen (self))- -foreign import javascript unsafe-        "($1[\"webkitSupportsPresentationMode\"]($2) ? 1 : 0)"-        js_webkitSupportsPresentationMode ::-        HTMLVideoElement -> JSVal -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLVideoElement.webkitSupportsPresentationMode Mozilla HTMLVideoElement.webkitSupportsPresentationMode documentation> -webkitSupportsPresentationMode ::-                               (MonadIO m) => HTMLVideoElement -> VideoPresentationMode -> m Bool-webkitSupportsPresentationMode self mode-  = liftIO (js_webkitSupportsPresentationMode (self) (pToJSVal mode))- -foreign import javascript unsafe-        "$1[\"webkitSetPresentationMode\"]($2)"-        js_webkitSetPresentationMode :: HTMLVideoElement -> JSVal -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLVideoElement.webkitSetPresentationMode Mozilla HTMLVideoElement.webkitSetPresentationMode documentation> -webkitSetPresentationMode ::-                          (MonadIO m) => HTMLVideoElement -> VideoPresentationMode -> m ()-webkitSetPresentationMode self mode-  = liftIO (js_webkitSetPresentationMode (self) (pToJSVal mode))- -foreign import javascript unsafe "$1[\"width\"] = $2;" js_setWidth-        :: HTMLVideoElement -> Word -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLVideoElement.width Mozilla HTMLVideoElement.width documentation> -setWidth :: (MonadIO m) => HTMLVideoElement -> Word -> m ()-setWidth self val = liftIO (js_setWidth (self) val)- -foreign import javascript unsafe "$1[\"width\"]" js_getWidth ::-        HTMLVideoElement -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLVideoElement.width Mozilla HTMLVideoElement.width documentation> -getWidth :: (MonadIO m) => HTMLVideoElement -> m Word-getWidth self = liftIO (js_getWidth (self))- -foreign import javascript unsafe "$1[\"height\"] = $2;"-        js_setHeight :: HTMLVideoElement -> Word -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLVideoElement.height Mozilla HTMLVideoElement.height documentation> -setHeight :: (MonadIO m) => HTMLVideoElement -> Word -> m ()-setHeight self val = liftIO (js_setHeight (self) val)- -foreign import javascript unsafe "$1[\"height\"]" js_getHeight ::-        HTMLVideoElement -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLVideoElement.height Mozilla HTMLVideoElement.height documentation> -getHeight :: (MonadIO m) => HTMLVideoElement -> m Word-getHeight self = liftIO (js_getHeight (self))- -foreign import javascript unsafe "$1[\"videoWidth\"]"-        js_getVideoWidth :: HTMLVideoElement -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLVideoElement.videoWidth Mozilla HTMLVideoElement.videoWidth documentation> -getVideoWidth :: (MonadIO m) => HTMLVideoElement -> m Word-getVideoWidth self = liftIO (js_getVideoWidth (self))- -foreign import javascript unsafe "$1[\"videoHeight\"]"-        js_getVideoHeight :: HTMLVideoElement -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLVideoElement.videoHeight Mozilla HTMLVideoElement.videoHeight documentation> -getVideoHeight :: (MonadIO m) => HTMLVideoElement -> m Word-getVideoHeight self = liftIO (js_getVideoHeight (self))- -foreign import javascript unsafe "$1[\"poster\"] = $2;"-        js_setPoster :: HTMLVideoElement -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLVideoElement.poster Mozilla HTMLVideoElement.poster documentation> -setPoster ::-          (MonadIO m, ToJSString val) => HTMLVideoElement -> val -> m ()-setPoster self val = liftIO (js_setPoster (self) (toJSString val))- -foreign import javascript unsafe "$1[\"poster\"]" js_getPoster ::-        HTMLVideoElement -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLVideoElement.poster Mozilla HTMLVideoElement.poster documentation> -getPoster ::-          (MonadIO m, FromJSString result) => HTMLVideoElement -> m result-getPoster self = liftIO (fromJSString <$> (js_getPoster (self)))- -foreign import javascript unsafe-        "($1[\"webkitSupportsFullscreen\"] ? 1 : 0)"-        js_getWebkitSupportsFullscreen :: HTMLVideoElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLVideoElement.webkitSupportsFullscreen Mozilla HTMLVideoElement.webkitSupportsFullscreen documentation> -getWebkitSupportsFullscreen ::-                            (MonadIO m) => HTMLVideoElement -> m Bool-getWebkitSupportsFullscreen self-  = liftIO (js_getWebkitSupportsFullscreen (self))- -foreign import javascript unsafe-        "($1[\"webkitDisplayingFullscreen\"] ? 1 : 0)"-        js_getWebkitDisplayingFullscreen :: HTMLVideoElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLVideoElement.webkitDisplayingFullscreen Mozilla HTMLVideoElement.webkitDisplayingFullscreen documentation> -getWebkitDisplayingFullscreen ::-                              (MonadIO m) => HTMLVideoElement -> m Bool-getWebkitDisplayingFullscreen self-  = liftIO (js_getWebkitDisplayingFullscreen (self))- -foreign import javascript unsafe-        "$1[\"webkitWirelessVideoPlaybackDisabled\"] = $2;"-        js_setWebkitWirelessVideoPlaybackDisabled ::-        HTMLVideoElement -> Bool -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLVideoElement.webkitWirelessVideoPlaybackDisabled Mozilla HTMLVideoElement.webkitWirelessVideoPlaybackDisabled documentation> -setWebkitWirelessVideoPlaybackDisabled ::-                                       (MonadIO m) => HTMLVideoElement -> Bool -> m ()-setWebkitWirelessVideoPlaybackDisabled self val-  = liftIO (js_setWebkitWirelessVideoPlaybackDisabled (self) val)- -foreign import javascript unsafe-        "($1[\"webkitWirelessVideoPlaybackDisabled\"] ? 1 : 0)"-        js_getWebkitWirelessVideoPlaybackDisabled ::-        HTMLVideoElement -> IO Bool---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLVideoElement.webkitWirelessVideoPlaybackDisabled Mozilla HTMLVideoElement.webkitWirelessVideoPlaybackDisabled documentation> -getWebkitWirelessVideoPlaybackDisabled ::-                                       (MonadIO m) => HTMLVideoElement -> m Bool-getWebkitWirelessVideoPlaybackDisabled self-  = liftIO (js_getWebkitWirelessVideoPlaybackDisabled (self))- -foreign import javascript unsafe "$1[\"webkitDecodedFrameCount\"]"-        js_getWebkitDecodedFrameCount :: HTMLVideoElement -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLVideoElement.webkitDecodedFrameCount Mozilla HTMLVideoElement.webkitDecodedFrameCount documentation> -getWebkitDecodedFrameCount ::-                           (MonadIO m) => HTMLVideoElement -> m Word-getWebkitDecodedFrameCount self-  = liftIO (js_getWebkitDecodedFrameCount (self))- -foreign import javascript unsafe "$1[\"webkitDroppedFrameCount\"]"-        js_getWebkitDroppedFrameCount :: HTMLVideoElement -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLVideoElement.webkitDroppedFrameCount Mozilla HTMLVideoElement.webkitDroppedFrameCount documentation> -getWebkitDroppedFrameCount ::-                           (MonadIO m) => HTMLVideoElement -> m Word-getWebkitDroppedFrameCount self-  = liftIO (js_getWebkitDroppedFrameCount (self))- -foreign import javascript unsafe "$1[\"webkitPresentationMode\"]"-        js_getWebkitPresentationMode :: HTMLVideoElement -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLVideoElement.webkitPresentationMode Mozilla HTMLVideoElement.webkitPresentationMode documentation> -getWebkitPresentationMode ::-                          (MonadIO m) => HTMLVideoElement -> m VideoPresentationMode-getWebkitPresentationMode self-  = liftIO-      ((js_getWebkitPresentationMode (self)) >>= fromJSValUnchecked)---- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLVideoElement.onwebkitpresentationmodechanged Mozilla HTMLVideoElement.onwebkitpresentationmodechanged documentation> -webKitPresentationModeChanged :: EventName HTMLVideoElement Event-webKitPresentationModeChanged-  = unsafeEventName (toJSString "webkitpresentationmodechanged")

− src/GHCJS/DOM/JSFFI/Generated/HashChangeEvent.hs

@@ -1,55 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.HashChangeEvent-       (js_initHashChangeEvent, initHashChangeEvent, js_getOldURL,-        getOldURL, js_getNewURL, getNewURL, HashChangeEvent,-        castToHashChangeEvent, gTypeHashChangeEvent)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe-        "$1[\"initHashChangeEvent\"]($2,\n$3, $4, $5, $6)"-        js_initHashChangeEvent ::-        HashChangeEvent ->-          JSString -> Bool -> Bool -> JSString -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/HashChangeEvent.initHashChangeEvent Mozilla HashChangeEvent.initHashChangeEvent documentation> -initHashChangeEvent ::-                    (MonadIO m, ToJSString type', ToJSString oldURL,-                     ToJSString newURL) =>-                      HashChangeEvent ->-                        type' -> Bool -> Bool -> oldURL -> newURL -> m ()-initHashChangeEvent self type' canBubble cancelable oldURL newURL-  = liftIO-      (js_initHashChangeEvent (self) (toJSString type') canBubble-         cancelable-         (toJSString oldURL)-         (toJSString newURL))- -foreign import javascript unsafe "$1[\"oldURL\"]" js_getOldURL ::-        HashChangeEvent -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HashChangeEvent.oldURL Mozilla HashChangeEvent.oldURL documentation> -getOldURL ::-          (MonadIO m, FromJSString result) => HashChangeEvent -> m result-getOldURL self = liftIO (fromJSString <$> (js_getOldURL (self)))- -foreign import javascript unsafe "$1[\"newURL\"]" js_getNewURL ::-        HashChangeEvent -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/HashChangeEvent.newURL Mozilla HashChangeEvent.newURL documentation> -getNewURL ::-          (MonadIO m, FromJSString result) => HashChangeEvent -> m result-getNewURL self = liftIO (fromJSString <$> (js_getNewURL (self)))

− src/GHCJS/DOM/JSFFI/Generated/History.hs

@@ -1,79 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.History-       (js_back, back, js_forward, forward, js_go, go, js_pushState,-        pushState, js_replaceState, replaceState, js_getLength, getLength,-        js_getState, getState, History, castToHistory, gTypeHistory)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"back\"]()" js_back ::-        History -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/History.back Mozilla History.back documentation> -back :: (MonadIO m) => History -> m ()-back self = liftIO (js_back (self))- -foreign import javascript unsafe "$1[\"forward\"]()" js_forward ::-        History -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/History.forward Mozilla History.forward documentation> -forward :: (MonadIO m) => History -> m ()-forward self = liftIO (js_forward (self))- -foreign import javascript unsafe "$1[\"go\"]($2)" js_go ::-        History -> Int -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/History.go Mozilla History.go documentation> -go :: (MonadIO m) => History -> Int -> m ()-go self distance = liftIO (js_go (self) distance)- -foreign import javascript unsafe "$1[\"pushState\"]($2, $3, $4)"-        js_pushState :: History -> JSVal -> JSString -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/History.pushState Mozilla History.pushState documentation> -pushState ::-          (MonadIO m, ToJSString title, ToJSString url) =>-            History -> JSVal -> title -> url -> m ()-pushState self data' title url-  = liftIO-      (js_pushState (self) data' (toJSString title) (toJSString url))- -foreign import javascript unsafe "$1[\"replaceState\"]($2, $3, $4)"-        js_replaceState ::-        History -> JSVal -> JSString -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/History.replaceState Mozilla History.replaceState documentation> -replaceState ::-             (MonadIO m, ToJSString title, ToJSString url) =>-               History -> JSVal -> title -> url -> m ()-replaceState self data' title url-  = liftIO-      (js_replaceState (self) data' (toJSString title) (toJSString url))- -foreign import javascript unsafe "$1[\"length\"]" js_getLength ::-        History -> IO Word---- | <https://developer.mozilla.org/en-US/docs/Web/API/History.length Mozilla History.length documentation> -getLength :: (MonadIO m) => History -> m Word-getLength self = liftIO (js_getLength (self))- -foreign import javascript unsafe "$1[\"state\"]" js_getState ::-        History -> IO (Nullable SerializedScriptValue)---- | <https://developer.mozilla.org/en-US/docs/Web/API/History.state Mozilla History.state documentation> -getState ::-         (MonadIO m) => History -> m (Maybe SerializedScriptValue)-getState self = liftIO (nullableToMaybe <$> (js_getState (self)))

− src/GHCJS/DOM/JSFFI/Generated/IDBCursor.hs

@@ -1,88 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.IDBCursor-       (js_update, update, js_advance, advance, js_continue, continue,-        js_delete, delete, js_getSource, getSource, js_getDirection,-        getDirection, js_getKey, getKey, js_getPrimaryKey, getPrimaryKey,-        IDBCursor, castToIDBCursor, gTypeIDBCursor, IsIDBCursor,-        toIDBCursor)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"update\"]($2)" js_update ::-        IDBCursor -> JSVal -> IO (Nullable IDBRequest)---- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBCursor.update Mozilla IDBCursor.update documentation> -update ::-       (MonadIO m, IsIDBCursor self) =>-         self -> JSVal -> m (Maybe IDBRequest)-update self value-  = liftIO (nullableToMaybe <$> (js_update (toIDBCursor self) value))- -foreign import javascript unsafe "$1[\"advance\"]($2)" js_advance-        :: IDBCursor -> Word -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBCursor.advance Mozilla IDBCursor.advance documentation> -advance :: (MonadIO m, IsIDBCursor self) => self -> Word -> m ()-advance self count = liftIO (js_advance (toIDBCursor self) count)- -foreign import javascript unsafe "$1[\"continue\"]($2)" js_continue-        :: IDBCursor -> JSVal -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBCursor.continue Mozilla IDBCursor.continue documentation> -continue :: (MonadIO m, IsIDBCursor self) => self -> JSVal -> m ()-continue self key = liftIO (js_continue (toIDBCursor self) key)- -foreign import javascript unsafe "$1[\"delete\"]()" js_delete ::-        IDBCursor -> IO (Nullable IDBRequest)---- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBCursor.delete Mozilla IDBCursor.delete documentation> -delete ::-       (MonadIO m, IsIDBCursor self) => self -> m (Maybe IDBRequest)-delete self-  = liftIO (nullableToMaybe <$> (js_delete (toIDBCursor self)))- -foreign import javascript unsafe "$1[\"source\"]" js_getSource ::-        IDBCursor -> IO (Nullable IDBAny)---- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBCursor.source Mozilla IDBCursor.source documentation> -getSource ::-          (MonadIO m, IsIDBCursor self) => self -> m (Maybe IDBAny)-getSource self-  = liftIO (nullableToMaybe <$> (js_getSource (toIDBCursor self)))- -foreign import javascript unsafe "$1[\"direction\"]"-        js_getDirection :: IDBCursor -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBCursor.direction Mozilla IDBCursor.direction documentation> -getDirection ::-             (MonadIO m, IsIDBCursor self, FromJSString result) =>-               self -> m result-getDirection self-  = liftIO (fromJSString <$> (js_getDirection (toIDBCursor self)))- -foreign import javascript unsafe "$1[\"key\"]" js_getKey ::-        IDBCursor -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBCursor.key Mozilla IDBCursor.key documentation> -getKey :: (MonadIO m, IsIDBCursor self) => self -> m JSVal-getKey self = liftIO (js_getKey (toIDBCursor self))- -foreign import javascript unsafe "$1[\"primaryKey\"]"-        js_getPrimaryKey :: IDBCursor -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBCursor.primaryKey Mozilla IDBCursor.primaryKey documentation> -getPrimaryKey :: (MonadIO m, IsIDBCursor self) => self -> m JSVal-getPrimaryKey self = liftIO (js_getPrimaryKey (toIDBCursor self))

− src/GHCJS/DOM/JSFFI/Generated/IDBCursorWithValue.hs

@@ -1,26 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.IDBCursorWithValue-       (js_getValue, getValue, IDBCursorWithValue,-        castToIDBCursorWithValue, gTypeIDBCursorWithValue)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"value\"]" js_getValue ::-        IDBCursorWithValue -> IO JSVal---- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBCursorWithValue.value Mozilla IDBCursorWithValue.value documentation> -getValue :: (MonadIO m) => IDBCursorWithValue -> m JSVal-getValue self = liftIO (js_getValue (self))

− src/GHCJS/DOM/JSFFI/Generated/IDBDatabase.hs

@@ -1,119 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.IDBDatabase-       (js_createObjectStore, createObjectStore, js_deleteObjectStore,-        deleteObjectStore, js_transaction, transaction, js_transaction',-        transaction', js_close, close, js_getName, getName, js_getVersion,-        getVersion, js_getObjectStoreNames, getObjectStoreNames, abort,-        error, versionChange, IDBDatabase, castToIDBDatabase,-        gTypeIDBDatabase)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe-        "$1[\"createObjectStore\"]($2, $3)" js_createObjectStore ::-        IDBDatabase ->-          JSString -> Nullable Dictionary -> IO (Nullable IDBObjectStore)---- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBDatabase.createObjectStore Mozilla IDBDatabase.createObjectStore documentation> -createObjectStore ::-                  (MonadIO m, ToJSString name, IsDictionary options) =>-                    IDBDatabase -> name -> Maybe options -> m (Maybe IDBObjectStore)-createObjectStore self name options-  = liftIO-      (nullableToMaybe <$>-         (js_createObjectStore (self) (toJSString name)-            (maybeToNullable (fmap toDictionary options))))- -foreign import javascript unsafe "$1[\"deleteObjectStore\"]($2)"-        js_deleteObjectStore :: IDBDatabase -> JSString -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBDatabase.deleteObjectStore Mozilla IDBDatabase.deleteObjectStore documentation> -deleteObjectStore ::-                  (MonadIO m, ToJSString name) => IDBDatabase -> name -> m ()-deleteObjectStore self name-  = liftIO (js_deleteObjectStore (self) (toJSString name))- -foreign import javascript unsafe "$1[\"transaction\"]($2, $3)"-        js_transaction ::-        IDBDatabase -> JSString -> JSString -> IO (Nullable IDBTransaction)---- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBDatabase.transaction Mozilla IDBDatabase.transaction documentation> -transaction ::-            (MonadIO m, ToJSString storeName, ToJSString mode) =>-              IDBDatabase -> storeName -> mode -> m (Maybe IDBTransaction)-transaction self storeName mode-  = liftIO-      (nullableToMaybe <$>-         (js_transaction (self) (toJSString storeName) (toJSString mode)))- -foreign import javascript unsafe "$1[\"transaction\"]($2, $3)"-        js_transaction' ::-        IDBDatabase -> JSVal -> JSString -> IO (Nullable IDBTransaction)---- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBDatabase.transaction Mozilla IDBDatabase.transaction documentation> -transaction' ::-             (MonadIO m, ToJSString storeNames, ToJSString mode) =>-               IDBDatabase -> [storeNames] -> mode -> m (Maybe IDBTransaction)-transaction' self storeNames mode-  = liftIO-      (nullableToMaybe <$>-         (toJSVal storeNames >>=-            \ storeNames' -> js_transaction' (self) storeNames'-            (toJSString mode)))- -foreign import javascript unsafe "$1[\"close\"]()" js_close ::-        IDBDatabase -> IO ()---- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBDatabase.close Mozilla IDBDatabase.close documentation> -close :: (MonadIO m) => IDBDatabase -> m ()-close self = liftIO (js_close (self))- -foreign import javascript unsafe "$1[\"name\"]" js_getName ::-        IDBDatabase -> IO JSString---- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBDatabase.name Mozilla IDBDatabase.name documentation> -getName ::-        (MonadIO m, FromJSString result) => IDBDatabase -> m result-getName self = liftIO (fromJSString <$> (js_getName (self)))- -foreign import javascript unsafe "$1[\"version\"]" js_getVersion ::-        IDBDatabase -> IO Double---- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBDatabase.version Mozilla IDBDatabase.version documentation> -getVersion :: (MonadIO m) => IDBDatabase -> m Word64-getVersion self = liftIO (round <$> (js_getVersion (self)))- -foreign import javascript unsafe "$1[\"objectStoreNames\"]"-        js_getObjectStoreNames ::-        IDBDatabase -> IO (Nullable DOMStringList)---- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBDatabase.objectStoreNames Mozilla IDBDatabase.objectStoreNames documentation> -getObjectStoreNames ::-                    (MonadIO m) => IDBDatabase -> m (Maybe DOMStringList)-getObjectStoreNames self-  = liftIO (nullableToMaybe <$> (js_getObjectStoreNames (self)))---- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBDatabase.onabort Mozilla IDBDatabase.onabort documentation> -abort :: EventName IDBDatabase Event-abort = unsafeEventName (toJSString "abort")---- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBDatabase.onerror Mozilla IDBDatabase.onerror documentation> -error :: EventName IDBDatabase Event-error = unsafeEventName (toJSString "error")---- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBDatabase.onversionchange Mozilla IDBDatabase.onversionchange documentation> -versionChange :: EventName IDBDatabase IDBVersionChangeEvent-versionChange = unsafeEventName (toJSString "versionchange")

− src/GHCJS/DOM/JSFFI/Generated/IDBFactory.hs

@@ -1,50 +0,0 @@-{-# LANGUAGE PatternSynonyms, ForeignFunctionInterface, JavaScriptFFI #-}-module GHCJS.DOM.JSFFI.Generated.IDBFactory-       (js_open, open, js_deleteDatabase, deleteDatabase, js_cmp, cmp,-        IDBFactory, castToIDBFactory, gTypeIDBFactory)-       where-import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, fmap, Show, Read, Eq, Ord)-import Data.Typeable (Typeable)-import GHCJS.Types (JSVal(..), JSString)-import GHCJS.Foreign (jsNull)-import GHCJS.Foreign.Callback (syncCallback, asyncCallback, syncCallback1, asyncCallback1, syncCallback2, asyncCallback2, OnBlocked(..))-import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))-import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))-import Control.Monad.IO.Class (MonadIO(..))-import Data.Int (Int64)-import Data.Word (Word, Word64)-import GHCJS.DOM.Types-import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)-import GHCJS.DOM.Enums- -foreign import javascript unsafe "$1[\"open\"]($2, $3)" js_open ::-        IDBFactory -> JSString -> Double -> IO (Nullable IDBOpenDBRequest)---- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBFactory.open Mozilla IDBFactory.open documentation> -open ::-     (MonadIO m, ToJSString name) =>-       IDBFactory -> name -> Word64 -> m (Maybe IDBOpenDBRequest)-open self name version-  = liftIO-      (nullableToMaybe <$>-         (js_open (self) (toJSString name) (fromIntegral version)))- -foreign import javascript unsafe "$1[\"deleteDatabase\"]($2)"-        js_deleteDatabase ::-        IDBFactory -> JSString -> IO (Nullable IDBOpenDBRequest)---- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBFactory.deleteDatabase Mozilla IDBFactory.deleteDatabase documentation> -deleteDatabase ::-               (MonadIO m, ToJSString name) =>-                 IDBFactory -> name -> m (Maybe IDBOpenDBRequest)-deleteDatabase self name-  = liftIO-      (nullableToMaybe <$> (js_deleteDatabase (self) (toJSString name)))- -foreign import javascript unsafe "$1[\"cmp\"]($2, $3)" js_cmp ::-        IDBFactory -> JSVal -> JSVal -> IO Int---- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBFactory.cmp Mozilla IDBFactory.cmp documentation> -cmp :: (MonadIO m) => IDBFactory -> JSVal -> JSVal -> m Int-cmp self first second = liftIO (js_cmp (self) first second)

− src/GHCJS/DOM/JSFFI/Generated/IDBIndex.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/IDBKeyRange.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/IDBObjectStore.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/IDBOpenDBRequest.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/IDBRequest.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/IDBTransaction.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/IDBVersionChangeEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/ImageData.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/InspectorFrontendHost.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/InternalSettings.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/Internals.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/KeyboardEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/Location.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MallocStatistics.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MediaController.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MediaControlsHost.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MediaElementAudioSourceNode.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MediaError.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MediaKeyError.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MediaKeyEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MediaKeyMessageEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MediaKeyNeededEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MediaKeySession.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MediaKeys.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MediaList.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MediaQueryList.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MediaQueryListListener.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MediaSource.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MediaSourceStates.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MediaStream.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MediaStreamAudioDestinationNode.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MediaStreamAudioSourceNode.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MediaStreamEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MediaStreamTrack.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MediaStreamTrackEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MediaStreamTrackSourcesCallback.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MediaTrackConstraints.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MemoryInfo.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MessageChannel.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MessageEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MessagePort.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MimeType.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MimeTypeArray.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MouseEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MutationEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MutationObserver.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/MutationRecord.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/NamedNodeMap.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/Navigator.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/NavigatorUserMediaError.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/NavigatorUserMediaErrorCallback.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/NavigatorUserMediaSuccessCallback.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/Node.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/NodeFilter.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/NodeIterator.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/NodeList.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/Notification.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/NotificationCenter.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/NotificationPermissionCallback.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/OESStandardDerivatives.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/OESTextureHalfFloat.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/OESVertexArrayObject.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/OfflineAudioCompletionEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/OfflineAudioContext.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/OscillatorNode.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/OverflowEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/PageTransitionEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/PannerNode.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/Path2D.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/Performance.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/PerformanceEntry.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/PerformanceEntryList.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/PerformanceNavigation.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/PerformanceResourceTiming.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/PerformanceTiming.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/Plugin.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/PluginArray.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/PopStateEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/PositionCallback.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/PositionError.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/PositionErrorCallback.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/ProcessingInstruction.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/ProgressEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/QuickTimePluginReplacement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/RGBColor.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/RTCConfiguration.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/RTCDTMFSender.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/RTCDTMFToneChangeEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/RTCDataChannel.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/RTCDataChannelEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/RTCIceCandidate.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/RTCIceCandidateEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/RTCIceServer.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/RTCPeerConnection.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/RTCPeerConnectionErrorCallback.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/RTCSessionDescription.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/RTCSessionDescriptionCallback.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/RTCStatsCallback.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/RTCStatsReport.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/RTCStatsResponse.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/RadioNodeList.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/Range.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/ReadableStream.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/Rect.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/RequestAnimationFrameCallback.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SQLError.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SQLResultSet.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SQLResultSetRowList.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SQLStatementCallback.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SQLStatementErrorCallback.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SQLTransaction.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SQLTransactionCallback.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SQLTransactionErrorCallback.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGAElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGAltGlyphElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGAngle.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedAngle.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedBoolean.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedEnumeration.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedInteger.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedLength.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedLengthList.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedNumber.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedNumberList.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedPreserveAspectRatio.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedRect.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedString.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedTransformList.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGAnimationElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGCircleElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGClipPathElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGColor.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGComponentTransferFunctionElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGCursorElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGDocument.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGEllipseElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGExternalResourcesRequired.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGFEBlendElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGFEColorMatrixElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGFEComponentTransferElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGFECompositeElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGFEConvolveMatrixElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGFEDiffuseLightingElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGFEDisplacementMapElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGFEDistantLightElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGFEDropShadowElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGFEGaussianBlurElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGFEImageElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGFEMergeNodeElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGFEMorphologyElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGFEOffsetElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGFEPointLightElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGFESpecularLightingElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGFESpotLightElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGFETileElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGFETurbulenceElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGFilterElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGFilterPrimitiveStandardAttributes.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGFitToViewBox.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGForeignObjectElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGGlyphRefElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGGradientElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGGraphicsElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGImageElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGLength.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGLengthList.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGLineElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGLinearGradientElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGMarkerElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGMaskElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGMatrix.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGNumber.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGNumberList.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPaint.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPathElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPathSeg.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPathSegArcAbs.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPathSegArcRel.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPathSegCurvetoCubicAbs.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPathSegCurvetoCubicRel.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPathSegCurvetoCubicSmoothAbs.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPathSegCurvetoCubicSmoothRel.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPathSegCurvetoQuadraticAbs.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPathSegCurvetoQuadraticRel.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPathSegCurvetoQuadraticSmoothAbs.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPathSegCurvetoQuadraticSmoothRel.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPathSegLinetoAbs.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPathSegLinetoHorizontalAbs.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPathSegLinetoHorizontalRel.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPathSegLinetoRel.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPathSegLinetoVerticalAbs.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPathSegLinetoVerticalRel.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPathSegList.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPathSegMovetoAbs.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPathSegMovetoRel.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPatternElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPoint.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPointList.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPolygonElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPolylineElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGPreserveAspectRatio.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGRadialGradientElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGRect.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGRectElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGRenderingIntent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGSVGElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGScriptElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGStopElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGStringList.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGStyleElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGTests.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGTextContentElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGTextPathElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGTextPositioningElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGTransform.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGTransformList.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGURIReference.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGUnitTypes.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGUseElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGViewElement.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGViewSpec.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGZoomAndPan.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SVGZoomEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/Screen.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/ScriptProcessorNode.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/ScriptProfile.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/ScriptProfileNode.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SecurityPolicy.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SecurityPolicyViolationEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/Selection.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SourceBuffer.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SourceBufferList.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SourceInfo.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SpeechSynthesis.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SpeechSynthesisEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SpeechSynthesisUtterance.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SpeechSynthesisVoice.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/Storage.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/StorageErrorCallback.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/StorageEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/StorageInfo.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/StorageQuota.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/StorageQuotaCallback.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/StorageUsageCallback.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/StringCallback.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/StyleMedia.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/StyleSheet.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/StyleSheetList.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/SubtleCrypto.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/Text.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/TextEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/TextMetrics.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/TextTrack.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/TextTrackCue.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/TextTrackCueList.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/TextTrackList.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/TimeRanges.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/Touch.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/TouchEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/TouchList.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/TrackEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/TransitionEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/TreeWalker.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/TypeConversions.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/UIEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/UIRequestEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/URL.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/URLUtils.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/UserMessageHandler.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/VTTCue.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/VTTRegion.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/VTTRegionList.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/ValidityState.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/VideoPlaybackQuality.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/VideoStreamTrack.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/VideoTrack.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/VideoTrackList.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/VoidCallback.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WaveShaperNode.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WebGL2RenderingContext.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WebGLActiveInfo.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WebGLCompressedTextureATC.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WebGLCompressedTexturePVRTC.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WebGLCompressedTextureS3TC.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WebGLContextAttributes.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WebGLContextEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WebGLDebugRendererInfo.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WebGLDebugShaders.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WebGLDepthTexture.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WebGLDrawBuffers.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WebGLLoseContext.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WebGLRenderingContextBase.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WebGLShaderPrecisionFormat.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WebKitAnimationEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WebKitCSSFilterValue.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WebKitCSSMatrix.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WebKitCSSRegionRule.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WebKitCSSTransformValue.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WebKitCSSViewportRule.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WebKitNamedFlow.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WebKitNamespace.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WebKitPlaybackTargetAvailabilityEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WebKitPoint.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WebKitTransitionEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WebSocket.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WheelEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/Window.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WindowBase64.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WindowTimers.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/Worker.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WorkerGlobalScope.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WorkerLocation.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/WorkerNavigator.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/XMLHttpRequest.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/XMLHttpRequestProgressEvent.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/XMLHttpRequestUpload.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/XMLSerializer.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/XPathEvaluator.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/XPathExpression.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/XPathNSResolver.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/XPathResult.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Generated/XSLTProcessor.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Geolocation.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/MediaStreamTrack.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Navigator.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/NavigatorUserMediaError.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/PositionError.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/RTCPeerConnection.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/RTCPeerConnectionError.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/SQLError.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/SQLTransaction.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/Window.hs

file too large to diff

− src/GHCJS/DOM/JSFFI/XMLHttpRequest.hs

file too large to diff

− src/GHCJS/DOM/KeyboardEvent.hs

file too large to diff

− src/GHCJS/DOM/Location.hs

file too large to diff

− src/GHCJS/DOM/MallocStatistics.hs

file too large to diff

− src/GHCJS/DOM/MediaController.hs

file too large to diff

− src/GHCJS/DOM/MediaControlsHost.hs

file too large to diff

− src/GHCJS/DOM/MediaElementAudioSourceNode.hs

file too large to diff

− src/GHCJS/DOM/MediaError.hs

file too large to diff

− src/GHCJS/DOM/MediaKeyError.hs

file too large to diff

− src/GHCJS/DOM/MediaKeyEvent.hs

file too large to diff

− src/GHCJS/DOM/MediaKeyMessageEvent.hs

file too large to diff

− src/GHCJS/DOM/MediaKeyNeededEvent.hs

file too large to diff

− src/GHCJS/DOM/MediaKeySession.hs

file too large to diff

− src/GHCJS/DOM/MediaKeys.hs

file too large to diff

− src/GHCJS/DOM/MediaList.hs

file too large to diff

− src/GHCJS/DOM/MediaQueryList.hs

file too large to diff

− src/GHCJS/DOM/MediaQueryListListener.hs

file too large to diff

− src/GHCJS/DOM/MediaSource.hs

file too large to diff

− src/GHCJS/DOM/MediaSourceStates.hs

file too large to diff

− src/GHCJS/DOM/MediaStream.hs

file too large to diff

− src/GHCJS/DOM/MediaStreamAudioDestinationNode.hs

file too large to diff

− src/GHCJS/DOM/MediaStreamAudioSourceNode.hs

file too large to diff

− src/GHCJS/DOM/MediaStreamEvent.hs

file too large to diff

− src/GHCJS/DOM/MediaStreamTrack.hs

file too large to diff

− src/GHCJS/DOM/MediaStreamTrackEvent.hs

file too large to diff

− src/GHCJS/DOM/MediaStreamTrackSourcesCallback.hs

file too large to diff

− src/GHCJS/DOM/MediaTrackConstraints.hs

file too large to diff

− src/GHCJS/DOM/MemoryInfo.hs

file too large to diff

− src/GHCJS/DOM/MessageChannel.hs

file too large to diff

− src/GHCJS/DOM/MessageEvent.hs

file too large to diff

− src/GHCJS/DOM/MessagePort.hs

file too large to diff

− src/GHCJS/DOM/MimeType.hs

file too large to diff

− src/GHCJS/DOM/MimeTypeArray.hs

file too large to diff

− src/GHCJS/DOM/MouseEvent.hs

file too large to diff

− src/GHCJS/DOM/MutationEvent.hs

file too large to diff

− src/GHCJS/DOM/MutationObserver.hs

file too large to diff

− src/GHCJS/DOM/MutationRecord.hs

file too large to diff

− src/GHCJS/DOM/NamedNodeMap.hs

file too large to diff

− src/GHCJS/DOM/Navigator.hs

file too large to diff

− src/GHCJS/DOM/NavigatorUserMediaError.hs

file too large to diff

− src/GHCJS/DOM/NavigatorUserMediaErrorCallback.hs

file too large to diff

− src/GHCJS/DOM/NavigatorUserMediaSuccessCallback.hs

file too large to diff

− src/GHCJS/DOM/Node.hs

file too large to diff

− src/GHCJS/DOM/NodeFilter.hs

file too large to diff

− src/GHCJS/DOM/NodeIterator.hs

file too large to diff

− src/GHCJS/DOM/NodeList.hs

file too large to diff

− src/GHCJS/DOM/Notification.hs

file too large to diff

− src/GHCJS/DOM/NotificationCenter.hs

file too large to diff

− src/GHCJS/DOM/NotificationPermissionCallback.hs

file too large to diff

− src/GHCJS/DOM/OESStandardDerivatives.hs

file too large to diff

− src/GHCJS/DOM/OESTextureHalfFloat.hs

file too large to diff

− src/GHCJS/DOM/OESVertexArrayObject.hs

file too large to diff

− src/GHCJS/DOM/OfflineAudioCompletionEvent.hs

file too large to diff

− src/GHCJS/DOM/OfflineAudioContext.hs

file too large to diff

− src/GHCJS/DOM/OscillatorNode.hs

file too large to diff

− src/GHCJS/DOM/OverflowEvent.hs

file too large to diff

− src/GHCJS/DOM/PageTransitionEvent.hs

file too large to diff

− src/GHCJS/DOM/PannerNode.hs

file too large to diff

− src/GHCJS/DOM/Path2D.hs

file too large to diff

− src/GHCJS/DOM/Performance.hs

file too large to diff

− src/GHCJS/DOM/PerformanceEntry.hs

file too large to diff

− src/GHCJS/DOM/PerformanceEntryList.hs

file too large to diff

− src/GHCJS/DOM/PerformanceNavigation.hs

file too large to diff

− src/GHCJS/DOM/PerformanceResourceTiming.hs

file too large to diff

− src/GHCJS/DOM/PerformanceTiming.hs

file too large to diff

− src/GHCJS/DOM/Plugin.hs

file too large to diff

− src/GHCJS/DOM/PluginArray.hs

file too large to diff

− src/GHCJS/DOM/PopStateEvent.hs

file too large to diff

− src/GHCJS/DOM/PositionCallback.hs

file too large to diff

− src/GHCJS/DOM/PositionError.hs

file too large to diff

− src/GHCJS/DOM/PositionErrorCallback.hs

file too large to diff

− src/GHCJS/DOM/ProcessingInstruction.hs

file too large to diff

− src/GHCJS/DOM/ProgressEvent.hs

file too large to diff

− src/GHCJS/DOM/QuickTimePluginReplacement.hs

file too large to diff

− src/GHCJS/DOM/RGBColor.hs

file too large to diff

− src/GHCJS/DOM/RTCConfiguration.hs

file too large to diff

− src/GHCJS/DOM/RTCDTMFSender.hs

file too large to diff

− src/GHCJS/DOM/RTCDTMFToneChangeEvent.hs

file too large to diff

− src/GHCJS/DOM/RTCDataChannel.hs

file too large to diff

− src/GHCJS/DOM/RTCDataChannelEvent.hs

file too large to diff

− src/GHCJS/DOM/RTCIceCandidate.hs

file too large to diff

− src/GHCJS/DOM/RTCIceCandidateEvent.hs

file too large to diff

− src/GHCJS/DOM/RTCIceServer.hs

file too large to diff

− src/GHCJS/DOM/RTCPeerConnection.hs

file too large to diff

− src/GHCJS/DOM/RTCPeerConnectionErrorCallback.hs

file too large to diff

− src/GHCJS/DOM/RTCSessionDescription.hs

file too large to diff

− src/GHCJS/DOM/RTCSessionDescriptionCallback.hs

file too large to diff

− src/GHCJS/DOM/RTCStatsCallback.hs

file too large to diff

− src/GHCJS/DOM/RTCStatsReport.hs

file too large to diff

− src/GHCJS/DOM/RTCStatsResponse.hs

file too large to diff

− src/GHCJS/DOM/RadioNodeList.hs

file too large to diff

− src/GHCJS/DOM/Range.hs

file too large to diff

− src/GHCJS/DOM/ReadableStream.hs

file too large to diff

− src/GHCJS/DOM/Rect.hs

file too large to diff

− src/GHCJS/DOM/RequestAnimationFrameCallback.hs

file too large to diff

− src/GHCJS/DOM/SQLError.hs

file too large to diff

− src/GHCJS/DOM/SQLResultSet.hs

file too large to diff

− src/GHCJS/DOM/SQLResultSetRowList.hs

file too large to diff

− src/GHCJS/DOM/SQLStatementCallback.hs

file too large to diff

− src/GHCJS/DOM/SQLStatementErrorCallback.hs

file too large to diff

− src/GHCJS/DOM/SQLTransaction.hs

file too large to diff

− src/GHCJS/DOM/SQLTransactionCallback.hs

file too large to diff

− src/GHCJS/DOM/SQLTransactionErrorCallback.hs

file too large to diff

− src/GHCJS/DOM/SVGAElement.hs

file too large to diff

− src/GHCJS/DOM/SVGAltGlyphElement.hs

file too large to diff

− src/GHCJS/DOM/SVGAngle.hs

file too large to diff

− src/GHCJS/DOM/SVGAnimatedAngle.hs

file too large to diff

− src/GHCJS/DOM/SVGAnimatedBoolean.hs

file too large to diff

− src/GHCJS/DOM/SVGAnimatedEnumeration.hs

file too large to diff

− src/GHCJS/DOM/SVGAnimatedInteger.hs

file too large to diff

− src/GHCJS/DOM/SVGAnimatedLength.hs

file too large to diff

− src/GHCJS/DOM/SVGAnimatedLengthList.hs

file too large to diff

− src/GHCJS/DOM/SVGAnimatedNumber.hs

file too large to diff

− src/GHCJS/DOM/SVGAnimatedNumberList.hs

file too large to diff

− src/GHCJS/DOM/SVGAnimatedPreserveAspectRatio.hs

file too large to diff

− src/GHCJS/DOM/SVGAnimatedRect.hs

file too large to diff

− src/GHCJS/DOM/SVGAnimatedString.hs

file too large to diff

− src/GHCJS/DOM/SVGAnimatedTransformList.hs

file too large to diff

− src/GHCJS/DOM/SVGAnimationElement.hs

file too large to diff

− src/GHCJS/DOM/SVGCircleElement.hs

file too large to diff

− src/GHCJS/DOM/SVGClipPathElement.hs

file too large to diff

− src/GHCJS/DOM/SVGColor.hs

file too large to diff

− src/GHCJS/DOM/SVGComponentTransferFunctionElement.hs

file too large to diff

− src/GHCJS/DOM/SVGCursorElement.hs

file too large to diff

− src/GHCJS/DOM/SVGDocument.hs

file too large to diff

− src/GHCJS/DOM/SVGElement.hs

file too large to diff

− src/GHCJS/DOM/SVGEllipseElement.hs

file too large to diff

− src/GHCJS/DOM/SVGExternalResourcesRequired.hs

file too large to diff

− src/GHCJS/DOM/SVGFEBlendElement.hs

file too large to diff

− src/GHCJS/DOM/SVGFEColorMatrixElement.hs

file too large to diff

− src/GHCJS/DOM/SVGFEComponentTransferElement.hs

file too large to diff

− src/GHCJS/DOM/SVGFECompositeElement.hs

file too large to diff

− src/GHCJS/DOM/SVGFEConvolveMatrixElement.hs

file too large to diff

− src/GHCJS/DOM/SVGFEDiffuseLightingElement.hs

file too large to diff

− src/GHCJS/DOM/SVGFEDisplacementMapElement.hs

file too large to diff

− src/GHCJS/DOM/SVGFEDistantLightElement.hs

file too large to diff

− src/GHCJS/DOM/SVGFEDropShadowElement.hs

file too large to diff

− src/GHCJS/DOM/SVGFEGaussianBlurElement.hs

file too large to diff

− src/GHCJS/DOM/SVGFEImageElement.hs

file too large to diff

− src/GHCJS/DOM/SVGFEMergeNodeElement.hs

file too large to diff

− src/GHCJS/DOM/SVGFEMorphologyElement.hs

file too large to diff

− src/GHCJS/DOM/SVGFEOffsetElement.hs

file too large to diff

− src/GHCJS/DOM/SVGFEPointLightElement.hs

file too large to diff

− src/GHCJS/DOM/SVGFESpecularLightingElement.hs

file too large to diff

− src/GHCJS/DOM/SVGFESpotLightElement.hs

file too large to diff

− src/GHCJS/DOM/SVGFETileElement.hs

file too large to diff

− src/GHCJS/DOM/SVGFETurbulenceElement.hs

file too large to diff

− src/GHCJS/DOM/SVGFilterElement.hs

file too large to diff

− src/GHCJS/DOM/SVGFilterPrimitiveStandardAttributes.hs

file too large to diff

− src/GHCJS/DOM/SVGFitToViewBox.hs

file too large to diff

− src/GHCJS/DOM/SVGForeignObjectElement.hs

file too large to diff

− src/GHCJS/DOM/SVGGlyphRefElement.hs

file too large to diff

− src/GHCJS/DOM/SVGGradientElement.hs

file too large to diff

− src/GHCJS/DOM/SVGGraphicsElement.hs

file too large to diff

− src/GHCJS/DOM/SVGImageElement.hs

file too large to diff

− src/GHCJS/DOM/SVGLength.hs

file too large to diff

− src/GHCJS/DOM/SVGLengthList.hs

file too large to diff

− src/GHCJS/DOM/SVGLineElement.hs

file too large to diff

− src/GHCJS/DOM/SVGLinearGradientElement.hs

file too large to diff

− src/GHCJS/DOM/SVGMarkerElement.hs

file too large to diff

− src/GHCJS/DOM/SVGMaskElement.hs

file too large to diff

− src/GHCJS/DOM/SVGMatrix.hs

file too large to diff

− src/GHCJS/DOM/SVGNumber.hs

file too large to diff

− src/GHCJS/DOM/SVGNumberList.hs

file too large to diff

− src/GHCJS/DOM/SVGPaint.hs

file too large to diff

− src/GHCJS/DOM/SVGPathElement.hs

file too large to diff

− src/GHCJS/DOM/SVGPathSeg.hs

file too large to diff

− src/GHCJS/DOM/SVGPathSegArcAbs.hs

file too large to diff

− src/GHCJS/DOM/SVGPathSegArcRel.hs

file too large to diff

− src/GHCJS/DOM/SVGPathSegCurvetoCubicAbs.hs

file too large to diff

− src/GHCJS/DOM/SVGPathSegCurvetoCubicRel.hs

file too large to diff

− src/GHCJS/DOM/SVGPathSegCurvetoCubicSmoothAbs.hs

file too large to diff

− src/GHCJS/DOM/SVGPathSegCurvetoCubicSmoothRel.hs

file too large to diff

− src/GHCJS/DOM/SVGPathSegCurvetoQuadraticAbs.hs

file too large to diff

− src/GHCJS/DOM/SVGPathSegCurvetoQuadraticRel.hs

file too large to diff

− src/GHCJS/DOM/SVGPathSegCurvetoQuadraticSmoothAbs.hs

file too large to diff

− src/GHCJS/DOM/SVGPathSegCurvetoQuadraticSmoothRel.hs

file too large to diff

− src/GHCJS/DOM/SVGPathSegLinetoAbs.hs

file too large to diff

− src/GHCJS/DOM/SVGPathSegLinetoHorizontalAbs.hs

file too large to diff

− src/GHCJS/DOM/SVGPathSegLinetoHorizontalRel.hs

file too large to diff

− src/GHCJS/DOM/SVGPathSegLinetoRel.hs

file too large to diff

− src/GHCJS/DOM/SVGPathSegLinetoVerticalAbs.hs

file too large to diff

− src/GHCJS/DOM/SVGPathSegLinetoVerticalRel.hs

file too large to diff

− src/GHCJS/DOM/SVGPathSegList.hs

file too large to diff

− src/GHCJS/DOM/SVGPathSegMovetoAbs.hs

file too large to diff

− src/GHCJS/DOM/SVGPathSegMovetoRel.hs

file too large to diff

− src/GHCJS/DOM/SVGPatternElement.hs

file too large to diff

− src/GHCJS/DOM/SVGPoint.hs

file too large to diff

− src/GHCJS/DOM/SVGPointList.hs

file too large to diff

− src/GHCJS/DOM/SVGPolygonElement.hs

file too large to diff

− src/GHCJS/DOM/SVGPolylineElement.hs

file too large to diff

− src/GHCJS/DOM/SVGPreserveAspectRatio.hs

file too large to diff

− src/GHCJS/DOM/SVGRadialGradientElement.hs

file too large to diff

− src/GHCJS/DOM/SVGRect.hs

file too large to diff

− src/GHCJS/DOM/SVGRectElement.hs

file too large to diff

− src/GHCJS/DOM/SVGRenderingIntent.hs

file too large to diff

− src/GHCJS/DOM/SVGSVGElement.hs

file too large to diff

− src/GHCJS/DOM/SVGScriptElement.hs

file too large to diff

− src/GHCJS/DOM/SVGStopElement.hs

file too large to diff

− src/GHCJS/DOM/SVGStringList.hs

file too large to diff

− src/GHCJS/DOM/SVGStyleElement.hs

file too large to diff

− src/GHCJS/DOM/SVGTests.hs

file too large to diff

− src/GHCJS/DOM/SVGTextContentElement.hs

file too large to diff

− src/GHCJS/DOM/SVGTextPathElement.hs

file too large to diff

− src/GHCJS/DOM/SVGTextPositioningElement.hs

file too large to diff

− src/GHCJS/DOM/SVGTransform.hs

file too large to diff

− src/GHCJS/DOM/SVGTransformList.hs

file too large to diff

− src/GHCJS/DOM/SVGURIReference.hs

file too large to diff

− src/GHCJS/DOM/SVGUnitTypes.hs

file too large to diff

− src/GHCJS/DOM/SVGUseElement.hs

file too large to diff

− src/GHCJS/DOM/SVGViewElement.hs

file too large to diff

− src/GHCJS/DOM/SVGViewSpec.hs

file too large to diff

− src/GHCJS/DOM/SVGZoomAndPan.hs

file too large to diff

− src/GHCJS/DOM/SVGZoomEvent.hs

file too large to diff

− src/GHCJS/DOM/Screen.hs

file too large to diff

− src/GHCJS/DOM/ScriptProcessorNode.hs

file too large to diff

− src/GHCJS/DOM/ScriptProfile.hs

file too large to diff

− src/GHCJS/DOM/ScriptProfileNode.hs

file too large to diff

− src/GHCJS/DOM/SecurityPolicy.hs

file too large to diff

− src/GHCJS/DOM/SecurityPolicyViolationEvent.hs

file too large to diff

− src/GHCJS/DOM/Selection.hs

file too large to diff

− src/GHCJS/DOM/SourceBuffer.hs

file too large to diff

− src/GHCJS/DOM/SourceBufferList.hs

file too large to diff

− src/GHCJS/DOM/SourceInfo.hs

file too large to diff

− src/GHCJS/DOM/SpeechSynthesis.hs

file too large to diff

− src/GHCJS/DOM/SpeechSynthesisEvent.hs

file too large to diff

− src/GHCJS/DOM/SpeechSynthesisUtterance.hs

file too large to diff

− src/GHCJS/DOM/SpeechSynthesisVoice.hs

file too large to diff

− src/GHCJS/DOM/Storage.hs

file too large to diff

− src/GHCJS/DOM/StorageErrorCallback.hs

file too large to diff

− src/GHCJS/DOM/StorageEvent.hs

file too large to diff

− src/GHCJS/DOM/StorageInfo.hs

file too large to diff

− src/GHCJS/DOM/StorageQuota.hs

file too large to diff

− src/GHCJS/DOM/StorageQuotaCallback.hs

file too large to diff

− src/GHCJS/DOM/StorageUsageCallback.hs

file too large to diff

− src/GHCJS/DOM/StringCallback.hs

file too large to diff

− src/GHCJS/DOM/StyleMedia.hs

file too large to diff

− src/GHCJS/DOM/StyleSheet.hs

file too large to diff

− src/GHCJS/DOM/StyleSheetList.hs

file too large to diff

− src/GHCJS/DOM/SubtleCrypto.hs

file too large to diff

− src/GHCJS/DOM/Text.hs

file too large to diff

− src/GHCJS/DOM/TextEvent.hs

file too large to diff

− src/GHCJS/DOM/TextMetrics.hs

file too large to diff

− src/GHCJS/DOM/TextTrack.hs

file too large to diff

− src/GHCJS/DOM/TextTrackCue.hs

file too large to diff

− src/GHCJS/DOM/TextTrackCueList.hs

file too large to diff

− src/GHCJS/DOM/TextTrackList.hs

file too large to diff

− src/GHCJS/DOM/TimeRanges.hs

file too large to diff

− src/GHCJS/DOM/Touch.hs

file too large to diff

− src/GHCJS/DOM/TouchEvent.hs

file too large to diff

− src/GHCJS/DOM/TouchList.hs

file too large to diff

− src/GHCJS/DOM/TrackEvent.hs

file too large to diff

− src/GHCJS/DOM/TransitionEvent.hs

file too large to diff

− src/GHCJS/DOM/TreeWalker.hs

file too large to diff

− src/GHCJS/DOM/TypeConversions.hs

file too large to diff

− src/GHCJS/DOM/Types.hs

file too large to diff

− src/GHCJS/DOM/UIEvent.hs

file too large to diff

− src/GHCJS/DOM/UIRequestEvent.hs

file too large to diff

− src/GHCJS/DOM/URL.hs

file too large to diff

− src/GHCJS/DOM/URLUtils.hs

file too large to diff

− src/GHCJS/DOM/UserMessageHandler.hs

file too large to diff

− src/GHCJS/DOM/VTTCue.hs

file too large to diff

− src/GHCJS/DOM/VTTRegion.hs

file too large to diff

− src/GHCJS/DOM/VTTRegionList.hs

file too large to diff

− src/GHCJS/DOM/ValidityState.hs

file too large to diff

− src/GHCJS/DOM/VideoPlaybackQuality.hs

file too large to diff

− src/GHCJS/DOM/VideoStreamTrack.hs

file too large to diff

− src/GHCJS/DOM/VideoTrack.hs

file too large to diff

− src/GHCJS/DOM/VideoTrackList.hs

file too large to diff

− src/GHCJS/DOM/VoidCallback.hs

file too large to diff

− src/GHCJS/DOM/WaveShaperNode.hs

file too large to diff

− src/GHCJS/DOM/WebGL2RenderingContext.hs

file too large to diff

− src/GHCJS/DOM/WebGLActiveInfo.hs

file too large to diff

− src/GHCJS/DOM/WebGLCompressedTextureATC.hs

file too large to diff

− src/GHCJS/DOM/WebGLCompressedTexturePVRTC.hs

file too large to diff

− src/GHCJS/DOM/WebGLCompressedTextureS3TC.hs

file too large to diff

− src/GHCJS/DOM/WebGLContextAttributes.hs

file too large to diff

− src/GHCJS/DOM/WebGLContextEvent.hs

file too large to diff

− src/GHCJS/DOM/WebGLDebugRendererInfo.hs

file too large to diff

− src/GHCJS/DOM/WebGLDebugShaders.hs

file too large to diff

− src/GHCJS/DOM/WebGLDepthTexture.hs

file too large to diff

− src/GHCJS/DOM/WebGLDrawBuffers.hs

file too large to diff

− src/GHCJS/DOM/WebGLLoseContext.hs

file too large to diff

− src/GHCJS/DOM/WebGLRenderingContextBase.hs

file too large to diff

− src/GHCJS/DOM/WebGLShaderPrecisionFormat.hs

file too large to diff

− src/GHCJS/DOM/WebKitAnimationEvent.hs

file too large to diff

− src/GHCJS/DOM/WebKitCSSFilterValue.hs

file too large to diff

− src/GHCJS/DOM/WebKitCSSMatrix.hs

file too large to diff

− src/GHCJS/DOM/WebKitCSSRegionRule.hs

file too large to diff

− src/GHCJS/DOM/WebKitCSSTransformValue.hs

file too large to diff

− src/GHCJS/DOM/WebKitCSSViewportRule.hs

file too large to diff

− src/GHCJS/DOM/WebKitNamedFlow.hs

file too large to diff

− src/GHCJS/DOM/WebKitNamespace.hs

file too large to diff

− src/GHCJS/DOM/WebKitPlaybackTargetAvailabilityEvent.hs

file too large to diff

− src/GHCJS/DOM/WebKitPoint.hs

file too large to diff

− src/GHCJS/DOM/WebKitTransitionEvent.hs

file too large to diff

− src/GHCJS/DOM/WebSocket.hs

file too large to diff

− src/GHCJS/DOM/WheelEvent.hs

file too large to diff

− src/GHCJS/DOM/Window.hs

file too large to diff

− src/GHCJS/DOM/WindowBase64.hs

file too large to diff

− src/GHCJS/DOM/WindowTimers.hs

file too large to diff

− src/GHCJS/DOM/Worker.hs

file too large to diff

− src/GHCJS/DOM/WorkerGlobalScope.hs

file too large to diff

− src/GHCJS/DOM/WorkerLocation.hs

file too large to diff

− src/GHCJS/DOM/WorkerNavigator.hs

file too large to diff

− src/GHCJS/DOM/XMLHttpRequest.hs

file too large to diff

− src/GHCJS/DOM/XMLHttpRequestProgressEvent.hs

file too large to diff

− src/GHCJS/DOM/XMLHttpRequestUpload.hs

file too large to diff

− src/GHCJS/DOM/XMLSerializer.hs

file too large to diff

− src/GHCJS/DOM/XPathEvaluator.hs

file too large to diff

− src/GHCJS/DOM/XPathExpression.hs

file too large to diff

− src/GHCJS/DOM/XPathNSResolver.hs

file too large to diff

− src/GHCJS/DOM/XPathResult.hs

file too large to diff

− src/GHCJS/DOM/XSLTProcessor.hs

file too large to diff