module GHCJS.DOM.Types (
JSContextRef(..), JSM, askJSM, runJSM, MonadJSM(..), liftJSM
, DOMContext(..), DOM, askDOM, runDOM, MonadDOM(..), liftDOM
, JSVal(..), ToJSVal(..), FromJSVal(..), PToJSVal(..), PFromJSVal(..)
, JSString(..), ToJSString(..), FromJSString(..)
, toJSString, fromJSString, toMaybeJSString, fromMaybeJSString
, Nullable(..), nullableToMaybe, maybeToNullable
, DOMString(..), ToDOMString(..), FromDOMString(..), IsDOMString
, maybeJSNullOrUndefined, GType(..)
, GObject(..), IsGObject, toGObject, gTypeGObject, isA, objectToString
, castTo, unsafeCastTo, uncheckedCastTo
, js_eq, strictEqual
, AudioBufferCallback(..)
, DatabaseCallback(..)
, MediaQueryListListener(..)
, MediaStreamTrackSourcesCallback(..)
, NavigatorUserMediaErrorCallback(..)
, NavigatorUserMediaSuccessCallback(..)
, NotificationPermissionCallback(..)
, PositionCallback(..)
, PositionErrorCallback(..)
, RequestAnimationFrameCallback(..)
, RTCPeerConnectionErrorCallback(..)
, RTCSessionDescriptionCallback(..)
, RTCStatsCallback(..)
, SQLStatementCallback(..)
, SQLStatementErrorCallback(..)
, SQLTransactionCallback(..)
, SQLTransactionErrorCallback(..)
, StorageErrorCallback(..)
, StorageQuotaCallback(..)
, StorageUsageCallback(..)
, StringCallback(..)
, VoidCallback(..)
, Dictionary(Dictionary), unDictionary, IsDictionary, toDictionary
, BlobPropertyBag(BlobPropertyBag), unBlobPropertyBag, IsBlobPropertyBag, toBlobPropertyBag
, MutationCallback(MutationCallback), unMutationCallback, IsMutationCallback, toMutationCallback
, Promise(Promise), unPromise, IsPromise, toPromise, gTypePromise
, Date(Date), unDate, IsDate, toDate, gTypeDate
, Array(Array), unArray, IsArray, toArray, gTypeArray
, ObjectArray(ObjectArray), unObjectArray, IsObjectArray, toObjectArray
, ArrayBuffer(ArrayBuffer), unArrayBuffer, IsArrayBuffer, toArrayBuffer, gTypeArrayBuffer
, ArrayBufferView(ArrayBufferView), unArrayBufferView, IsArrayBufferView, toArrayBufferView
, Float32Array(Float32Array), unFloat32Array, IsFloat32Array, toFloat32Array, gTypeFloat32Array
, Float64Array(Float64Array), unFloat64Array, IsFloat64Array, toFloat64Array, gTypeFloat64Array
, Uint8Array(Uint8Array), unUint8Array, IsUint8Array, toUint8Array, gTypeUint8Array
, Uint8ClampedArray(Uint8ClampedArray), unUint8ClampedArray, IsUint8ClampedArray, toUint8ClampedArray, gTypeUint8ClampedArray
, Uint16Array(Uint16Array), unUint16Array, IsUint16Array, toUint16Array, gTypeUint16Array
, Uint32Array(Uint32Array), unUint32Array, IsUint32Array, toUint32Array, gTypeUint32Array
, Int8Array(Int8Array), unInt8Array, IsInt8Array, toInt8Array, gTypeInt8Array
, Int16Array(Int16Array), unInt16Array, IsInt16Array, toInt16Array, gTypeInt16Array
, Int32Array(Int32Array), unInt32Array, IsInt32Array, toInt32Array, gTypeInt32Array
, SerializedScriptValue(SerializedScriptValue), unSerializedScriptValue, IsSerializedScriptValue, toSerializedScriptValue
, PositionOptions(PositionOptions), unPositionOptions, IsPositionOptions, toPositionOptions
, Acceleration(Acceleration), unAcceleration, IsAcceleration, toAcceleration
, RotationRate(RotationRate), unRotationRate, IsRotationRate, toRotationRate
, Algorithm(Algorithm), unAlgorithm, IsAlgorithm, toAlgorithm
, CryptoOperationData(CryptoOperationData), unCryptoOperationData, IsCryptoOperationData, toCryptoOperationData
, CanvasStyle(CanvasStyle), unCanvasStyle, IsCanvasStyle, toCanvasStyle
, DOMException(DOMException), unDOMException, IsDOMException, toDOMException
, GLenum(..), GLboolean(..), GLbitfield(..), GLbyte(..), GLshort(..), GLint(..), GLsizei(..)
, GLintptr(..), GLsizeiptr(..), GLubyte(..), GLushort(..), GLuint(..), GLfloat(..), GLclampf(..)
, GLint64, GLuint64
, HasCallStack
, ANGLEInstancedArrays(ANGLEInstancedArrays), unANGLEInstancedArrays, gTypeANGLEInstancedArrays
, AbstractView(AbstractView), unAbstractView, gTypeAbstractView
, AbstractWorker(AbstractWorker), unAbstractWorker, gTypeAbstractWorker
, AllAudioCapabilities(AllAudioCapabilities), unAllAudioCapabilities, gTypeAllAudioCapabilities
, AllVideoCapabilities(AllVideoCapabilities), unAllVideoCapabilities, gTypeAllVideoCapabilities
, AnalyserNode(AnalyserNode), unAnalyserNode, gTypeAnalyserNode
, AnimationEvent(AnimationEvent), unAnimationEvent, gTypeAnimationEvent
, ApplicationCache(ApplicationCache), unApplicationCache, gTypeApplicationCache
, Attr(Attr), unAttr, gTypeAttr
, AudioBuffer(AudioBuffer), unAudioBuffer, gTypeAudioBuffer
, AudioBufferSourceNode(AudioBufferSourceNode), unAudioBufferSourceNode, gTypeAudioBufferSourceNode
, AudioContext(AudioContext), unAudioContext, IsAudioContext, toAudioContext, gTypeAudioContext
, AudioDestinationNode(AudioDestinationNode), unAudioDestinationNode, gTypeAudioDestinationNode
, AudioListener(AudioListener), unAudioListener, gTypeAudioListener
, AudioNode(AudioNode), unAudioNode, IsAudioNode, toAudioNode, gTypeAudioNode
, AudioParam(AudioParam), unAudioParam, gTypeAudioParam
, AudioProcessingEvent(AudioProcessingEvent), unAudioProcessingEvent, gTypeAudioProcessingEvent
, AudioStreamTrack(AudioStreamTrack), unAudioStreamTrack, gTypeAudioStreamTrack
, AudioTrack(AudioTrack), unAudioTrack, gTypeAudioTrack
, AudioTrackList(AudioTrackList), unAudioTrackList, gTypeAudioTrackList
, AutocompleteErrorEvent(AutocompleteErrorEvent), unAutocompleteErrorEvent, gTypeAutocompleteErrorEvent
, BarProp(BarProp), unBarProp, gTypeBarProp
, BatteryManager(BatteryManager), unBatteryManager, gTypeBatteryManager
, BeforeLoadEvent(BeforeLoadEvent), unBeforeLoadEvent, gTypeBeforeLoadEvent
, BeforeUnloadEvent(BeforeUnloadEvent), unBeforeUnloadEvent, gTypeBeforeUnloadEvent
, BiquadFilterNode(BiquadFilterNode), unBiquadFilterNode, gTypeBiquadFilterNode
, Blob(Blob), unBlob, IsBlob, toBlob, gTypeBlob
, CDATASection(CDATASection), unCDATASection, gTypeCDATASection
, CSS(CSS), unCSS, gTypeCSS
, CSSCharsetRule(CSSCharsetRule), unCSSCharsetRule, gTypeCSSCharsetRule
, CSSFontFaceLoadEvent(CSSFontFaceLoadEvent), unCSSFontFaceLoadEvent, gTypeCSSFontFaceLoadEvent
, CSSFontFaceRule(CSSFontFaceRule), unCSSFontFaceRule, gTypeCSSFontFaceRule
, CSSImportRule(CSSImportRule), unCSSImportRule, gTypeCSSImportRule
, CSSKeyframeRule(CSSKeyframeRule), unCSSKeyframeRule, gTypeCSSKeyframeRule
, CSSKeyframesRule(CSSKeyframesRule), unCSSKeyframesRule, gTypeCSSKeyframesRule
, CSSMediaRule(CSSMediaRule), unCSSMediaRule, gTypeCSSMediaRule
, CSSPageRule(CSSPageRule), unCSSPageRule, gTypeCSSPageRule
, CSSPrimitiveValue(CSSPrimitiveValue), unCSSPrimitiveValue, gTypeCSSPrimitiveValue
, CSSRule(CSSRule), unCSSRule, IsCSSRule, toCSSRule, gTypeCSSRule
, CSSRuleList(CSSRuleList), unCSSRuleList, gTypeCSSRuleList
, CSSStyleDeclaration(CSSStyleDeclaration), unCSSStyleDeclaration, gTypeCSSStyleDeclaration
, CSSStyleRule(CSSStyleRule), unCSSStyleRule, gTypeCSSStyleRule
, CSSStyleSheet(CSSStyleSheet), unCSSStyleSheet, gTypeCSSStyleSheet
, CSSSupportsRule(CSSSupportsRule), unCSSSupportsRule, gTypeCSSSupportsRule
, CSSUnknownRule(CSSUnknownRule), unCSSUnknownRule, gTypeCSSUnknownRule
, CSSValue(CSSValue), unCSSValue, IsCSSValue, toCSSValue, gTypeCSSValue
, CSSValueList(CSSValueList), unCSSValueList, IsCSSValueList, toCSSValueList, gTypeCSSValueList
, CanvasGradient(CanvasGradient), unCanvasGradient, gTypeCanvasGradient
, CanvasPattern(CanvasPattern), unCanvasPattern, gTypeCanvasPattern
, CanvasProxy(CanvasProxy), unCanvasProxy, gTypeCanvasProxy
, CanvasRenderingContext(CanvasRenderingContext), unCanvasRenderingContext, IsCanvasRenderingContext, toCanvasRenderingContext, gTypeCanvasRenderingContext
, CanvasRenderingContext2D(CanvasRenderingContext2D), unCanvasRenderingContext2D, gTypeCanvasRenderingContext2D
, CapabilityRange(CapabilityRange), unCapabilityRange, gTypeCapabilityRange
, ChannelMergerNode(ChannelMergerNode), unChannelMergerNode, gTypeChannelMergerNode
, ChannelSplitterNode(ChannelSplitterNode), unChannelSplitterNode, gTypeChannelSplitterNode
, CharacterData(CharacterData), unCharacterData, IsCharacterData, toCharacterData, gTypeCharacterData
, ChildNode(ChildNode), unChildNode, gTypeChildNode
, ClientRect(ClientRect), unClientRect, gTypeClientRect
, ClientRectList(ClientRectList), unClientRectList, gTypeClientRectList
, CloseEvent(CloseEvent), unCloseEvent, gTypeCloseEvent
, CommandLineAPIHost(CommandLineAPIHost), unCommandLineAPIHost, gTypeCommandLineAPIHost
, Comment(Comment), unComment, gTypeComment
, CompositionEvent(CompositionEvent), unCompositionEvent, gTypeCompositionEvent
, ConvolverNode(ConvolverNode), unConvolverNode, gTypeConvolverNode
, Coordinates(Coordinates), unCoordinates, gTypeCoordinates
, Counter(Counter), unCounter, gTypeCounter
, Crypto(Crypto), unCrypto, gTypeCrypto
, CryptoKey(CryptoKey), unCryptoKey, gTypeCryptoKey
, CryptoKeyPair(CryptoKeyPair), unCryptoKeyPair, gTypeCryptoKeyPair
, CustomEvent(CustomEvent), unCustomEvent, gTypeCustomEvent
, DOMError(DOMError), unDOMError, IsDOMError, toDOMError, gTypeDOMError
, DOMImplementation(DOMImplementation), unDOMImplementation, gTypeDOMImplementation
, DOMNamedFlowCollection(DOMNamedFlowCollection), unDOMNamedFlowCollection, gTypeDOMNamedFlowCollection
, DOMParser(DOMParser), unDOMParser, gTypeDOMParser
, DOMSettableTokenList(DOMSettableTokenList), unDOMSettableTokenList, gTypeDOMSettableTokenList
, DOMStringList(DOMStringList), unDOMStringList, gTypeDOMStringList
, DOMStringMap(DOMStringMap), unDOMStringMap, gTypeDOMStringMap
, DOMTokenList(DOMTokenList), unDOMTokenList, IsDOMTokenList, toDOMTokenList, gTypeDOMTokenList
, DataCue(DataCue), unDataCue, gTypeDataCue
, DataTransfer(DataTransfer), unDataTransfer, gTypeDataTransfer
, DataTransferItem(DataTransferItem), unDataTransferItem, gTypeDataTransferItem
, DataTransferItemList(DataTransferItemList), unDataTransferItemList, gTypeDataTransferItemList
, Database(Database), unDatabase, gTypeDatabase
, DedicatedWorkerGlobalScope(DedicatedWorkerGlobalScope), unDedicatedWorkerGlobalScope, gTypeDedicatedWorkerGlobalScope
, DelayNode(DelayNode), unDelayNode, gTypeDelayNode
, DeviceMotionEvent(DeviceMotionEvent), unDeviceMotionEvent, gTypeDeviceMotionEvent
, DeviceOrientationEvent(DeviceOrientationEvent), unDeviceOrientationEvent, gTypeDeviceOrientationEvent
, DeviceProximityEvent(DeviceProximityEvent), unDeviceProximityEvent, gTypeDeviceProximityEvent
, Document(Document), unDocument, IsDocument, toDocument, gTypeDocument
, DocumentFragment(DocumentFragment), unDocumentFragment, gTypeDocumentFragment
, DocumentType(DocumentType), unDocumentType, gTypeDocumentType
, DynamicsCompressorNode(DynamicsCompressorNode), unDynamicsCompressorNode, gTypeDynamicsCompressorNode
, EXTBlendMinMax(EXTBlendMinMax), unEXTBlendMinMax, gTypeEXTBlendMinMax
, EXTFragDepth(EXTFragDepth), unEXTFragDepth, gTypeEXTFragDepth
, EXTShaderTextureLOD(EXTShaderTextureLOD), unEXTShaderTextureLOD, gTypeEXTShaderTextureLOD
, EXTTextureFilterAnisotropic(EXTTextureFilterAnisotropic), unEXTTextureFilterAnisotropic, gTypeEXTTextureFilterAnisotropic
, EXTsRGB(EXTsRGB), unEXTsRGB, gTypeEXTsRGB
, Element(Element), unElement, IsElement, toElement, gTypeElement
, Entity(Entity), unEntity, gTypeEntity
, EntityReference(EntityReference), unEntityReference, gTypeEntityReference
, ErrorEvent(ErrorEvent), unErrorEvent, gTypeErrorEvent
, Event(Event), unEvent, IsEvent, toEvent, gTypeEvent
, EventListener(EventListener), unEventListener, gTypeEventListener
, EventSource(EventSource), unEventSource, gTypeEventSource
, EventTarget(EventTarget), unEventTarget, IsEventTarget, toEventTarget, gTypeEventTarget
, File(File), unFile, gTypeFile
, FileError(FileError), unFileError, gTypeFileError
, FileList(FileList), unFileList, gTypeFileList
, FileReader(FileReader), unFileReader, gTypeFileReader
, FileReaderSync(FileReaderSync), unFileReaderSync, gTypeFileReaderSync
, FocusEvent(FocusEvent), unFocusEvent, gTypeFocusEvent
, FontLoader(FontLoader), unFontLoader, gTypeFontLoader
, FormData(FormData), unFormData, gTypeFormData
, GainNode(GainNode), unGainNode, gTypeGainNode
, Gamepad(Gamepad), unGamepad, gTypeGamepad
, GamepadButton(GamepadButton), unGamepadButton, gTypeGamepadButton
, GamepadEvent(GamepadEvent), unGamepadEvent, gTypeGamepadEvent
, Geolocation(Geolocation), unGeolocation, gTypeGeolocation
, Geoposition(Geoposition), unGeoposition, gTypeGeoposition
, HTMLAllCollection(HTMLAllCollection), unHTMLAllCollection, gTypeHTMLAllCollection
, HTMLAnchorElement(HTMLAnchorElement), unHTMLAnchorElement, gTypeHTMLAnchorElement
, HTMLAppletElement(HTMLAppletElement), unHTMLAppletElement, gTypeHTMLAppletElement
, HTMLAreaElement(HTMLAreaElement), unHTMLAreaElement, gTypeHTMLAreaElement
, HTMLAudioElement(HTMLAudioElement), unHTMLAudioElement, gTypeHTMLAudioElement
, HTMLBRElement(HTMLBRElement), unHTMLBRElement, gTypeHTMLBRElement
, HTMLBaseElement(HTMLBaseElement), unHTMLBaseElement, gTypeHTMLBaseElement
, HTMLBaseFontElement(HTMLBaseFontElement), unHTMLBaseFontElement, gTypeHTMLBaseFontElement
, HTMLBodyElement(HTMLBodyElement), unHTMLBodyElement, gTypeHTMLBodyElement
, HTMLButtonElement(HTMLButtonElement), unHTMLButtonElement, gTypeHTMLButtonElement
, HTMLCanvasElement(HTMLCanvasElement), unHTMLCanvasElement, gTypeHTMLCanvasElement
, HTMLCollection(HTMLCollection), unHTMLCollection, IsHTMLCollection, toHTMLCollection, gTypeHTMLCollection
, HTMLDListElement(HTMLDListElement), unHTMLDListElement, gTypeHTMLDListElement
, HTMLDataListElement(HTMLDataListElement), unHTMLDataListElement, gTypeHTMLDataListElement
, HTMLDetailsElement(HTMLDetailsElement), unHTMLDetailsElement, gTypeHTMLDetailsElement
, HTMLDirectoryElement(HTMLDirectoryElement), unHTMLDirectoryElement, gTypeHTMLDirectoryElement
, HTMLDivElement(HTMLDivElement), unHTMLDivElement, gTypeHTMLDivElement
, HTMLDocument(HTMLDocument), unHTMLDocument, gTypeHTMLDocument
, HTMLElement(HTMLElement), unHTMLElement, IsHTMLElement, toHTMLElement, gTypeHTMLElement
, HTMLEmbedElement(HTMLEmbedElement), unHTMLEmbedElement, gTypeHTMLEmbedElement
, HTMLFieldSetElement(HTMLFieldSetElement), unHTMLFieldSetElement, gTypeHTMLFieldSetElement
, HTMLFontElement(HTMLFontElement), unHTMLFontElement, gTypeHTMLFontElement
, HTMLFormControlsCollection(HTMLFormControlsCollection), unHTMLFormControlsCollection, gTypeHTMLFormControlsCollection
, HTMLFormElement(HTMLFormElement), unHTMLFormElement, gTypeHTMLFormElement
, HTMLFrameElement(HTMLFrameElement), unHTMLFrameElement, gTypeHTMLFrameElement
, HTMLFrameSetElement(HTMLFrameSetElement), unHTMLFrameSetElement, gTypeHTMLFrameSetElement
, HTMLHRElement(HTMLHRElement), unHTMLHRElement, gTypeHTMLHRElement
, HTMLHeadElement(HTMLHeadElement), unHTMLHeadElement, gTypeHTMLHeadElement
, HTMLHeadingElement(HTMLHeadingElement), unHTMLHeadingElement, gTypeHTMLHeadingElement
, HTMLHtmlElement(HTMLHtmlElement), unHTMLHtmlElement, gTypeHTMLHtmlElement
, HTMLIFrameElement(HTMLIFrameElement), unHTMLIFrameElement, gTypeHTMLIFrameElement
, HTMLImageElement(HTMLImageElement), unHTMLImageElement, gTypeHTMLImageElement
, HTMLInputElement(HTMLInputElement), unHTMLInputElement, gTypeHTMLInputElement
, HTMLKeygenElement(HTMLKeygenElement), unHTMLKeygenElement, gTypeHTMLKeygenElement
, HTMLLIElement(HTMLLIElement), unHTMLLIElement, gTypeHTMLLIElement
, HTMLLabelElement(HTMLLabelElement), unHTMLLabelElement, gTypeHTMLLabelElement
, HTMLLegendElement(HTMLLegendElement), unHTMLLegendElement, gTypeHTMLLegendElement
, HTMLLinkElement(HTMLLinkElement), unHTMLLinkElement, gTypeHTMLLinkElement
, HTMLMapElement(HTMLMapElement), unHTMLMapElement, gTypeHTMLMapElement
, HTMLMarqueeElement(HTMLMarqueeElement), unHTMLMarqueeElement, gTypeHTMLMarqueeElement
, HTMLMediaElement(HTMLMediaElement), unHTMLMediaElement, IsHTMLMediaElement, toHTMLMediaElement, gTypeHTMLMediaElement
, HTMLMenuElement(HTMLMenuElement), unHTMLMenuElement, gTypeHTMLMenuElement
, HTMLMetaElement(HTMLMetaElement), unHTMLMetaElement, gTypeHTMLMetaElement
, HTMLMeterElement(HTMLMeterElement), unHTMLMeterElement, gTypeHTMLMeterElement
, HTMLModElement(HTMLModElement), unHTMLModElement, gTypeHTMLModElement
, HTMLOListElement(HTMLOListElement), unHTMLOListElement, gTypeHTMLOListElement
, HTMLObjectElement(HTMLObjectElement), unHTMLObjectElement, gTypeHTMLObjectElement
, HTMLOptGroupElement(HTMLOptGroupElement), unHTMLOptGroupElement, gTypeHTMLOptGroupElement
, HTMLOptionElement(HTMLOptionElement), unHTMLOptionElement, gTypeHTMLOptionElement
, HTMLOptionsCollection(HTMLOptionsCollection), unHTMLOptionsCollection, gTypeHTMLOptionsCollection
, HTMLOutputElement(HTMLOutputElement), unHTMLOutputElement, gTypeHTMLOutputElement
, HTMLParagraphElement(HTMLParagraphElement), unHTMLParagraphElement, gTypeHTMLParagraphElement
, HTMLParamElement(HTMLParamElement), unHTMLParamElement, gTypeHTMLParamElement
, HTMLPreElement(HTMLPreElement), unHTMLPreElement, gTypeHTMLPreElement
, HTMLProgressElement(HTMLProgressElement), unHTMLProgressElement, gTypeHTMLProgressElement
, HTMLQuoteElement(HTMLQuoteElement), unHTMLQuoteElement, gTypeHTMLQuoteElement
, HTMLScriptElement(HTMLScriptElement), unHTMLScriptElement, gTypeHTMLScriptElement
, HTMLSelectElement(HTMLSelectElement), unHTMLSelectElement, gTypeHTMLSelectElement
, HTMLSourceElement(HTMLSourceElement), unHTMLSourceElement, gTypeHTMLSourceElement
, HTMLSpanElement(HTMLSpanElement), unHTMLSpanElement, gTypeHTMLSpanElement
, HTMLStyleElement(HTMLStyleElement), unHTMLStyleElement, gTypeHTMLStyleElement
, HTMLTableCaptionElement(HTMLTableCaptionElement), unHTMLTableCaptionElement, gTypeHTMLTableCaptionElement
, HTMLTableCellElement(HTMLTableCellElement), unHTMLTableCellElement, gTypeHTMLTableCellElement
, HTMLTableColElement(HTMLTableColElement), unHTMLTableColElement, gTypeHTMLTableColElement
, HTMLTableElement(HTMLTableElement), unHTMLTableElement, gTypeHTMLTableElement
, HTMLTableRowElement(HTMLTableRowElement), unHTMLTableRowElement, gTypeHTMLTableRowElement
, HTMLTableSectionElement(HTMLTableSectionElement), unHTMLTableSectionElement, gTypeHTMLTableSectionElement
, HTMLTemplateElement(HTMLTemplateElement), unHTMLTemplateElement, gTypeHTMLTemplateElement
, HTMLTextAreaElement(HTMLTextAreaElement), unHTMLTextAreaElement, gTypeHTMLTextAreaElement
, HTMLTitleElement(HTMLTitleElement), unHTMLTitleElement, gTypeHTMLTitleElement
, HTMLTrackElement(HTMLTrackElement), unHTMLTrackElement, gTypeHTMLTrackElement
, HTMLUListElement(HTMLUListElement), unHTMLUListElement, gTypeHTMLUListElement
, HTMLUnknownElement(HTMLUnknownElement), unHTMLUnknownElement, gTypeHTMLUnknownElement
, HTMLVideoElement(HTMLVideoElement), unHTMLVideoElement, gTypeHTMLVideoElement
, HashChangeEvent(HashChangeEvent), unHashChangeEvent, gTypeHashChangeEvent
, History(History), unHistory, gTypeHistory
, IDBAny(IDBAny), unIDBAny, gTypeIDBAny
, IDBCursor(IDBCursor), unIDBCursor, IsIDBCursor, toIDBCursor, gTypeIDBCursor
, IDBCursorWithValue(IDBCursorWithValue), unIDBCursorWithValue, gTypeIDBCursorWithValue
, IDBDatabase(IDBDatabase), unIDBDatabase, gTypeIDBDatabase
, IDBFactory(IDBFactory), unIDBFactory, gTypeIDBFactory
, IDBIndex(IDBIndex), unIDBIndex, gTypeIDBIndex
, IDBKeyRange(IDBKeyRange), unIDBKeyRange, gTypeIDBKeyRange
, IDBObjectStore(IDBObjectStore), unIDBObjectStore, gTypeIDBObjectStore
, IDBOpenDBRequest(IDBOpenDBRequest), unIDBOpenDBRequest, gTypeIDBOpenDBRequest
, IDBRequest(IDBRequest), unIDBRequest, IsIDBRequest, toIDBRequest, gTypeIDBRequest
, IDBTransaction(IDBTransaction), unIDBTransaction, gTypeIDBTransaction
, IDBVersionChangeEvent(IDBVersionChangeEvent), unIDBVersionChangeEvent, gTypeIDBVersionChangeEvent
, ImageData(ImageData), unImageData, gTypeImageData
, InspectorFrontendHost(InspectorFrontendHost), unInspectorFrontendHost, gTypeInspectorFrontendHost
, InternalSettings(InternalSettings), unInternalSettings, gTypeInternalSettings
, Internals(Internals), unInternals, gTypeInternals
, KeyboardEvent(KeyboardEvent), unKeyboardEvent, gTypeKeyboardEvent
, Location(Location), unLocation, gTypeLocation
, MallocStatistics(MallocStatistics), unMallocStatistics, gTypeMallocStatistics
, MediaController(MediaController), unMediaController, gTypeMediaController
, MediaControlsHost(MediaControlsHost), unMediaControlsHost, gTypeMediaControlsHost
, MediaElementAudioSourceNode(MediaElementAudioSourceNode), unMediaElementAudioSourceNode, gTypeMediaElementAudioSourceNode
, MediaError(MediaError), unMediaError, gTypeMediaError
, MediaKeyError(MediaKeyError), unMediaKeyError, gTypeMediaKeyError
, MediaKeyEvent(MediaKeyEvent), unMediaKeyEvent, gTypeMediaKeyEvent
, MediaKeyMessageEvent(MediaKeyMessageEvent), unMediaKeyMessageEvent, gTypeMediaKeyMessageEvent
, MediaKeyNeededEvent(MediaKeyNeededEvent), unMediaKeyNeededEvent, gTypeMediaKeyNeededEvent
, MediaKeySession(MediaKeySession), unMediaKeySession, gTypeMediaKeySession
, MediaKeys(MediaKeys), unMediaKeys, gTypeMediaKeys
, MediaList(MediaList), unMediaList, gTypeMediaList
, MediaQueryList(MediaQueryList), unMediaQueryList, gTypeMediaQueryList
, MediaSource(MediaSource), unMediaSource, gTypeMediaSource
, MediaSourceStates(MediaSourceStates), unMediaSourceStates, gTypeMediaSourceStates
, MediaStream(MediaStream), unMediaStream, gTypeMediaStream
, MediaStreamAudioDestinationNode(MediaStreamAudioDestinationNode), unMediaStreamAudioDestinationNode, gTypeMediaStreamAudioDestinationNode
, MediaStreamAudioSourceNode(MediaStreamAudioSourceNode), unMediaStreamAudioSourceNode, gTypeMediaStreamAudioSourceNode
, MediaStreamCapabilities(MediaStreamCapabilities), unMediaStreamCapabilities, IsMediaStreamCapabilities, toMediaStreamCapabilities, gTypeMediaStreamCapabilities
, MediaStreamEvent(MediaStreamEvent), unMediaStreamEvent, gTypeMediaStreamEvent
, MediaStreamTrack(MediaStreamTrack), unMediaStreamTrack, IsMediaStreamTrack, toMediaStreamTrack, gTypeMediaStreamTrack
, MediaStreamTrackEvent(MediaStreamTrackEvent), unMediaStreamTrackEvent, gTypeMediaStreamTrackEvent
, MediaTrackConstraint(MediaTrackConstraint), unMediaTrackConstraint, gTypeMediaTrackConstraint
, MediaTrackConstraintSet(MediaTrackConstraintSet), unMediaTrackConstraintSet, gTypeMediaTrackConstraintSet
, MediaTrackConstraints(MediaTrackConstraints), unMediaTrackConstraints, gTypeMediaTrackConstraints
, MemoryInfo(MemoryInfo), unMemoryInfo, gTypeMemoryInfo
, MessageChannel(MessageChannel), unMessageChannel, gTypeMessageChannel
, MessageEvent(MessageEvent), unMessageEvent, gTypeMessageEvent
, MessagePort(MessagePort), unMessagePort, gTypeMessagePort
, MimeType(MimeType), unMimeType, gTypeMimeType
, MimeTypeArray(MimeTypeArray), unMimeTypeArray, gTypeMimeTypeArray
, MouseEvent(MouseEvent), unMouseEvent, IsMouseEvent, toMouseEvent, gTypeMouseEvent
, MutationEvent(MutationEvent), unMutationEvent, gTypeMutationEvent
, MutationObserver(MutationObserver), unMutationObserver, gTypeMutationObserver
, MutationRecord(MutationRecord), unMutationRecord, gTypeMutationRecord
, NamedNodeMap(NamedNodeMap), unNamedNodeMap, gTypeNamedNodeMap
, Navigator(Navigator), unNavigator, gTypeNavigator
, NavigatorUserMediaError(NavigatorUserMediaError), unNavigatorUserMediaError, gTypeNavigatorUserMediaError
, Node(Node), unNode, IsNode, toNode, gTypeNode
, NodeFilter(NodeFilter), unNodeFilter, gTypeNodeFilter
, NodeIterator(NodeIterator), unNodeIterator, gTypeNodeIterator
, NodeList(NodeList), unNodeList, IsNodeList, toNodeList, gTypeNodeList
, Notification(Notification), unNotification, gTypeNotification
, NotificationCenter(NotificationCenter), unNotificationCenter, gTypeNotificationCenter
, OESElementIndexUint(OESElementIndexUint), unOESElementIndexUint, gTypeOESElementIndexUint
, OESStandardDerivatives(OESStandardDerivatives), unOESStandardDerivatives, gTypeOESStandardDerivatives
, OESTextureFloat(OESTextureFloat), unOESTextureFloat, gTypeOESTextureFloat
, OESTextureFloatLinear(OESTextureFloatLinear), unOESTextureFloatLinear, gTypeOESTextureFloatLinear
, OESTextureHalfFloat(OESTextureHalfFloat), unOESTextureHalfFloat, gTypeOESTextureHalfFloat
, OESTextureHalfFloatLinear(OESTextureHalfFloatLinear), unOESTextureHalfFloatLinear, gTypeOESTextureHalfFloatLinear
, OESVertexArrayObject(OESVertexArrayObject), unOESVertexArrayObject, gTypeOESVertexArrayObject
, OfflineAudioCompletionEvent(OfflineAudioCompletionEvent), unOfflineAudioCompletionEvent, gTypeOfflineAudioCompletionEvent
, OfflineAudioContext(OfflineAudioContext), unOfflineAudioContext, gTypeOfflineAudioContext
, OscillatorNode(OscillatorNode), unOscillatorNode, gTypeOscillatorNode
, OverflowEvent(OverflowEvent), unOverflowEvent, gTypeOverflowEvent
, PageTransitionEvent(PageTransitionEvent), unPageTransitionEvent, gTypePageTransitionEvent
, PannerNode(PannerNode), unPannerNode, gTypePannerNode
, Path2D(Path2D), unPath2D, gTypePath2D
, Performance(Performance), unPerformance, gTypePerformance
, PerformanceEntry(PerformanceEntry), unPerformanceEntry, IsPerformanceEntry, toPerformanceEntry, gTypePerformanceEntry
, PerformanceEntryList(PerformanceEntryList), unPerformanceEntryList, gTypePerformanceEntryList
, PerformanceMark(PerformanceMark), unPerformanceMark, gTypePerformanceMark
, PerformanceMeasure(PerformanceMeasure), unPerformanceMeasure, gTypePerformanceMeasure
, PerformanceNavigation(PerformanceNavigation), unPerformanceNavigation, gTypePerformanceNavigation
, PerformanceResourceTiming(PerformanceResourceTiming), unPerformanceResourceTiming, gTypePerformanceResourceTiming
, PerformanceTiming(PerformanceTiming), unPerformanceTiming, gTypePerformanceTiming
, PeriodicWave(PeriodicWave), unPeriodicWave, gTypePeriodicWave
, Plugin(Plugin), unPlugin, gTypePlugin
, PluginArray(PluginArray), unPluginArray, gTypePluginArray
, PopStateEvent(PopStateEvent), unPopStateEvent, gTypePopStateEvent
, PositionError(PositionError), unPositionError, gTypePositionError
, ProcessingInstruction(ProcessingInstruction), unProcessingInstruction, gTypeProcessingInstruction
, ProgressEvent(ProgressEvent), unProgressEvent, IsProgressEvent, toProgressEvent, gTypeProgressEvent
, QuickTimePluginReplacement(QuickTimePluginReplacement), unQuickTimePluginReplacement, gTypeQuickTimePluginReplacement
, RGBColor(RGBColor), unRGBColor, gTypeRGBColor
, RTCConfiguration(RTCConfiguration), unRTCConfiguration, gTypeRTCConfiguration
, RTCDTMFSender(RTCDTMFSender), unRTCDTMFSender, gTypeRTCDTMFSender
, RTCDTMFToneChangeEvent(RTCDTMFToneChangeEvent), unRTCDTMFToneChangeEvent, gTypeRTCDTMFToneChangeEvent
, RTCDataChannel(RTCDataChannel), unRTCDataChannel, gTypeRTCDataChannel
, RTCDataChannelEvent(RTCDataChannelEvent), unRTCDataChannelEvent, gTypeRTCDataChannelEvent
, RTCIceCandidate(RTCIceCandidate), unRTCIceCandidate, gTypeRTCIceCandidate
, RTCIceCandidateEvent(RTCIceCandidateEvent), unRTCIceCandidateEvent, gTypeRTCIceCandidateEvent
, RTCIceServer(RTCIceServer), unRTCIceServer, gTypeRTCIceServer
, RTCPeerConnection(RTCPeerConnection), unRTCPeerConnection, gTypeRTCPeerConnection
, RTCSessionDescription(RTCSessionDescription), unRTCSessionDescription, gTypeRTCSessionDescription
, RTCStatsReport(RTCStatsReport), unRTCStatsReport, gTypeRTCStatsReport
, RTCStatsResponse(RTCStatsResponse), unRTCStatsResponse, gTypeRTCStatsResponse
, RadioNodeList(RadioNodeList), unRadioNodeList, gTypeRadioNodeList
, Range(Range), unRange, gTypeRange
, ReadableStream(ReadableStream), unReadableStream, gTypeReadableStream
, Rect(Rect), unRect, gTypeRect
, SQLError(SQLError), unSQLError, gTypeSQLError
, SQLResultSet(SQLResultSet), unSQLResultSet, gTypeSQLResultSet
, SQLResultSetRowList(SQLResultSetRowList), unSQLResultSetRowList, gTypeSQLResultSetRowList
, SQLTransaction(SQLTransaction), unSQLTransaction, gTypeSQLTransaction
, SVGAElement(SVGAElement), unSVGAElement, gTypeSVGAElement
, SVGAltGlyphDefElement(SVGAltGlyphDefElement), unSVGAltGlyphDefElement, gTypeSVGAltGlyphDefElement
, SVGAltGlyphElement(SVGAltGlyphElement), unSVGAltGlyphElement, gTypeSVGAltGlyphElement
, SVGAltGlyphItemElement(SVGAltGlyphItemElement), unSVGAltGlyphItemElement, gTypeSVGAltGlyphItemElement
, SVGAngle(SVGAngle), unSVGAngle, gTypeSVGAngle
, SVGAnimateColorElement(SVGAnimateColorElement), unSVGAnimateColorElement, gTypeSVGAnimateColorElement
, SVGAnimateElement(SVGAnimateElement), unSVGAnimateElement, gTypeSVGAnimateElement
, SVGAnimateMotionElement(SVGAnimateMotionElement), unSVGAnimateMotionElement, gTypeSVGAnimateMotionElement
, SVGAnimateTransformElement(SVGAnimateTransformElement), unSVGAnimateTransformElement, gTypeSVGAnimateTransformElement
, SVGAnimatedAngle(SVGAnimatedAngle), unSVGAnimatedAngle, gTypeSVGAnimatedAngle
, SVGAnimatedBoolean(SVGAnimatedBoolean), unSVGAnimatedBoolean, gTypeSVGAnimatedBoolean
, SVGAnimatedEnumeration(SVGAnimatedEnumeration), unSVGAnimatedEnumeration, gTypeSVGAnimatedEnumeration
, SVGAnimatedInteger(SVGAnimatedInteger), unSVGAnimatedInteger, gTypeSVGAnimatedInteger
, SVGAnimatedLength(SVGAnimatedLength), unSVGAnimatedLength, gTypeSVGAnimatedLength
, SVGAnimatedLengthList(SVGAnimatedLengthList), unSVGAnimatedLengthList, gTypeSVGAnimatedLengthList
, SVGAnimatedNumber(SVGAnimatedNumber), unSVGAnimatedNumber, gTypeSVGAnimatedNumber
, SVGAnimatedNumberList(SVGAnimatedNumberList), unSVGAnimatedNumberList, gTypeSVGAnimatedNumberList
, SVGAnimatedPreserveAspectRatio(SVGAnimatedPreserveAspectRatio), unSVGAnimatedPreserveAspectRatio, gTypeSVGAnimatedPreserveAspectRatio
, SVGAnimatedRect(SVGAnimatedRect), unSVGAnimatedRect, gTypeSVGAnimatedRect
, SVGAnimatedString(SVGAnimatedString), unSVGAnimatedString, gTypeSVGAnimatedString
, SVGAnimatedTransformList(SVGAnimatedTransformList), unSVGAnimatedTransformList, gTypeSVGAnimatedTransformList
, SVGAnimationElement(SVGAnimationElement), unSVGAnimationElement, IsSVGAnimationElement, toSVGAnimationElement, gTypeSVGAnimationElement
, SVGCircleElement(SVGCircleElement), unSVGCircleElement, gTypeSVGCircleElement
, SVGClipPathElement(SVGClipPathElement), unSVGClipPathElement, gTypeSVGClipPathElement
, SVGColor(SVGColor), unSVGColor, IsSVGColor, toSVGColor, gTypeSVGColor
, SVGComponentTransferFunctionElement(SVGComponentTransferFunctionElement), unSVGComponentTransferFunctionElement, IsSVGComponentTransferFunctionElement, toSVGComponentTransferFunctionElement, gTypeSVGComponentTransferFunctionElement
, SVGCursorElement(SVGCursorElement), unSVGCursorElement, gTypeSVGCursorElement
, SVGDefsElement(SVGDefsElement), unSVGDefsElement, gTypeSVGDefsElement
, SVGDescElement(SVGDescElement), unSVGDescElement, gTypeSVGDescElement
, SVGDocument(SVGDocument), unSVGDocument, gTypeSVGDocument
, SVGElement(SVGElement), unSVGElement, IsSVGElement, toSVGElement, gTypeSVGElement
, SVGEllipseElement(SVGEllipseElement), unSVGEllipseElement, gTypeSVGEllipseElement
, SVGExternalResourcesRequired(SVGExternalResourcesRequired), unSVGExternalResourcesRequired, gTypeSVGExternalResourcesRequired
, SVGFEBlendElement(SVGFEBlendElement), unSVGFEBlendElement, gTypeSVGFEBlendElement
, SVGFEColorMatrixElement(SVGFEColorMatrixElement), unSVGFEColorMatrixElement, gTypeSVGFEColorMatrixElement
, SVGFEComponentTransferElement(SVGFEComponentTransferElement), unSVGFEComponentTransferElement, gTypeSVGFEComponentTransferElement
, SVGFECompositeElement(SVGFECompositeElement), unSVGFECompositeElement, gTypeSVGFECompositeElement
, SVGFEConvolveMatrixElement(SVGFEConvolveMatrixElement), unSVGFEConvolveMatrixElement, gTypeSVGFEConvolveMatrixElement
, SVGFEDiffuseLightingElement(SVGFEDiffuseLightingElement), unSVGFEDiffuseLightingElement, gTypeSVGFEDiffuseLightingElement
, SVGFEDisplacementMapElement(SVGFEDisplacementMapElement), unSVGFEDisplacementMapElement, gTypeSVGFEDisplacementMapElement
, SVGFEDistantLightElement(SVGFEDistantLightElement), unSVGFEDistantLightElement, gTypeSVGFEDistantLightElement
, SVGFEDropShadowElement(SVGFEDropShadowElement), unSVGFEDropShadowElement, gTypeSVGFEDropShadowElement
, SVGFEFloodElement(SVGFEFloodElement), unSVGFEFloodElement, gTypeSVGFEFloodElement
, SVGFEFuncAElement(SVGFEFuncAElement), unSVGFEFuncAElement, gTypeSVGFEFuncAElement
, SVGFEFuncBElement(SVGFEFuncBElement), unSVGFEFuncBElement, gTypeSVGFEFuncBElement
, SVGFEFuncGElement(SVGFEFuncGElement), unSVGFEFuncGElement, gTypeSVGFEFuncGElement
, SVGFEFuncRElement(SVGFEFuncRElement), unSVGFEFuncRElement, gTypeSVGFEFuncRElement
, SVGFEGaussianBlurElement(SVGFEGaussianBlurElement), unSVGFEGaussianBlurElement, gTypeSVGFEGaussianBlurElement
, SVGFEImageElement(SVGFEImageElement), unSVGFEImageElement, gTypeSVGFEImageElement
, SVGFEMergeElement(SVGFEMergeElement), unSVGFEMergeElement, gTypeSVGFEMergeElement
, SVGFEMergeNodeElement(SVGFEMergeNodeElement), unSVGFEMergeNodeElement, gTypeSVGFEMergeNodeElement
, SVGFEMorphologyElement(SVGFEMorphologyElement), unSVGFEMorphologyElement, gTypeSVGFEMorphologyElement
, SVGFEOffsetElement(SVGFEOffsetElement), unSVGFEOffsetElement, gTypeSVGFEOffsetElement
, SVGFEPointLightElement(SVGFEPointLightElement), unSVGFEPointLightElement, gTypeSVGFEPointLightElement
, SVGFESpecularLightingElement(SVGFESpecularLightingElement), unSVGFESpecularLightingElement, gTypeSVGFESpecularLightingElement
, SVGFESpotLightElement(SVGFESpotLightElement), unSVGFESpotLightElement, gTypeSVGFESpotLightElement
, SVGFETileElement(SVGFETileElement), unSVGFETileElement, gTypeSVGFETileElement
, SVGFETurbulenceElement(SVGFETurbulenceElement), unSVGFETurbulenceElement, gTypeSVGFETurbulenceElement
, SVGFilterElement(SVGFilterElement), unSVGFilterElement, gTypeSVGFilterElement
, SVGFilterPrimitiveStandardAttributes(SVGFilterPrimitiveStandardAttributes), unSVGFilterPrimitiveStandardAttributes, gTypeSVGFilterPrimitiveStandardAttributes
, SVGFitToViewBox(SVGFitToViewBox), unSVGFitToViewBox, gTypeSVGFitToViewBox
, SVGFontElement(SVGFontElement), unSVGFontElement, gTypeSVGFontElement
, SVGFontFaceElement(SVGFontFaceElement), unSVGFontFaceElement, gTypeSVGFontFaceElement
, SVGFontFaceFormatElement(SVGFontFaceFormatElement), unSVGFontFaceFormatElement, gTypeSVGFontFaceFormatElement
, SVGFontFaceNameElement(SVGFontFaceNameElement), unSVGFontFaceNameElement, gTypeSVGFontFaceNameElement
, SVGFontFaceSrcElement(SVGFontFaceSrcElement), unSVGFontFaceSrcElement, gTypeSVGFontFaceSrcElement
, SVGFontFaceUriElement(SVGFontFaceUriElement), unSVGFontFaceUriElement, gTypeSVGFontFaceUriElement
, SVGForeignObjectElement(SVGForeignObjectElement), unSVGForeignObjectElement, gTypeSVGForeignObjectElement
, SVGGElement(SVGGElement), unSVGGElement, gTypeSVGGElement
, SVGGlyphElement(SVGGlyphElement), unSVGGlyphElement, gTypeSVGGlyphElement
, SVGGlyphRefElement(SVGGlyphRefElement), unSVGGlyphRefElement, gTypeSVGGlyphRefElement
, SVGGradientElement(SVGGradientElement), unSVGGradientElement, IsSVGGradientElement, toSVGGradientElement, gTypeSVGGradientElement
, SVGGraphicsElement(SVGGraphicsElement), unSVGGraphicsElement, IsSVGGraphicsElement, toSVGGraphicsElement, gTypeSVGGraphicsElement
, SVGHKernElement(SVGHKernElement), unSVGHKernElement, gTypeSVGHKernElement
, SVGImageElement(SVGImageElement), unSVGImageElement, gTypeSVGImageElement
, SVGLength(SVGLength), unSVGLength, gTypeSVGLength
, SVGLengthList(SVGLengthList), unSVGLengthList, gTypeSVGLengthList
, SVGLineElement(SVGLineElement), unSVGLineElement, gTypeSVGLineElement
, SVGLinearGradientElement(SVGLinearGradientElement), unSVGLinearGradientElement, gTypeSVGLinearGradientElement
, SVGMPathElement(SVGMPathElement), unSVGMPathElement, gTypeSVGMPathElement
, SVGMarkerElement(SVGMarkerElement), unSVGMarkerElement, gTypeSVGMarkerElement
, SVGMaskElement(SVGMaskElement), unSVGMaskElement, gTypeSVGMaskElement
, SVGMatrix(SVGMatrix), unSVGMatrix, gTypeSVGMatrix
, SVGMetadataElement(SVGMetadataElement), unSVGMetadataElement, gTypeSVGMetadataElement
, SVGMissingGlyphElement(SVGMissingGlyphElement), unSVGMissingGlyphElement, gTypeSVGMissingGlyphElement
, SVGNumber(SVGNumber), unSVGNumber, gTypeSVGNumber
, SVGNumberList(SVGNumberList), unSVGNumberList, gTypeSVGNumberList
, SVGPaint(SVGPaint), unSVGPaint, gTypeSVGPaint
, SVGPathElement(SVGPathElement), unSVGPathElement, gTypeSVGPathElement
, SVGPathSeg(SVGPathSeg), unSVGPathSeg, IsSVGPathSeg, toSVGPathSeg, gTypeSVGPathSeg
, SVGPathSegArcAbs(SVGPathSegArcAbs), unSVGPathSegArcAbs, gTypeSVGPathSegArcAbs
, SVGPathSegArcRel(SVGPathSegArcRel), unSVGPathSegArcRel, gTypeSVGPathSegArcRel
, SVGPathSegClosePath(SVGPathSegClosePath), unSVGPathSegClosePath, gTypeSVGPathSegClosePath
, SVGPathSegCurvetoCubicAbs(SVGPathSegCurvetoCubicAbs), unSVGPathSegCurvetoCubicAbs, gTypeSVGPathSegCurvetoCubicAbs
, SVGPathSegCurvetoCubicRel(SVGPathSegCurvetoCubicRel), unSVGPathSegCurvetoCubicRel, gTypeSVGPathSegCurvetoCubicRel
, SVGPathSegCurvetoCubicSmoothAbs(SVGPathSegCurvetoCubicSmoothAbs), unSVGPathSegCurvetoCubicSmoothAbs, gTypeSVGPathSegCurvetoCubicSmoothAbs
, SVGPathSegCurvetoCubicSmoothRel(SVGPathSegCurvetoCubicSmoothRel), unSVGPathSegCurvetoCubicSmoothRel, gTypeSVGPathSegCurvetoCubicSmoothRel
, SVGPathSegCurvetoQuadraticAbs(SVGPathSegCurvetoQuadraticAbs), unSVGPathSegCurvetoQuadraticAbs, gTypeSVGPathSegCurvetoQuadraticAbs
, SVGPathSegCurvetoQuadraticRel(SVGPathSegCurvetoQuadraticRel), unSVGPathSegCurvetoQuadraticRel, gTypeSVGPathSegCurvetoQuadraticRel
, SVGPathSegCurvetoQuadraticSmoothAbs(SVGPathSegCurvetoQuadraticSmoothAbs), unSVGPathSegCurvetoQuadraticSmoothAbs, gTypeSVGPathSegCurvetoQuadraticSmoothAbs
, SVGPathSegCurvetoQuadraticSmoothRel(SVGPathSegCurvetoQuadraticSmoothRel), unSVGPathSegCurvetoQuadraticSmoothRel, gTypeSVGPathSegCurvetoQuadraticSmoothRel
, SVGPathSegLinetoAbs(SVGPathSegLinetoAbs), unSVGPathSegLinetoAbs, gTypeSVGPathSegLinetoAbs
, SVGPathSegLinetoHorizontalAbs(SVGPathSegLinetoHorizontalAbs), unSVGPathSegLinetoHorizontalAbs, gTypeSVGPathSegLinetoHorizontalAbs
, SVGPathSegLinetoHorizontalRel(SVGPathSegLinetoHorizontalRel), unSVGPathSegLinetoHorizontalRel, gTypeSVGPathSegLinetoHorizontalRel
, SVGPathSegLinetoRel(SVGPathSegLinetoRel), unSVGPathSegLinetoRel, gTypeSVGPathSegLinetoRel
, SVGPathSegLinetoVerticalAbs(SVGPathSegLinetoVerticalAbs), unSVGPathSegLinetoVerticalAbs, gTypeSVGPathSegLinetoVerticalAbs
, SVGPathSegLinetoVerticalRel(SVGPathSegLinetoVerticalRel), unSVGPathSegLinetoVerticalRel, gTypeSVGPathSegLinetoVerticalRel
, SVGPathSegList(SVGPathSegList), unSVGPathSegList, gTypeSVGPathSegList
, SVGPathSegMovetoAbs(SVGPathSegMovetoAbs), unSVGPathSegMovetoAbs, gTypeSVGPathSegMovetoAbs
, SVGPathSegMovetoRel(SVGPathSegMovetoRel), unSVGPathSegMovetoRel, gTypeSVGPathSegMovetoRel
, SVGPatternElement(SVGPatternElement), unSVGPatternElement, gTypeSVGPatternElement
, SVGPoint(SVGPoint), unSVGPoint, gTypeSVGPoint
, SVGPointList(SVGPointList), unSVGPointList, gTypeSVGPointList
, SVGPolygonElement(SVGPolygonElement), unSVGPolygonElement, gTypeSVGPolygonElement
, SVGPolylineElement(SVGPolylineElement), unSVGPolylineElement, gTypeSVGPolylineElement
, SVGPreserveAspectRatio(SVGPreserveAspectRatio), unSVGPreserveAspectRatio, gTypeSVGPreserveAspectRatio
, SVGRadialGradientElement(SVGRadialGradientElement), unSVGRadialGradientElement, gTypeSVGRadialGradientElement
, SVGRect(SVGRect), unSVGRect, gTypeSVGRect
, SVGRectElement(SVGRectElement), unSVGRectElement, gTypeSVGRectElement
, SVGRenderingIntent(SVGRenderingIntent), unSVGRenderingIntent, gTypeSVGRenderingIntent
, SVGSVGElement(SVGSVGElement), unSVGSVGElement, gTypeSVGSVGElement
, SVGScriptElement(SVGScriptElement), unSVGScriptElement, gTypeSVGScriptElement
, SVGSetElement(SVGSetElement), unSVGSetElement, gTypeSVGSetElement
, SVGStopElement(SVGStopElement), unSVGStopElement, gTypeSVGStopElement
, SVGStringList(SVGStringList), unSVGStringList, gTypeSVGStringList
, SVGStyleElement(SVGStyleElement), unSVGStyleElement, gTypeSVGStyleElement
, SVGSwitchElement(SVGSwitchElement), unSVGSwitchElement, gTypeSVGSwitchElement
, SVGSymbolElement(SVGSymbolElement), unSVGSymbolElement, gTypeSVGSymbolElement
, SVGTRefElement(SVGTRefElement), unSVGTRefElement, gTypeSVGTRefElement
, SVGTSpanElement(SVGTSpanElement), unSVGTSpanElement, gTypeSVGTSpanElement
, SVGTests(SVGTests), unSVGTests, gTypeSVGTests
, SVGTextContentElement(SVGTextContentElement), unSVGTextContentElement, IsSVGTextContentElement, toSVGTextContentElement, gTypeSVGTextContentElement
, SVGTextElement(SVGTextElement), unSVGTextElement, gTypeSVGTextElement
, SVGTextPathElement(SVGTextPathElement), unSVGTextPathElement, gTypeSVGTextPathElement
, SVGTextPositioningElement(SVGTextPositioningElement), unSVGTextPositioningElement, IsSVGTextPositioningElement, toSVGTextPositioningElement, gTypeSVGTextPositioningElement
, SVGTitleElement(SVGTitleElement), unSVGTitleElement, gTypeSVGTitleElement
, SVGTransform(SVGTransform), unSVGTransform, gTypeSVGTransform
, SVGTransformList(SVGTransformList), unSVGTransformList, gTypeSVGTransformList
, SVGURIReference(SVGURIReference), unSVGURIReference, gTypeSVGURIReference
, SVGUnitTypes(SVGUnitTypes), unSVGUnitTypes, gTypeSVGUnitTypes
, SVGUseElement(SVGUseElement), unSVGUseElement, gTypeSVGUseElement
, SVGVKernElement(SVGVKernElement), unSVGVKernElement, gTypeSVGVKernElement
, SVGViewElement(SVGViewElement), unSVGViewElement, gTypeSVGViewElement
, SVGViewSpec(SVGViewSpec), unSVGViewSpec, gTypeSVGViewSpec
, SVGZoomAndPan(SVGZoomAndPan), unSVGZoomAndPan, gTypeSVGZoomAndPan
, SVGZoomEvent(SVGZoomEvent), unSVGZoomEvent, gTypeSVGZoomEvent
, Screen(Screen), unScreen, gTypeScreen
, ScriptProcessorNode(ScriptProcessorNode), unScriptProcessorNode, gTypeScriptProcessorNode
, ScriptProfile(ScriptProfile), unScriptProfile, gTypeScriptProfile
, ScriptProfileNode(ScriptProfileNode), unScriptProfileNode, gTypeScriptProfileNode
, SecurityPolicy(SecurityPolicy), unSecurityPolicy, gTypeSecurityPolicy
, SecurityPolicyViolationEvent(SecurityPolicyViolationEvent), unSecurityPolicyViolationEvent, gTypeSecurityPolicyViolationEvent
, Selection(Selection), unSelection, gTypeSelection
, SourceBuffer(SourceBuffer), unSourceBuffer, gTypeSourceBuffer
, SourceBufferList(SourceBufferList), unSourceBufferList, gTypeSourceBufferList
, SourceInfo(SourceInfo), unSourceInfo, gTypeSourceInfo
, SpeechSynthesis(SpeechSynthesis), unSpeechSynthesis, gTypeSpeechSynthesis
, SpeechSynthesisEvent(SpeechSynthesisEvent), unSpeechSynthesisEvent, gTypeSpeechSynthesisEvent
, SpeechSynthesisUtterance(SpeechSynthesisUtterance), unSpeechSynthesisUtterance, gTypeSpeechSynthesisUtterance
, SpeechSynthesisVoice(SpeechSynthesisVoice), unSpeechSynthesisVoice, gTypeSpeechSynthesisVoice
, Storage(Storage), unStorage, gTypeStorage
, StorageEvent(StorageEvent), unStorageEvent, gTypeStorageEvent
, StorageInfo(StorageInfo), unStorageInfo, gTypeStorageInfo
, StorageQuota(StorageQuota), unStorageQuota, gTypeStorageQuota
, StyleMedia(StyleMedia), unStyleMedia, gTypeStyleMedia
, StyleSheet(StyleSheet), unStyleSheet, IsStyleSheet, toStyleSheet, gTypeStyleSheet
, StyleSheetList(StyleSheetList), unStyleSheetList, gTypeStyleSheetList
, SubtleCrypto(SubtleCrypto), unSubtleCrypto, gTypeSubtleCrypto
, Text(Text), unText, IsText, toText, gTypeText
, TextEvent(TextEvent), unTextEvent, gTypeTextEvent
, TextMetrics(TextMetrics), unTextMetrics, gTypeTextMetrics
, TextTrack(TextTrack), unTextTrack, gTypeTextTrack
, TextTrackCue(TextTrackCue), unTextTrackCue, IsTextTrackCue, toTextTrackCue, gTypeTextTrackCue
, TextTrackCueList(TextTrackCueList), unTextTrackCueList, gTypeTextTrackCueList
, TextTrackList(TextTrackList), unTextTrackList, gTypeTextTrackList
, TimeRanges(TimeRanges), unTimeRanges, gTypeTimeRanges
, Touch(Touch), unTouch, gTypeTouch
, TouchEvent(TouchEvent), unTouchEvent, gTypeTouchEvent
, TouchList(TouchList), unTouchList, gTypeTouchList
, TrackEvent(TrackEvent), unTrackEvent, gTypeTrackEvent
, TransitionEvent(TransitionEvent), unTransitionEvent, gTypeTransitionEvent
, TreeWalker(TreeWalker), unTreeWalker, gTypeTreeWalker
, TypeConversions(TypeConversions), unTypeConversions, gTypeTypeConversions
, UIEvent(UIEvent), unUIEvent, IsUIEvent, toUIEvent, gTypeUIEvent
, UIRequestEvent(UIRequestEvent), unUIRequestEvent, gTypeUIRequestEvent
, URL(URL), unURL, gTypeURL
, URLUtils(URLUtils), unURLUtils, gTypeURLUtils
, UserMessageHandler(UserMessageHandler), unUserMessageHandler, gTypeUserMessageHandler
, UserMessageHandlersNamespace(UserMessageHandlersNamespace), unUserMessageHandlersNamespace, gTypeUserMessageHandlersNamespace
, VTTCue(VTTCue), unVTTCue, gTypeVTTCue
, VTTRegion(VTTRegion), unVTTRegion, gTypeVTTRegion
, VTTRegionList(VTTRegionList), unVTTRegionList, gTypeVTTRegionList
, ValidityState(ValidityState), unValidityState, gTypeValidityState
, VideoPlaybackQuality(VideoPlaybackQuality), unVideoPlaybackQuality, gTypeVideoPlaybackQuality
, VideoStreamTrack(VideoStreamTrack), unVideoStreamTrack, gTypeVideoStreamTrack
, VideoTrack(VideoTrack), unVideoTrack, gTypeVideoTrack
, VideoTrackList(VideoTrackList), unVideoTrackList, gTypeVideoTrackList
, WaveShaperNode(WaveShaperNode), unWaveShaperNode, gTypeWaveShaperNode
, WebGL2RenderingContext(WebGL2RenderingContext), unWebGL2RenderingContext, gTypeWebGL2RenderingContext
, WebGLActiveInfo(WebGLActiveInfo), unWebGLActiveInfo, gTypeWebGLActiveInfo
, WebGLBuffer(WebGLBuffer), unWebGLBuffer, gTypeWebGLBuffer
, WebGLCompressedTextureATC(WebGLCompressedTextureATC), unWebGLCompressedTextureATC, gTypeWebGLCompressedTextureATC
, WebGLCompressedTexturePVRTC(WebGLCompressedTexturePVRTC), unWebGLCompressedTexturePVRTC, gTypeWebGLCompressedTexturePVRTC
, WebGLCompressedTextureS3TC(WebGLCompressedTextureS3TC), unWebGLCompressedTextureS3TC, gTypeWebGLCompressedTextureS3TC
, WebGLContextAttributes(WebGLContextAttributes), unWebGLContextAttributes, gTypeWebGLContextAttributes
, WebGLContextEvent(WebGLContextEvent), unWebGLContextEvent, gTypeWebGLContextEvent
, WebGLDebugRendererInfo(WebGLDebugRendererInfo), unWebGLDebugRendererInfo, gTypeWebGLDebugRendererInfo
, WebGLDebugShaders(WebGLDebugShaders), unWebGLDebugShaders, gTypeWebGLDebugShaders
, WebGLDepthTexture(WebGLDepthTexture), unWebGLDepthTexture, gTypeWebGLDepthTexture
, WebGLDrawBuffers(WebGLDrawBuffers), unWebGLDrawBuffers, gTypeWebGLDrawBuffers
, WebGLFramebuffer(WebGLFramebuffer), unWebGLFramebuffer, gTypeWebGLFramebuffer
, WebGLLoseContext(WebGLLoseContext), unWebGLLoseContext, gTypeWebGLLoseContext
, WebGLProgram(WebGLProgram), unWebGLProgram, gTypeWebGLProgram
, WebGLQuery(WebGLQuery), unWebGLQuery, gTypeWebGLQuery
, WebGLRenderbuffer(WebGLRenderbuffer), unWebGLRenderbuffer, gTypeWebGLRenderbuffer
, WebGLRenderingContext(WebGLRenderingContext), unWebGLRenderingContext, gTypeWebGLRenderingContext
, WebGLRenderingContextBase(WebGLRenderingContextBase), unWebGLRenderingContextBase, IsWebGLRenderingContextBase, toWebGLRenderingContextBase, gTypeWebGLRenderingContextBase
, WebGLSampler(WebGLSampler), unWebGLSampler, gTypeWebGLSampler
, WebGLShader(WebGLShader), unWebGLShader, gTypeWebGLShader
, WebGLShaderPrecisionFormat(WebGLShaderPrecisionFormat), unWebGLShaderPrecisionFormat, gTypeWebGLShaderPrecisionFormat
, WebGLSync(WebGLSync), unWebGLSync, gTypeWebGLSync
, WebGLTexture(WebGLTexture), unWebGLTexture, gTypeWebGLTexture
, WebGLTransformFeedback(WebGLTransformFeedback), unWebGLTransformFeedback, gTypeWebGLTransformFeedback
, WebGLUniformLocation(WebGLUniformLocation), unWebGLUniformLocation, gTypeWebGLUniformLocation
, WebGLVertexArrayObject(WebGLVertexArrayObject), unWebGLVertexArrayObject, gTypeWebGLVertexArrayObject
, WebGLVertexArrayObjectOES(WebGLVertexArrayObjectOES), unWebGLVertexArrayObjectOES, gTypeWebGLVertexArrayObjectOES
, WebKitAnimationEvent(WebKitAnimationEvent), unWebKitAnimationEvent, gTypeWebKitAnimationEvent
, WebKitCSSFilterValue(WebKitCSSFilterValue), unWebKitCSSFilterValue, gTypeWebKitCSSFilterValue
, WebKitCSSMatrix(WebKitCSSMatrix), unWebKitCSSMatrix, gTypeWebKitCSSMatrix
, WebKitCSSRegionRule(WebKitCSSRegionRule), unWebKitCSSRegionRule, gTypeWebKitCSSRegionRule
, WebKitCSSTransformValue(WebKitCSSTransformValue), unWebKitCSSTransformValue, gTypeWebKitCSSTransformValue
, WebKitCSSViewportRule(WebKitCSSViewportRule), unWebKitCSSViewportRule, gTypeWebKitCSSViewportRule
, WebKitNamedFlow(WebKitNamedFlow), unWebKitNamedFlow, gTypeWebKitNamedFlow
, WebKitNamespace(WebKitNamespace), unWebKitNamespace, gTypeWebKitNamespace
, WebKitPlaybackTargetAvailabilityEvent(WebKitPlaybackTargetAvailabilityEvent), unWebKitPlaybackTargetAvailabilityEvent, gTypeWebKitPlaybackTargetAvailabilityEvent
, WebKitPoint(WebKitPoint), unWebKitPoint, gTypeWebKitPoint
, WebKitTransitionEvent(WebKitTransitionEvent), unWebKitTransitionEvent, gTypeWebKitTransitionEvent
, WebSocket(WebSocket), unWebSocket, gTypeWebSocket
, WheelEvent(WheelEvent), unWheelEvent, gTypeWheelEvent
, Window(Window), unWindow, gTypeWindow
, WindowBase64(WindowBase64), unWindowBase64, gTypeWindowBase64
, WindowTimers(WindowTimers), unWindowTimers, gTypeWindowTimers
, Worker(Worker), unWorker, gTypeWorker
, WorkerGlobalScope(WorkerGlobalScope), unWorkerGlobalScope, IsWorkerGlobalScope, toWorkerGlobalScope, gTypeWorkerGlobalScope
, WorkerLocation(WorkerLocation), unWorkerLocation, gTypeWorkerLocation
, WorkerNavigator(WorkerNavigator), unWorkerNavigator, gTypeWorkerNavigator
, XMLHttpRequest(XMLHttpRequest), unXMLHttpRequest, gTypeXMLHttpRequest
, XMLHttpRequestProgressEvent(XMLHttpRequestProgressEvent), unXMLHttpRequestProgressEvent, gTypeXMLHttpRequestProgressEvent
, XMLHttpRequestUpload(XMLHttpRequestUpload), unXMLHttpRequestUpload, gTypeXMLHttpRequestUpload
, XMLSerializer(XMLSerializer), unXMLSerializer, gTypeXMLSerializer
, XPathEvaluator(XPathEvaluator), unXPathEvaluator, gTypeXPathEvaluator
, XPathExpression(XPathExpression), unXPathExpression, gTypeXPathExpression
, XPathNSResolver(XPathNSResolver), unXPathNSResolver, gTypeXPathNSResolver
, XPathResult(XPathResult), unXPathResult, gTypeXPathResult
, XSLTProcessor(XSLTProcessor), unXSLTProcessor, gTypeXSLTProcessor
) where
import Control.Applicative ((<$>))
import qualified Data.Text as T (unpack, Text)
import qualified Data.Text.Lazy as LT (Text)
import Data.JSString (pack, unpack)
import Data.JSString.Text (textToJSString, textFromJSString, lazyTextToJSString, lazyTextFromJSString)
import GHCJS.Types (JSVal(..), nullRef, isNull, isUndefined, JSString(..))
import GHCJS.Marshal (ToJSVal(..), FromJSVal(..))
import GHCJS.Marshal.Pure (PToJSVal(..), PFromJSVal(..))
import GHCJS.Nullable (Nullable(..), nullableToMaybe, maybeToNullable)
import GHCJS.Foreign.Callback.Internal (Callback(..))
import Control.Monad.IO.Class (MonadIO(..))
import Data.Int (Int8, Int16, Int32, Int64)
import Data.Word (Word8, Word16, Word32, Word64)
import Data.Coerce (coerce, Coercible)
import Data.Monoid ((<>))
#if MIN_VERSION_base(4,9,0)
import GHC.Stack (HasCallStack)
#else
import GHC.Exts (Constraint)
type HasCallStack = (() :: Constraint)
#endif
type JSContextRef = ()
type DOMContext = ()
type JSM = IO
type DOM = IO
type MonadJSM = MonadIO
type MonadDOM = MonadIO
liftJSM :: MonadJSM m => JSM a -> m a
liftJSM = liftIO
liftDOM :: MonadDOM m => DOM a -> m a
liftDOM = liftIO
askJSM :: MonadJSM m => m JSContextRef
askJSM = return ()
askDOM :: MonadDOM m => m DOMContext
askDOM = return ()
runJSM :: MonadIO m => JSM a -> JSContextRef -> m a
runJSM f = liftIO . const f
runDOM :: MonadIO m => DOM a -> DOMContext -> m a
runDOM f = liftIO . const f
maybeJSNullOrUndefined :: JSVal -> Maybe JSVal
maybeJSNullOrUndefined r | isNull r || isUndefined r = Nothing
maybeJSNullOrUndefined r = Just r
propagateGError = id
newtype GType = GType JSVal
foreign import javascript unsafe "$r = $1.name;" gTypeToString :: GType -> JSString
foreign import javascript unsafe
"$1===$2" js_eq :: JSVal -> JSVal -> Bool
strictEqual :: (ToJSVal a, ToJSVal b) => a -> b -> JSM Bool
strictEqual a b = do
aval <- toJSVal a
bval <- toJSVal b
return $ js_eq aval bval
foreign import javascript unsafe "h$isInstanceOf $1 $2"
typeInstanceIsA' :: JSVal -> JSVal -> Bool
typeInstanceIsA o (GType t) = typeInstanceIsA' o t
castTo :: forall obj obj' m. (IsGObject obj, IsGObject obj', MonadJSM m) => (JSVal -> obj') -> obj -> m (Maybe obj')
castTo constructor obj = liftJSM $ do
let gtype = typeGType (undefined :: obj')
jsval = coerce obj
if typeInstanceIsA jsval gtype
then return . Just $ constructor jsval
else return Nothing
unsafeCastTo :: forall obj obj' m. (HasCallStack, IsGObject obj, IsGObject obj', MonadJSM m) => (JSVal -> obj') -> obj -> m obj'
unsafeCastTo constructor obj = liftJSM $ do
let gtype = typeGType (undefined :: obj')
jsval = coerce obj
if typeInstanceIsA jsval gtype
then return $ constructor jsval
else do
let srcType = textFromJSString . gTypeToString $ typeGType obj
destType = textFromJSString . gTypeToString $ typeGType (undefined :: obj')
error $ "unsafeCastTo :: invalid conversion from " <> T.unpack srcType <> " to "
<> T.unpack destType <> " requested."
uncheckedCastTo :: (IsGObject obj, IsGObject obj') => (JSVal -> obj') -> obj -> obj'
uncheckedCastTo constructor = constructor . coerce
isA :: IsGObject o => o -> GType -> Bool
isA obj = typeInstanceIsA (unGObject $ toGObject obj)
newtype GObject = GObject { unGObject :: JSVal }
class (ToJSVal o, FromJSVal o, Coercible o JSVal) => IsGObject o where
typeGType :: o -> GType
toGObject :: IsGObject o => o -> GObject
toGObject = GObject . coerce
instance PToJSVal GObject where
pToJSVal = unGObject
instance PFromJSVal GObject where
pFromJSVal = GObject
instance ToJSVal GObject where
toJSVal = return . unGObject
instance FromJSVal GObject where
fromJSVal = return . fmap GObject . maybeJSNullOrUndefined
instance IsGObject GObject where
typeGType _ = gTypeGObject
castToGObject :: IsGObject obj => obj -> IO obj
castToGObject = return
foreign import javascript unsafe "Object" gTypeGObject :: GType
foreign import javascript unsafe "$1[\"toString\"]()" js_objectToString :: GObject -> IO JSString
objectToString :: (MonadIO m, IsGObject self, FromJSString result) => self -> m result
objectToString self = liftIO (fromJSString <$> js_objectToString (toGObject self))
type DOMString = JSString
class (PToJSVal a, ToJSVal a) => ToJSString a
class (PFromJSVal a, FromJSVal a) => FromJSString a
toJSString :: ToJSString a => a -> JSString
toJSString = pFromJSVal . pToJSVal
fromJSString :: FromJSString a => JSString -> a
fromJSString = pFromJSVal . pToJSVal
toMaybeJSString :: ToJSString a => Maybe a -> Nullable JSString
toMaybeJSString = Nullable . pToJSVal
fromMaybeJSString :: FromJSString a => Nullable JSString -> Maybe a
fromMaybeJSString (Nullable r) = pFromJSVal r
instance ToJSString [Char]
instance FromJSString [Char]
instance ToJSString T.Text
instance FromJSString T.Text
instance ToJSString JSString
instance FromJSString JSString
type ToDOMString s = ToJSString s
type FromDOMString s = FromJSString s
type IsDOMString s = (ToDOMString s, FromDOMString s)
newtype AudioBufferCallback = AudioBufferCallback (Callback (JSVal -> IO ()))
instance PToJSVal AudioBufferCallback where pToJSVal (AudioBufferCallback (Callback r)) = r
newtype DatabaseCallback = DatabaseCallback (Callback (JSVal -> IO ()))
instance PToJSVal DatabaseCallback where pToJSVal (DatabaseCallback (Callback r)) = r
newtype MediaQueryListListener = MediaQueryListListener (Callback (JSVal -> IO ()))
instance PToJSVal MediaQueryListListener where pToJSVal (MediaQueryListListener (Callback r)) = r
newtype MediaStreamTrackSourcesCallback = MediaStreamTrackSourcesCallback (Callback (JSVal -> IO ()))
instance PToJSVal MediaStreamTrackSourcesCallback where pToJSVal (MediaStreamTrackSourcesCallback (Callback r)) = r
newtype NavigatorUserMediaErrorCallback = NavigatorUserMediaErrorCallback (Callback (JSVal -> IO ()))
instance PToJSVal NavigatorUserMediaErrorCallback where pToJSVal (NavigatorUserMediaErrorCallback (Callback r)) = r
newtype NavigatorUserMediaSuccessCallback = NavigatorUserMediaSuccessCallback (Callback (JSVal -> IO ()))
instance PToJSVal NavigatorUserMediaSuccessCallback where pToJSVal (NavigatorUserMediaSuccessCallback (Callback r)) = r
newtype NotificationPermissionCallback permissions = NotificationPermissionCallback (Callback (JSVal -> IO ()))
instance PToJSVal (NotificationPermissionCallback permissions) where pToJSVal (NotificationPermissionCallback (Callback r)) = r
newtype PositionCallback = PositionCallback (Callback (JSVal -> IO ()))
instance PToJSVal PositionCallback where pToJSVal (PositionCallback (Callback r)) = r
newtype PositionErrorCallback = PositionErrorCallback (Callback (JSVal -> IO ()))
instance PToJSVal PositionErrorCallback where pToJSVal (PositionErrorCallback (Callback r)) = r
newtype RequestAnimationFrameCallback = RequestAnimationFrameCallback (Callback (JSVal -> IO ()))
instance PToJSVal RequestAnimationFrameCallback where pToJSVal (RequestAnimationFrameCallback (Callback r)) = r
newtype RTCPeerConnectionErrorCallback = RTCPeerConnectionErrorCallback (Callback (JSVal -> IO ()))
instance PToJSVal RTCPeerConnectionErrorCallback where pToJSVal (RTCPeerConnectionErrorCallback (Callback r)) = r
newtype RTCSessionDescriptionCallback = RTCSessionDescriptionCallback (Callback (JSVal -> IO ()))
instance PToJSVal RTCSessionDescriptionCallback where pToJSVal (RTCSessionDescriptionCallback (Callback r)) = r
newtype RTCStatsCallback = RTCStatsCallback (Callback (JSVal -> IO ()))
instance PToJSVal RTCStatsCallback where pToJSVal (RTCStatsCallback (Callback r)) = r
newtype SQLStatementCallback = SQLStatementCallback (Callback (JSVal -> JSVal -> IO ()))
instance PToJSVal SQLStatementCallback where pToJSVal (SQLStatementCallback (Callback r)) = r
newtype SQLStatementErrorCallback = SQLStatementErrorCallback (Callback (JSVal -> JSVal -> IO ()))
instance PToJSVal SQLStatementErrorCallback where pToJSVal (SQLStatementErrorCallback (Callback r)) = r
newtype SQLTransactionCallback = SQLTransactionCallback (Callback (JSVal -> IO ()))
instance PToJSVal SQLTransactionCallback where pToJSVal (SQLTransactionCallback (Callback r)) = r
newtype SQLTransactionErrorCallback = SQLTransactionErrorCallback (Callback (JSVal -> IO ()))
instance PToJSVal SQLTransactionErrorCallback where pToJSVal (SQLTransactionErrorCallback (Callback r)) = r
newtype StorageErrorCallback = StorageErrorCallback (Callback (JSVal -> IO ()))
instance PToJSVal StorageErrorCallback where pToJSVal (StorageErrorCallback (Callback r)) = r
newtype StorageQuotaCallback = StorageQuotaCallback (Callback (JSVal -> IO ()))
instance PToJSVal StorageQuotaCallback where pToJSVal (StorageQuotaCallback (Callback r)) = r
newtype StorageUsageCallback = StorageUsageCallback (Callback (JSVal -> JSVal -> IO ()))
instance PToJSVal StorageUsageCallback where pToJSVal (StorageUsageCallback (Callback r)) = r
newtype StringCallback s = StringCallback (Callback (JSVal -> IO ()))
instance PToJSVal (StringCallback s) where pToJSVal (StringCallback (Callback r)) = r
newtype VoidCallback = VoidCallback (Callback (IO ()))
instance PToJSVal VoidCallback where pToJSVal (VoidCallback (Callback r)) = r
newtype SerializedScriptValue = SerializedScriptValue { unSerializedScriptValue :: JSVal }
instance Eq SerializedScriptValue where
(SerializedScriptValue a) == (SerializedScriptValue b) = js_eq a b
instance PToJSVal SerializedScriptValue where
pToJSVal = unSerializedScriptValue
instance PFromJSVal SerializedScriptValue where
pFromJSVal = SerializedScriptValue
instance ToJSVal SerializedScriptValue where
toJSVal = return . unSerializedScriptValue
instance FromJSVal SerializedScriptValue where
fromJSVal = return . fmap SerializedScriptValue . maybeJSNullOrUndefined
class IsGObject o => IsSerializedScriptValue o
toSerializedScriptValue :: IsSerializedScriptValue o => o -> SerializedScriptValue
toSerializedScriptValue = SerializedScriptValue . coerce
instance IsSerializedScriptValue SerializedScriptValue
instance IsGObject SerializedScriptValue where
typeGType _ = error "Unable to get the JavaScript type of SerializedScriptValue"
newtype PositionOptions = PositionOptions { unPositionOptions :: JSVal }
instance Eq PositionOptions where
(PositionOptions a) == (PositionOptions b) = js_eq a b
instance PToJSVal PositionOptions where
pToJSVal = unPositionOptions
instance PFromJSVal PositionOptions where
pFromJSVal = PositionOptions
instance ToJSVal PositionOptions where
toJSVal = return . unPositionOptions
instance FromJSVal PositionOptions where
fromJSVal = return . fmap PositionOptions . maybeJSNullOrUndefined
class IsGObject o => IsPositionOptions o
toPositionOptions :: IsPositionOptions o => o -> PositionOptions
toPositionOptions = PositionOptions . coerce
instance IsPositionOptions PositionOptions
instance IsGObject PositionOptions where
typeGType _ = error "Unable to get the JavaScript type of PositionOptions"
newtype Dictionary = Dictionary { unDictionary :: JSVal }
instance Eq Dictionary where
(Dictionary a) == (Dictionary b) = js_eq a b
instance PToJSVal Dictionary where
pToJSVal = unDictionary
instance PFromJSVal Dictionary where
pFromJSVal = Dictionary
instance ToJSVal Dictionary where
toJSVal = return . unDictionary
instance FromJSVal Dictionary where
fromJSVal = return . fmap Dictionary . maybeJSNullOrUndefined
class IsGObject o => IsDictionary o
toDictionary :: IsDictionary o => o -> Dictionary
toDictionary = Dictionary . coerce
instance IsDictionary Dictionary
instance IsGObject Dictionary where
typeGType _ = error "Unable to get the JavaScript type of Dictionary"
newtype BlobPropertyBag = BlobPropertyBag { unBlobPropertyBag :: JSVal }
instance Eq BlobPropertyBag where
(BlobPropertyBag a) == (BlobPropertyBag b) = js_eq a b
instance PToJSVal BlobPropertyBag where
pToJSVal = unBlobPropertyBag
instance PFromJSVal BlobPropertyBag where
pFromJSVal = BlobPropertyBag
instance ToJSVal BlobPropertyBag where
toJSVal = return . unBlobPropertyBag
instance FromJSVal BlobPropertyBag where
fromJSVal = return . fmap BlobPropertyBag . maybeJSNullOrUndefined
class IsGObject o => IsBlobPropertyBag o
toBlobPropertyBag :: IsBlobPropertyBag o => o -> BlobPropertyBag
toBlobPropertyBag = BlobPropertyBag . coerce
instance IsBlobPropertyBag BlobPropertyBag
instance IsGObject BlobPropertyBag where
typeGType _ = error "Unable to get the JavaScript type of BlobPropertyBag"
newtype MutationCallback = MutationCallback { unMutationCallback :: JSVal }
instance Eq MutationCallback where
(MutationCallback a) == (MutationCallback b) = js_eq a b
instance PToJSVal MutationCallback where
pToJSVal = unMutationCallback
instance PFromJSVal MutationCallback where
pFromJSVal = MutationCallback
instance ToJSVal MutationCallback where
toJSVal = return . unMutationCallback
instance FromJSVal MutationCallback where
fromJSVal = return . fmap MutationCallback . maybeJSNullOrUndefined
class IsGObject o => IsMutationCallback o
toMutationCallback :: IsMutationCallback o => o -> MutationCallback
toMutationCallback = MutationCallback . coerce
instance IsMutationCallback MutationCallback
instance IsGObject MutationCallback where
typeGType _ = error "Unable to get the JavaScript type of MutationCallback"
newtype Promise = Promise { unPromise :: JSVal }
instance Eq Promise where
(Promise a) == (Promise b) = js_eq a b
instance PToJSVal Promise where
pToJSVal = unPromise
instance PFromJSVal Promise where
pFromJSVal = Promise
instance ToJSVal Promise where
toJSVal = return . unPromise
instance FromJSVal Promise where
fromJSVal = return . fmap Promise . maybeJSNullOrUndefined
class IsGObject o => IsPromise o
toPromise :: IsPromise o => o -> Promise
toPromise = Promise . coerce
instance IsPromise Promise
instance IsGObject Promise where
typeGType _ = gTypePromise
foreign import javascript unsafe "window[\"Promise\"]" gTypePromise :: GType
newtype ArrayBuffer = ArrayBuffer { unArrayBuffer :: JSVal }
instance Eq ArrayBuffer where
(ArrayBuffer a) == (ArrayBuffer b) = js_eq a b
instance PToJSVal ArrayBuffer where
pToJSVal = unArrayBuffer
instance PFromJSVal ArrayBuffer where
pFromJSVal = ArrayBuffer
instance ToJSVal ArrayBuffer where
toJSVal = return . unArrayBuffer
instance FromJSVal ArrayBuffer where
fromJSVal = return . fmap ArrayBuffer . maybeJSNullOrUndefined
class IsGObject o => IsArrayBuffer o
toArrayBuffer :: IsArrayBuffer o => o -> ArrayBuffer
toArrayBuffer = ArrayBuffer . coerce
instance IsArrayBuffer ArrayBuffer
instance IsGObject ArrayBuffer where
typeGType _ = gTypeArrayBuffer
foreign import javascript unsafe "window[\"ArrayBuffer\"]" gTypeArrayBuffer :: GType
newtype Float32Array = Float32Array { unFloat32Array :: JSVal }
instance Eq Float32Array where
(Float32Array a) == (Float32Array b) = js_eq a b
instance PToJSVal Float32Array where
pToJSVal = unFloat32Array
instance PFromJSVal Float32Array where
pFromJSVal = Float32Array
instance ToJSVal Float32Array where
toJSVal = return . unFloat32Array
instance FromJSVal Float32Array where
fromJSVal = return . fmap Float32Array . maybeJSNullOrUndefined
class IsGObject o => IsFloat32Array o
toFloat32Array :: IsFloat32Array o => o -> Float32Array
toFloat32Array = Float32Array . coerce
instance IsFloat32Array Float32Array
instance IsGObject Float32Array where
typeGType _ = gTypeFloat32Array
foreign import javascript unsafe "window[\"Float32Array\"]" gTypeFloat32Array :: GType
newtype Float64Array = Float64Array { unFloat64Array :: JSVal }
instance Eq Float64Array where
(Float64Array a) == (Float64Array b) = js_eq a b
instance PToJSVal Float64Array where
pToJSVal = unFloat64Array
instance PFromJSVal Float64Array where
pFromJSVal = Float64Array
instance ToJSVal Float64Array where
toJSVal = return . unFloat64Array
instance FromJSVal Float64Array where
fromJSVal = return . fmap Float64Array . maybeJSNullOrUndefined
class IsGObject o => IsFloat64Array o
toFloat64Array :: IsFloat64Array o => o -> Float64Array
toFloat64Array = Float64Array . coerce
instance IsFloat64Array Float64Array
instance IsGObject Float64Array where
typeGType _ = gTypeFloat64Array
foreign import javascript unsafe "window[\"Float64Array\"]" gTypeFloat64Array :: GType
newtype Uint8Array = Uint8Array { unUint8Array :: JSVal }
instance Eq Uint8Array where
(Uint8Array a) == (Uint8Array b) = js_eq a b
instance PToJSVal Uint8Array where
pToJSVal = unUint8Array
instance PFromJSVal Uint8Array where
pFromJSVal = Uint8Array
instance ToJSVal Uint8Array where
toJSVal = return . unUint8Array
instance FromJSVal Uint8Array where
fromJSVal = return . fmap Uint8Array . maybeJSNullOrUndefined
class IsGObject o => IsUint8Array o
toUint8Array :: IsUint8Array o => o -> Uint8Array
toUint8Array = Uint8Array . coerce
instance IsUint8Array Uint8Array
instance IsGObject Uint8Array where
typeGType _ = gTypeUint8Array
foreign import javascript unsafe "window[\"Uint8Array\"]" gTypeUint8Array :: GType
newtype Uint8ClampedArray = Uint8ClampedArray { unUint8ClampedArray :: JSVal }
instance Eq Uint8ClampedArray where
(Uint8ClampedArray a) == (Uint8ClampedArray b) = js_eq a b
instance PToJSVal Uint8ClampedArray where
pToJSVal = unUint8ClampedArray
instance PFromJSVal Uint8ClampedArray where
pFromJSVal = Uint8ClampedArray
instance ToJSVal Uint8ClampedArray where
toJSVal = return . unUint8ClampedArray
instance FromJSVal Uint8ClampedArray where
fromJSVal = return . fmap Uint8ClampedArray . maybeJSNullOrUndefined
class IsGObject o => IsUint8ClampedArray o
toUint8ClampedArray :: IsUint8ClampedArray o => o -> Uint8ClampedArray
toUint8ClampedArray = Uint8ClampedArray . coerce
instance IsUint8ClampedArray Uint8ClampedArray
instance IsGObject Uint8ClampedArray where
typeGType _ = gTypeUint8ClampedArray
foreign import javascript unsafe "window[\"Uint8ClampedArray\"]" gTypeUint8ClampedArray :: GType
newtype Uint16Array = Uint16Array { unUint16Array :: JSVal }
instance Eq Uint16Array where
(Uint16Array a) == (Uint16Array b) = js_eq a b
instance PToJSVal Uint16Array where
pToJSVal = unUint16Array
instance PFromJSVal Uint16Array where
pFromJSVal = Uint16Array
instance ToJSVal Uint16Array where
toJSVal = return . unUint16Array
instance FromJSVal Uint16Array where
fromJSVal = return . fmap Uint16Array . maybeJSNullOrUndefined
class IsGObject o => IsUint16Array o
toUint16Array :: IsUint16Array o => o -> Uint16Array
toUint16Array = Uint16Array . coerce
instance IsUint16Array Uint16Array
instance IsGObject Uint16Array where
typeGType _ = gTypeUint16Array
foreign import javascript unsafe "window[\"Uint16Array\"]" gTypeUint16Array :: GType
newtype Uint32Array = Uint32Array { unUint32Array :: JSVal }
instance Eq Uint32Array where
(Uint32Array a) == (Uint32Array b) = js_eq a b
instance PToJSVal Uint32Array where
pToJSVal = unUint32Array
instance PFromJSVal Uint32Array where
pFromJSVal = Uint32Array
instance ToJSVal Uint32Array where
toJSVal = return . unUint32Array
instance FromJSVal Uint32Array where
fromJSVal = return . fmap Uint32Array . maybeJSNullOrUndefined
class IsGObject o => IsUint32Array o
toUint32Array :: IsUint32Array o => o -> Uint32Array
toUint32Array = Uint32Array . coerce
instance IsUint32Array Uint32Array
instance IsGObject Uint32Array where
typeGType _ = gTypeUint32Array
foreign import javascript unsafe "window[\"Uint32Array\"]" gTypeUint32Array :: GType
newtype Int8Array = Int8Array { unInt8Array :: JSVal }
instance Eq Int8Array where
(Int8Array a) == (Int8Array b) = js_eq a b
instance PToJSVal Int8Array where
pToJSVal = unInt8Array
instance PFromJSVal Int8Array where
pFromJSVal = Int8Array
instance ToJSVal Int8Array where
toJSVal = return . unInt8Array
instance FromJSVal Int8Array where
fromJSVal = return . fmap Int8Array . maybeJSNullOrUndefined
class IsGObject o => IsInt8Array o
toInt8Array :: IsInt8Array o => o -> Int8Array
toInt8Array = Int8Array . coerce
instance IsInt8Array Int8Array
instance IsGObject Int8Array where
typeGType _ = gTypeInt8Array
foreign import javascript unsafe "window[\"Int8Array\"]" gTypeInt8Array :: GType
newtype Int16Array = Int16Array { unInt16Array :: JSVal }
instance Eq Int16Array where
(Int16Array a) == (Int16Array b) = js_eq a b
instance PToJSVal Int16Array where
pToJSVal = unInt16Array
instance PFromJSVal Int16Array where
pFromJSVal = Int16Array
instance ToJSVal Int16Array where
toJSVal = return . unInt16Array
instance FromJSVal Int16Array where
fromJSVal = return . fmap Int16Array . maybeJSNullOrUndefined
class IsGObject o => IsInt16Array o
toInt16Array :: IsInt16Array o => o -> Int16Array
toInt16Array = Int16Array . coerce
instance IsInt16Array Int16Array
instance IsGObject Int16Array where
typeGType _ = gTypeInt16Array
foreign import javascript unsafe "window[\"Int16Array\"]" gTypeInt16Array :: GType
newtype Int32Array = Int32Array { unInt32Array :: JSVal }
instance Eq Int32Array where
(Int32Array a) == (Int32Array b) = js_eq a b
instance PToJSVal Int32Array where
pToJSVal = unInt32Array
instance PFromJSVal Int32Array where
pFromJSVal = Int32Array
instance ToJSVal Int32Array where
toJSVal = return . unInt32Array
instance FromJSVal Int32Array where
fromJSVal = return . fmap Int32Array . maybeJSNullOrUndefined
class IsGObject o => IsInt32Array o
toInt32Array :: IsInt32Array o => o -> Int32Array
toInt32Array = Int32Array . coerce
instance IsInt32Array Int32Array
instance IsGObject Int32Array where
typeGType _ = gTypeInt32Array
foreign import javascript unsafe "window[\"Int32Array\"]" gTypeInt32Array :: GType
newtype ObjectArray = ObjectArray { unObjectArray :: JSVal }
instance Eq ObjectArray where
(ObjectArray a) == (ObjectArray b) = js_eq a b
instance PToJSVal ObjectArray where
pToJSVal = unObjectArray
instance PFromJSVal ObjectArray where
pFromJSVal = ObjectArray
instance ToJSVal ObjectArray where
toJSVal = return . unObjectArray
instance FromJSVal ObjectArray where
fromJSVal = return . fmap ObjectArray . maybeJSNullOrUndefined
class IsGObject o => IsObjectArray o
toObjectArray :: IsObjectArray o => o -> ObjectArray
toObjectArray = ObjectArray . coerce
instance IsObjectArray ObjectArray
instance IsGObject ObjectArray where
typeGType _ = error "Unable to get the JavaScript type of ObjectArray"
newtype ArrayBufferView = ArrayBufferView { unArrayBufferView :: JSVal }
instance Eq ArrayBufferView where
(ArrayBufferView a) == (ArrayBufferView b) = js_eq a b
instance PToJSVal ArrayBufferView where
pToJSVal = unArrayBufferView
instance PFromJSVal ArrayBufferView where
pFromJSVal = ArrayBufferView
instance ToJSVal ArrayBufferView where
toJSVal = return . unArrayBufferView
instance FromJSVal ArrayBufferView where
fromJSVal = return . fmap ArrayBufferView . maybeJSNullOrUndefined
class IsGObject o => IsArrayBufferView o
toArrayBufferView :: IsArrayBufferView o => o -> ArrayBufferView
toArrayBufferView = ArrayBufferView . coerce
instance IsArrayBufferView ArrayBufferView
instance IsGObject ArrayBufferView where
typeGType _ = error "Unable to get the JavaScript type of ArrayBufferView"
newtype Array = Array { unArray :: JSVal }
instance Eq Array where
(Array a) == (Array b) = js_eq a b
instance PToJSVal Array where
pToJSVal = unArray
instance PFromJSVal Array where
pFromJSVal = Array
instance ToJSVal Array where
toJSVal = return . unArray
instance FromJSVal Array where
fromJSVal = return . fmap Array . maybeJSNullOrUndefined
class IsGObject o => IsArray o
toArray :: IsArray o => o -> Array
toArray = Array . coerce
instance IsArray Array
instance IsGObject Array where
typeGType _ = gTypeArray
foreign import javascript unsafe "window[\"Array\"]" gTypeArray :: GType
newtype Date = Date { unDate :: JSVal }
instance Eq Date where
(Date a) == (Date b) = js_eq a b
instance PToJSVal Date where
pToJSVal = unDate
instance PFromJSVal Date where
pFromJSVal = Date
instance ToJSVal Date where
toJSVal = return . unDate
instance FromJSVal Date where
fromJSVal = return . fmap Date . maybeJSNullOrUndefined
class IsGObject o => IsDate o
toDate :: IsDate o => o -> Date
toDate = Date . coerce
instance IsDate Date
instance IsGObject Date where
typeGType _ = gTypeDate
foreign import javascript unsafe "window[\"Date\"]" gTypeDate :: GType
newtype Acceleration = Acceleration { unAcceleration :: JSVal }
instance Eq Acceleration where
(Acceleration a) == (Acceleration b) = js_eq a b
instance PToJSVal Acceleration where
pToJSVal = unAcceleration
instance PFromJSVal Acceleration where
pFromJSVal = Acceleration
instance ToJSVal Acceleration where
toJSVal = return . unAcceleration
instance FromJSVal Acceleration where
fromJSVal = return . fmap Acceleration . maybeJSNullOrUndefined
class IsGObject o => IsAcceleration o
toAcceleration :: IsAcceleration o => o -> Acceleration
toAcceleration = Acceleration . coerce
instance IsAcceleration Acceleration
instance IsGObject Acceleration where
typeGType _ = error "Unable to get the JavaScript type of Acceleration"
newtype RotationRate = RotationRate { unRotationRate :: JSVal }
instance Eq RotationRate where
(RotationRate a) == (RotationRate b) = js_eq a b
instance PToJSVal RotationRate where
pToJSVal = unRotationRate
instance PFromJSVal RotationRate where
pFromJSVal = RotationRate
instance ToJSVal RotationRate where
toJSVal = return . unRotationRate
instance FromJSVal RotationRate where
fromJSVal = return . fmap RotationRate . maybeJSNullOrUndefined
class IsGObject o => IsRotationRate o
toRotationRate :: IsRotationRate o => o -> RotationRate
toRotationRate = RotationRate . coerce
instance IsRotationRate RotationRate
instance IsGObject RotationRate where
typeGType _ = error "Unable to get the JavaScript type of RotationRate"
newtype Algorithm = Algorithm { unAlgorithm :: JSVal }
instance Eq Algorithm where
(Algorithm a) == (Algorithm b) = js_eq a b
instance PToJSVal Algorithm where
pToJSVal = unAlgorithm
instance PFromJSVal Algorithm where
pFromJSVal = Algorithm
instance ToJSVal Algorithm where
toJSVal = return . unAlgorithm
instance FromJSVal Algorithm where
fromJSVal = return . fmap Algorithm . maybeJSNullOrUndefined
class IsGObject o => IsAlgorithm o
toAlgorithm :: IsAlgorithm o => o -> Algorithm
toAlgorithm = Algorithm . coerce
instance IsAlgorithm Algorithm
instance IsGObject Algorithm where
typeGType _ = error "Unable to get the JavaScript type of Algorithm"
newtype CryptoOperationData = CryptoOperationData { unCryptoOperationData :: JSVal }
instance Eq CryptoOperationData where
(CryptoOperationData a) == (CryptoOperationData b) = js_eq a b
instance PToJSVal CryptoOperationData where
pToJSVal = unCryptoOperationData
instance PFromJSVal CryptoOperationData where
pFromJSVal = CryptoOperationData
instance ToJSVal CryptoOperationData where
toJSVal = return . unCryptoOperationData
instance FromJSVal CryptoOperationData where
fromJSVal = return . fmap CryptoOperationData . maybeJSNullOrUndefined
class IsGObject o => IsCryptoOperationData o
toCryptoOperationData :: IsCryptoOperationData o => o -> CryptoOperationData
toCryptoOperationData = CryptoOperationData . coerce
instance IsCryptoOperationData CryptoOperationData
instance IsGObject CryptoOperationData where
typeGType _ = error "Unable to get the JavaScript type of CryptoOperationData"
instance IsCryptoOperationData ArrayBuffer
instance IsCryptoOperationData ArrayBufferView
newtype CanvasStyle = CanvasStyle { unCanvasStyle :: JSVal }
instance Eq CanvasStyle where
(CanvasStyle a) == (CanvasStyle b) = js_eq a b
instance PToJSVal CanvasStyle where
pToJSVal = unCanvasStyle
instance PFromJSVal CanvasStyle where
pFromJSVal = CanvasStyle
instance ToJSVal CanvasStyle where
toJSVal = return . unCanvasStyle
instance FromJSVal CanvasStyle where
fromJSVal = return . fmap CanvasStyle . maybeJSNullOrUndefined
class IsGObject o => IsCanvasStyle o
toCanvasStyle :: IsCanvasStyle o => o -> CanvasStyle
toCanvasStyle = CanvasStyle . coerce
instance IsCanvasStyle CanvasStyle
instance IsGObject CanvasStyle where
typeGType _ = error "Unable to get the JavaScript type of CanvasStyle"
instance IsCanvasStyle CanvasGradient
instance IsCanvasStyle CanvasPattern
newtype DOMException = DOMException { unDOMException :: JSVal }
instance Eq DOMException where
(DOMException a) == (DOMException b) = js_eq a b
instance PToJSVal DOMException where
pToJSVal = unDOMException
instance PFromJSVal DOMException where
pFromJSVal = DOMException
instance ToJSVal DOMException where
toJSVal = return . unDOMException
instance FromJSVal DOMException where
fromJSVal = return . fmap DOMException . maybeJSNullOrUndefined
class IsGObject o => IsDOMException o
toDOMException :: IsDOMException o => o -> DOMException
toDOMException = DOMException . coerce
instance IsDOMException DOMException
instance IsGObject DOMException where
typeGType _ = error "Unable to get the JavaScript type of DOMException"
type GLenum = Word32
type GLboolean = Bool
type GLbitfield = Word32
type GLbyte = Int8
type GLshort = Int16
type GLint = Int32
type GLint64 = Int64
type GLsizei = Int32
type GLintptr = Int64
type GLsizeiptr = Int64
type GLubyte = Word8
type GLushort = Word16
type GLuint = Word32
type GLuint64 = Word64
type GLfloat = Double
type GLclampf = Double
newtype ANGLEInstancedArrays = ANGLEInstancedArrays { unANGLEInstancedArrays :: JSVal }
instance Eq (ANGLEInstancedArrays) where
(ANGLEInstancedArrays a) == (ANGLEInstancedArrays b) = js_eq a b
instance PToJSVal ANGLEInstancedArrays where
pToJSVal = unANGLEInstancedArrays
instance PFromJSVal ANGLEInstancedArrays where
pFromJSVal = ANGLEInstancedArrays
instance ToJSVal ANGLEInstancedArrays where
toJSVal = return . unANGLEInstancedArrays
instance FromJSVal ANGLEInstancedArrays where
fromJSVal = return . fmap ANGLEInstancedArrays . maybeJSNullOrUndefined
instance IsGObject ANGLEInstancedArrays where
typeGType _ = gTypeANGLEInstancedArrays
foreign import javascript unsafe "window[\"ANGLEInstancedArrays\"]" gTypeANGLEInstancedArrays :: GType
newtype AbstractView = AbstractView { unAbstractView :: JSVal }
instance Eq (AbstractView) where
(AbstractView a) == (AbstractView b) = js_eq a b
instance PToJSVal AbstractView where
pToJSVal = unAbstractView
instance PFromJSVal AbstractView where
pFromJSVal = AbstractView
instance ToJSVal AbstractView where
toJSVal = return . unAbstractView
instance FromJSVal AbstractView where
fromJSVal = return . fmap AbstractView . maybeJSNullOrUndefined
instance IsGObject AbstractView where
typeGType _ = gTypeAbstractView
foreign import javascript unsafe "window[\"AbstractView\"]" gTypeAbstractView :: GType
newtype AbstractWorker = AbstractWorker { unAbstractWorker :: JSVal }
instance Eq (AbstractWorker) where
(AbstractWorker a) == (AbstractWorker b) = js_eq a b
instance PToJSVal AbstractWorker where
pToJSVal = unAbstractWorker
instance PFromJSVal AbstractWorker where
pFromJSVal = AbstractWorker
instance ToJSVal AbstractWorker where
toJSVal = return . unAbstractWorker
instance FromJSVal AbstractWorker where
fromJSVal = return . fmap AbstractWorker . maybeJSNullOrUndefined
instance IsGObject AbstractWorker where
typeGType _ = gTypeAbstractWorker
foreign import javascript unsafe "window[\"AbstractWorker\"]" gTypeAbstractWorker :: GType
newtype AllAudioCapabilities = AllAudioCapabilities { unAllAudioCapabilities :: JSVal }
instance Eq (AllAudioCapabilities) where
(AllAudioCapabilities a) == (AllAudioCapabilities b) = js_eq a b
instance PToJSVal AllAudioCapabilities where
pToJSVal = unAllAudioCapabilities
instance PFromJSVal AllAudioCapabilities where
pFromJSVal = AllAudioCapabilities
instance ToJSVal AllAudioCapabilities where
toJSVal = return . unAllAudioCapabilities
instance FromJSVal AllAudioCapabilities where
fromJSVal = return . fmap AllAudioCapabilities . maybeJSNullOrUndefined
instance IsMediaStreamCapabilities AllAudioCapabilities
instance IsGObject AllAudioCapabilities where
typeGType _ = gTypeAllAudioCapabilities
foreign import javascript unsafe "window[\"AllAudioCapabilities\"]" gTypeAllAudioCapabilities :: GType
newtype AllVideoCapabilities = AllVideoCapabilities { unAllVideoCapabilities :: JSVal }
instance Eq (AllVideoCapabilities) where
(AllVideoCapabilities a) == (AllVideoCapabilities b) = js_eq a b
instance PToJSVal AllVideoCapabilities where
pToJSVal = unAllVideoCapabilities
instance PFromJSVal AllVideoCapabilities where
pFromJSVal = AllVideoCapabilities
instance ToJSVal AllVideoCapabilities where
toJSVal = return . unAllVideoCapabilities
instance FromJSVal AllVideoCapabilities where
fromJSVal = return . fmap AllVideoCapabilities . maybeJSNullOrUndefined
instance IsMediaStreamCapabilities AllVideoCapabilities
instance IsGObject AllVideoCapabilities where
typeGType _ = gTypeAllVideoCapabilities
foreign import javascript unsafe "window[\"AllVideoCapabilities\"]" gTypeAllVideoCapabilities :: GType
newtype AnalyserNode = AnalyserNode { unAnalyserNode :: JSVal }
instance Eq (AnalyserNode) where
(AnalyserNode a) == (AnalyserNode b) = js_eq a b
instance PToJSVal AnalyserNode where
pToJSVal = unAnalyserNode
instance PFromJSVal AnalyserNode where
pFromJSVal = AnalyserNode
instance ToJSVal AnalyserNode where
toJSVal = return . unAnalyserNode
instance FromJSVal AnalyserNode where
fromJSVal = return . fmap AnalyserNode . maybeJSNullOrUndefined
instance IsAudioNode AnalyserNode
instance IsEventTarget AnalyserNode
instance IsGObject AnalyserNode where
typeGType _ = gTypeAnalyserNode
foreign import javascript unsafe "window[\"AnalyserNode\"]" gTypeAnalyserNode :: GType
newtype AnimationEvent = AnimationEvent { unAnimationEvent :: JSVal }
instance Eq (AnimationEvent) where
(AnimationEvent a) == (AnimationEvent b) = js_eq a b
instance PToJSVal AnimationEvent where
pToJSVal = unAnimationEvent
instance PFromJSVal AnimationEvent where
pFromJSVal = AnimationEvent
instance ToJSVal AnimationEvent where
toJSVal = return . unAnimationEvent
instance FromJSVal AnimationEvent where
fromJSVal = return . fmap AnimationEvent . maybeJSNullOrUndefined
instance IsEvent AnimationEvent
instance IsGObject AnimationEvent where
typeGType _ = gTypeAnimationEvent
foreign import javascript unsafe "window[\"AnimationEvent\"]" gTypeAnimationEvent :: GType
newtype ApplicationCache = ApplicationCache { unApplicationCache :: JSVal }
instance Eq (ApplicationCache) where
(ApplicationCache a) == (ApplicationCache b) = js_eq a b
instance PToJSVal ApplicationCache where
pToJSVal = unApplicationCache
instance PFromJSVal ApplicationCache where
pFromJSVal = ApplicationCache
instance ToJSVal ApplicationCache where
toJSVal = return . unApplicationCache
instance FromJSVal ApplicationCache where
fromJSVal = return . fmap ApplicationCache . maybeJSNullOrUndefined
instance IsEventTarget ApplicationCache
instance IsGObject ApplicationCache where
typeGType _ = gTypeApplicationCache
foreign import javascript unsafe "window[\"ApplicationCache\"]" gTypeApplicationCache :: GType
newtype Attr = Attr { unAttr :: JSVal }
instance Eq (Attr) where
(Attr a) == (Attr b) = js_eq a b
instance PToJSVal Attr where
pToJSVal = unAttr
instance PFromJSVal Attr where
pFromJSVal = Attr
instance ToJSVal Attr where
toJSVal = return . unAttr
instance FromJSVal Attr where
fromJSVal = return . fmap Attr . maybeJSNullOrUndefined
instance IsNode Attr
instance IsEventTarget Attr
instance IsGObject Attr where
typeGType _ = gTypeAttr
foreign import javascript unsafe "window[\"Attr\"]" gTypeAttr :: GType
newtype AudioBuffer = AudioBuffer { unAudioBuffer :: JSVal }
instance Eq (AudioBuffer) where
(AudioBuffer a) == (AudioBuffer b) = js_eq a b
instance PToJSVal AudioBuffer where
pToJSVal = unAudioBuffer
instance PFromJSVal AudioBuffer where
pFromJSVal = AudioBuffer
instance ToJSVal AudioBuffer where
toJSVal = return . unAudioBuffer
instance FromJSVal AudioBuffer where
fromJSVal = return . fmap AudioBuffer . maybeJSNullOrUndefined
instance IsGObject AudioBuffer where
typeGType _ = gTypeAudioBuffer
foreign import javascript unsafe "window[\"AudioBuffer\"]" gTypeAudioBuffer :: GType
newtype AudioBufferSourceNode = AudioBufferSourceNode { unAudioBufferSourceNode :: JSVal }
instance Eq (AudioBufferSourceNode) where
(AudioBufferSourceNode a) == (AudioBufferSourceNode b) = js_eq a b
instance PToJSVal AudioBufferSourceNode where
pToJSVal = unAudioBufferSourceNode
instance PFromJSVal AudioBufferSourceNode where
pFromJSVal = AudioBufferSourceNode
instance ToJSVal AudioBufferSourceNode where
toJSVal = return . unAudioBufferSourceNode
instance FromJSVal AudioBufferSourceNode where
fromJSVal = return . fmap AudioBufferSourceNode . maybeJSNullOrUndefined
instance IsAudioNode AudioBufferSourceNode
instance IsEventTarget AudioBufferSourceNode
instance IsGObject AudioBufferSourceNode where
typeGType _ = gTypeAudioBufferSourceNode
foreign import javascript unsafe "window[\"AudioBufferSourceNode\"]" gTypeAudioBufferSourceNode :: GType
newtype AudioContext = AudioContext { unAudioContext :: JSVal }
instance Eq (AudioContext) where
(AudioContext a) == (AudioContext b) = js_eq a b
instance PToJSVal AudioContext where
pToJSVal = unAudioContext
instance PFromJSVal AudioContext where
pFromJSVal = AudioContext
instance ToJSVal AudioContext where
toJSVal = return . unAudioContext
instance FromJSVal AudioContext where
fromJSVal = return . fmap AudioContext . maybeJSNullOrUndefined
class IsEventTarget o => IsAudioContext o
toAudioContext :: IsAudioContext o => o -> AudioContext
toAudioContext = AudioContext . coerce
instance IsAudioContext AudioContext
instance IsEventTarget AudioContext
instance IsGObject AudioContext where
typeGType _ = gTypeAudioContext
foreign import javascript unsafe "window[\"AudioContext\"]" gTypeAudioContext :: GType
newtype AudioDestinationNode = AudioDestinationNode { unAudioDestinationNode :: JSVal }
instance Eq (AudioDestinationNode) where
(AudioDestinationNode a) == (AudioDestinationNode b) = js_eq a b
instance PToJSVal AudioDestinationNode where
pToJSVal = unAudioDestinationNode
instance PFromJSVal AudioDestinationNode where
pFromJSVal = AudioDestinationNode
instance ToJSVal AudioDestinationNode where
toJSVal = return . unAudioDestinationNode
instance FromJSVal AudioDestinationNode where
fromJSVal = return . fmap AudioDestinationNode . maybeJSNullOrUndefined
instance IsAudioNode AudioDestinationNode
instance IsEventTarget AudioDestinationNode
instance IsGObject AudioDestinationNode where
typeGType _ = gTypeAudioDestinationNode
foreign import javascript unsafe "window[\"AudioDestinationNode\"]" gTypeAudioDestinationNode :: GType
newtype AudioListener = AudioListener { unAudioListener :: JSVal }
instance Eq (AudioListener) where
(AudioListener a) == (AudioListener b) = js_eq a b
instance PToJSVal AudioListener where
pToJSVal = unAudioListener
instance PFromJSVal AudioListener where
pFromJSVal = AudioListener
instance ToJSVal AudioListener where
toJSVal = return . unAudioListener
instance FromJSVal AudioListener where
fromJSVal = return . fmap AudioListener . maybeJSNullOrUndefined
instance IsGObject AudioListener where
typeGType _ = gTypeAudioListener
foreign import javascript unsafe "window[\"AudioListener\"]" gTypeAudioListener :: GType
newtype AudioNode = AudioNode { unAudioNode :: JSVal }
instance Eq (AudioNode) where
(AudioNode a) == (AudioNode b) = js_eq a b
instance PToJSVal AudioNode where
pToJSVal = unAudioNode
instance PFromJSVal AudioNode where
pFromJSVal = AudioNode
instance ToJSVal AudioNode where
toJSVal = return . unAudioNode
instance FromJSVal AudioNode where
fromJSVal = return . fmap AudioNode . maybeJSNullOrUndefined
class IsEventTarget o => IsAudioNode o
toAudioNode :: IsAudioNode o => o -> AudioNode
toAudioNode = AudioNode . coerce
instance IsAudioNode AudioNode
instance IsEventTarget AudioNode
instance IsGObject AudioNode where
typeGType _ = gTypeAudioNode
foreign import javascript unsafe "window[\"AudioNode\"]" gTypeAudioNode :: GType
newtype AudioParam = AudioParam { unAudioParam :: JSVal }
instance Eq (AudioParam) where
(AudioParam a) == (AudioParam b) = js_eq a b
instance PToJSVal AudioParam where
pToJSVal = unAudioParam
instance PFromJSVal AudioParam where
pFromJSVal = AudioParam
instance ToJSVal AudioParam where
toJSVal = return . unAudioParam
instance FromJSVal AudioParam where
fromJSVal = return . fmap AudioParam . maybeJSNullOrUndefined
instance IsGObject AudioParam where
typeGType _ = gTypeAudioParam
foreign import javascript unsafe "window[\"AudioParam\"]" gTypeAudioParam :: GType
newtype AudioProcessingEvent = AudioProcessingEvent { unAudioProcessingEvent :: JSVal }
instance Eq (AudioProcessingEvent) where
(AudioProcessingEvent a) == (AudioProcessingEvent b) = js_eq a b
instance PToJSVal AudioProcessingEvent where
pToJSVal = unAudioProcessingEvent
instance PFromJSVal AudioProcessingEvent where
pFromJSVal = AudioProcessingEvent
instance ToJSVal AudioProcessingEvent where
toJSVal = return . unAudioProcessingEvent
instance FromJSVal AudioProcessingEvent where
fromJSVal = return . fmap AudioProcessingEvent . maybeJSNullOrUndefined
instance IsEvent AudioProcessingEvent
instance IsGObject AudioProcessingEvent where
typeGType _ = gTypeAudioProcessingEvent
foreign import javascript unsafe "window[\"AudioProcessingEvent\"]" gTypeAudioProcessingEvent :: GType
newtype AudioStreamTrack = AudioStreamTrack { unAudioStreamTrack :: JSVal }
instance Eq (AudioStreamTrack) where
(AudioStreamTrack a) == (AudioStreamTrack b) = js_eq a b
instance PToJSVal AudioStreamTrack where
pToJSVal = unAudioStreamTrack
instance PFromJSVal AudioStreamTrack where
pFromJSVal = AudioStreamTrack
instance ToJSVal AudioStreamTrack where
toJSVal = return . unAudioStreamTrack
instance FromJSVal AudioStreamTrack where
fromJSVal = return . fmap AudioStreamTrack . maybeJSNullOrUndefined
instance IsMediaStreamTrack AudioStreamTrack
instance IsEventTarget AudioStreamTrack
instance IsGObject AudioStreamTrack where
typeGType _ = gTypeAudioStreamTrack
foreign import javascript unsafe "window[\"AudioStreamTrack\"]" gTypeAudioStreamTrack :: GType
newtype AudioTrack = AudioTrack { unAudioTrack :: JSVal }
instance Eq (AudioTrack) where
(AudioTrack a) == (AudioTrack b) = js_eq a b
instance PToJSVal AudioTrack where
pToJSVal = unAudioTrack
instance PFromJSVal AudioTrack where
pFromJSVal = AudioTrack
instance ToJSVal AudioTrack where
toJSVal = return . unAudioTrack
instance FromJSVal AudioTrack where
fromJSVal = return . fmap AudioTrack . maybeJSNullOrUndefined
instance IsGObject AudioTrack where
typeGType _ = gTypeAudioTrack
foreign import javascript unsafe "window[\"AudioTrack\"]" gTypeAudioTrack :: GType
newtype AudioTrackList = AudioTrackList { unAudioTrackList :: JSVal }
instance Eq (AudioTrackList) where
(AudioTrackList a) == (AudioTrackList b) = js_eq a b
instance PToJSVal AudioTrackList where
pToJSVal = unAudioTrackList
instance PFromJSVal AudioTrackList where
pFromJSVal = AudioTrackList
instance ToJSVal AudioTrackList where
toJSVal = return . unAudioTrackList
instance FromJSVal AudioTrackList where
fromJSVal = return . fmap AudioTrackList . maybeJSNullOrUndefined
instance IsEventTarget AudioTrackList
instance IsGObject AudioTrackList where
typeGType _ = gTypeAudioTrackList
foreign import javascript unsafe "window[\"AudioTrackList\"]" gTypeAudioTrackList :: GType
newtype AutocompleteErrorEvent = AutocompleteErrorEvent { unAutocompleteErrorEvent :: JSVal }
instance Eq (AutocompleteErrorEvent) where
(AutocompleteErrorEvent a) == (AutocompleteErrorEvent b) = js_eq a b
instance PToJSVal AutocompleteErrorEvent where
pToJSVal = unAutocompleteErrorEvent
instance PFromJSVal AutocompleteErrorEvent where
pFromJSVal = AutocompleteErrorEvent
instance ToJSVal AutocompleteErrorEvent where
toJSVal = return . unAutocompleteErrorEvent
instance FromJSVal AutocompleteErrorEvent where
fromJSVal = return . fmap AutocompleteErrorEvent . maybeJSNullOrUndefined
instance IsEvent AutocompleteErrorEvent
instance IsGObject AutocompleteErrorEvent where
typeGType _ = gTypeAutocompleteErrorEvent
foreign import javascript unsafe "window[\"AutocompleteErrorEvent\"]" gTypeAutocompleteErrorEvent :: GType
newtype BarProp = BarProp { unBarProp :: JSVal }
instance Eq (BarProp) where
(BarProp a) == (BarProp b) = js_eq a b
instance PToJSVal BarProp where
pToJSVal = unBarProp
instance PFromJSVal BarProp where
pFromJSVal = BarProp
instance ToJSVal BarProp where
toJSVal = return . unBarProp
instance FromJSVal BarProp where
fromJSVal = return . fmap BarProp . maybeJSNullOrUndefined
instance IsGObject BarProp where
typeGType _ = gTypeBarProp
foreign import javascript unsafe "window[\"BarProp\"]" gTypeBarProp :: GType
newtype BatteryManager = BatteryManager { unBatteryManager :: JSVal }
instance Eq (BatteryManager) where
(BatteryManager a) == (BatteryManager b) = js_eq a b
instance PToJSVal BatteryManager where
pToJSVal = unBatteryManager
instance PFromJSVal BatteryManager where
pFromJSVal = BatteryManager
instance ToJSVal BatteryManager where
toJSVal = return . unBatteryManager
instance FromJSVal BatteryManager where
fromJSVal = return . fmap BatteryManager . maybeJSNullOrUndefined
instance IsEventTarget BatteryManager
instance IsGObject BatteryManager where
typeGType _ = gTypeBatteryManager
foreign import javascript unsafe "window[\"BatteryManager\"]" gTypeBatteryManager :: GType
newtype BeforeLoadEvent = BeforeLoadEvent { unBeforeLoadEvent :: JSVal }
instance Eq (BeforeLoadEvent) where
(BeforeLoadEvent a) == (BeforeLoadEvent b) = js_eq a b
instance PToJSVal BeforeLoadEvent where
pToJSVal = unBeforeLoadEvent
instance PFromJSVal BeforeLoadEvent where
pFromJSVal = BeforeLoadEvent
instance ToJSVal BeforeLoadEvent where
toJSVal = return . unBeforeLoadEvent
instance FromJSVal BeforeLoadEvent where
fromJSVal = return . fmap BeforeLoadEvent . maybeJSNullOrUndefined
instance IsEvent BeforeLoadEvent
instance IsGObject BeforeLoadEvent where
typeGType _ = gTypeBeforeLoadEvent
foreign import javascript unsafe "window[\"BeforeLoadEvent\"]" gTypeBeforeLoadEvent :: GType
newtype BeforeUnloadEvent = BeforeUnloadEvent { unBeforeUnloadEvent :: JSVal }
instance Eq (BeforeUnloadEvent) where
(BeforeUnloadEvent a) == (BeforeUnloadEvent b) = js_eq a b
instance PToJSVal BeforeUnloadEvent where
pToJSVal = unBeforeUnloadEvent
instance PFromJSVal BeforeUnloadEvent where
pFromJSVal = BeforeUnloadEvent
instance ToJSVal BeforeUnloadEvent where
toJSVal = return . unBeforeUnloadEvent
instance FromJSVal BeforeUnloadEvent where
fromJSVal = return . fmap BeforeUnloadEvent . maybeJSNullOrUndefined
instance IsEvent BeforeUnloadEvent
instance IsGObject BeforeUnloadEvent where
typeGType _ = gTypeBeforeUnloadEvent
foreign import javascript unsafe "window[\"BeforeUnloadEvent\"]" gTypeBeforeUnloadEvent :: GType
newtype BiquadFilterNode = BiquadFilterNode { unBiquadFilterNode :: JSVal }
instance Eq (BiquadFilterNode) where
(BiquadFilterNode a) == (BiquadFilterNode b) = js_eq a b
instance PToJSVal BiquadFilterNode where
pToJSVal = unBiquadFilterNode
instance PFromJSVal BiquadFilterNode where
pFromJSVal = BiquadFilterNode
instance ToJSVal BiquadFilterNode where
toJSVal = return . unBiquadFilterNode
instance FromJSVal BiquadFilterNode where
fromJSVal = return . fmap BiquadFilterNode . maybeJSNullOrUndefined
instance IsAudioNode BiquadFilterNode
instance IsEventTarget BiquadFilterNode
instance IsGObject BiquadFilterNode where
typeGType _ = gTypeBiquadFilterNode
foreign import javascript unsafe "window[\"BiquadFilterNode\"]" gTypeBiquadFilterNode :: GType
newtype Blob = Blob { unBlob :: JSVal }
instance Eq (Blob) where
(Blob a) == (Blob b) = js_eq a b
instance PToJSVal Blob where
pToJSVal = unBlob
instance PFromJSVal Blob where
pFromJSVal = Blob
instance ToJSVal Blob where
toJSVal = return . unBlob
instance FromJSVal Blob where
fromJSVal = return . fmap Blob . maybeJSNullOrUndefined
class IsGObject o => IsBlob o
toBlob :: IsBlob o => o -> Blob
toBlob = Blob . coerce
instance IsBlob Blob
instance IsGObject Blob where
typeGType _ = gTypeBlob
foreign import javascript unsafe "window[\"Blob\"]" gTypeBlob :: GType
newtype CDATASection = CDATASection { unCDATASection :: JSVal }
instance Eq (CDATASection) where
(CDATASection a) == (CDATASection b) = js_eq a b
instance PToJSVal CDATASection where
pToJSVal = unCDATASection
instance PFromJSVal CDATASection where
pFromJSVal = CDATASection
instance ToJSVal CDATASection where
toJSVal = return . unCDATASection
instance FromJSVal CDATASection where
fromJSVal = return . fmap CDATASection . maybeJSNullOrUndefined
instance IsText CDATASection
instance IsCharacterData CDATASection
instance IsNode CDATASection
instance IsEventTarget CDATASection
instance IsGObject CDATASection where
typeGType _ = gTypeCDATASection
foreign import javascript unsafe "window[\"CDATASection\"]" gTypeCDATASection :: GType
newtype CSS = CSS { unCSS :: JSVal }
instance Eq (CSS) where
(CSS a) == (CSS b) = js_eq a b
instance PToJSVal CSS where
pToJSVal = unCSS
instance PFromJSVal CSS where
pFromJSVal = CSS
instance ToJSVal CSS where
toJSVal = return . unCSS
instance FromJSVal CSS where
fromJSVal = return . fmap CSS . maybeJSNullOrUndefined
instance IsGObject CSS where
typeGType _ = gTypeCSS
foreign import javascript unsafe "window[\"CSS\"]" gTypeCSS :: GType
newtype CSSCharsetRule = CSSCharsetRule { unCSSCharsetRule :: JSVal }
instance Eq (CSSCharsetRule) where
(CSSCharsetRule a) == (CSSCharsetRule b) = js_eq a b
instance PToJSVal CSSCharsetRule where
pToJSVal = unCSSCharsetRule
instance PFromJSVal CSSCharsetRule where
pFromJSVal = CSSCharsetRule
instance ToJSVal CSSCharsetRule where
toJSVal = return . unCSSCharsetRule
instance FromJSVal CSSCharsetRule where
fromJSVal = return . fmap CSSCharsetRule . maybeJSNullOrUndefined
instance IsCSSRule CSSCharsetRule
instance IsGObject CSSCharsetRule where
typeGType _ = gTypeCSSCharsetRule
foreign import javascript unsafe "window[\"CSSCharsetRule\"]" gTypeCSSCharsetRule :: GType
newtype CSSFontFaceLoadEvent = CSSFontFaceLoadEvent { unCSSFontFaceLoadEvent :: JSVal }
instance Eq (CSSFontFaceLoadEvent) where
(CSSFontFaceLoadEvent a) == (CSSFontFaceLoadEvent b) = js_eq a b
instance PToJSVal CSSFontFaceLoadEvent where
pToJSVal = unCSSFontFaceLoadEvent
instance PFromJSVal CSSFontFaceLoadEvent where
pFromJSVal = CSSFontFaceLoadEvent
instance ToJSVal CSSFontFaceLoadEvent where
toJSVal = return . unCSSFontFaceLoadEvent
instance FromJSVal CSSFontFaceLoadEvent where
fromJSVal = return . fmap CSSFontFaceLoadEvent . maybeJSNullOrUndefined
instance IsEvent CSSFontFaceLoadEvent
instance IsGObject CSSFontFaceLoadEvent where
typeGType _ = gTypeCSSFontFaceLoadEvent
foreign import javascript unsafe "window[\"CSSFontFaceLoadEvent\"]" gTypeCSSFontFaceLoadEvent :: GType
newtype CSSFontFaceRule = CSSFontFaceRule { unCSSFontFaceRule :: JSVal }
instance Eq (CSSFontFaceRule) where
(CSSFontFaceRule a) == (CSSFontFaceRule b) = js_eq a b
instance PToJSVal CSSFontFaceRule where
pToJSVal = unCSSFontFaceRule
instance PFromJSVal CSSFontFaceRule where
pFromJSVal = CSSFontFaceRule
instance ToJSVal CSSFontFaceRule where
toJSVal = return . unCSSFontFaceRule
instance FromJSVal CSSFontFaceRule where
fromJSVal = return . fmap CSSFontFaceRule . maybeJSNullOrUndefined
instance IsCSSRule CSSFontFaceRule
instance IsGObject CSSFontFaceRule where
typeGType _ = gTypeCSSFontFaceRule
foreign import javascript unsafe "window[\"CSSFontFaceRule\"]" gTypeCSSFontFaceRule :: GType
newtype CSSImportRule = CSSImportRule { unCSSImportRule :: JSVal }
instance Eq (CSSImportRule) where
(CSSImportRule a) == (CSSImportRule b) = js_eq a b
instance PToJSVal CSSImportRule where
pToJSVal = unCSSImportRule
instance PFromJSVal CSSImportRule where
pFromJSVal = CSSImportRule
instance ToJSVal CSSImportRule where
toJSVal = return . unCSSImportRule
instance FromJSVal CSSImportRule where
fromJSVal = return . fmap CSSImportRule . maybeJSNullOrUndefined
instance IsCSSRule CSSImportRule
instance IsGObject CSSImportRule where
typeGType _ = gTypeCSSImportRule
foreign import javascript unsafe "window[\"CSSImportRule\"]" gTypeCSSImportRule :: GType
newtype CSSKeyframeRule = CSSKeyframeRule { unCSSKeyframeRule :: JSVal }
instance Eq (CSSKeyframeRule) where
(CSSKeyframeRule a) == (CSSKeyframeRule b) = js_eq a b
instance PToJSVal CSSKeyframeRule where
pToJSVal = unCSSKeyframeRule
instance PFromJSVal CSSKeyframeRule where
pFromJSVal = CSSKeyframeRule
instance ToJSVal CSSKeyframeRule where
toJSVal = return . unCSSKeyframeRule
instance FromJSVal CSSKeyframeRule where
fromJSVal = return . fmap CSSKeyframeRule . maybeJSNullOrUndefined
instance IsCSSRule CSSKeyframeRule
instance IsGObject CSSKeyframeRule where
typeGType _ = gTypeCSSKeyframeRule
foreign import javascript unsafe "window[\"CSSKeyframeRule\"]" gTypeCSSKeyframeRule :: GType
newtype CSSKeyframesRule = CSSKeyframesRule { unCSSKeyframesRule :: JSVal }
instance Eq (CSSKeyframesRule) where
(CSSKeyframesRule a) == (CSSKeyframesRule b) = js_eq a b
instance PToJSVal CSSKeyframesRule where
pToJSVal = unCSSKeyframesRule
instance PFromJSVal CSSKeyframesRule where
pFromJSVal = CSSKeyframesRule
instance ToJSVal CSSKeyframesRule where
toJSVal = return . unCSSKeyframesRule
instance FromJSVal CSSKeyframesRule where
fromJSVal = return . fmap CSSKeyframesRule . maybeJSNullOrUndefined
instance IsCSSRule CSSKeyframesRule
instance IsGObject CSSKeyframesRule where
typeGType _ = gTypeCSSKeyframesRule
foreign import javascript unsafe "window[\"CSSKeyframesRule\"]" gTypeCSSKeyframesRule :: GType
newtype CSSMediaRule = CSSMediaRule { unCSSMediaRule :: JSVal }
instance Eq (CSSMediaRule) where
(CSSMediaRule a) == (CSSMediaRule b) = js_eq a b
instance PToJSVal CSSMediaRule where
pToJSVal = unCSSMediaRule
instance PFromJSVal CSSMediaRule where
pFromJSVal = CSSMediaRule
instance ToJSVal CSSMediaRule where
toJSVal = return . unCSSMediaRule
instance FromJSVal CSSMediaRule where
fromJSVal = return . fmap CSSMediaRule . maybeJSNullOrUndefined
instance IsCSSRule CSSMediaRule
instance IsGObject CSSMediaRule where
typeGType _ = gTypeCSSMediaRule
foreign import javascript unsafe "window[\"CSSMediaRule\"]" gTypeCSSMediaRule :: GType
newtype CSSPageRule = CSSPageRule { unCSSPageRule :: JSVal }
instance Eq (CSSPageRule) where
(CSSPageRule a) == (CSSPageRule b) = js_eq a b
instance PToJSVal CSSPageRule where
pToJSVal = unCSSPageRule
instance PFromJSVal CSSPageRule where
pFromJSVal = CSSPageRule
instance ToJSVal CSSPageRule where
toJSVal = return . unCSSPageRule
instance FromJSVal CSSPageRule where
fromJSVal = return . fmap CSSPageRule . maybeJSNullOrUndefined
instance IsCSSRule CSSPageRule
instance IsGObject CSSPageRule where
typeGType _ = gTypeCSSPageRule
foreign import javascript unsafe "window[\"CSSPageRule\"]" gTypeCSSPageRule :: GType
newtype CSSPrimitiveValue = CSSPrimitiveValue { unCSSPrimitiveValue :: JSVal }
instance Eq (CSSPrimitiveValue) where
(CSSPrimitiveValue a) == (CSSPrimitiveValue b) = js_eq a b
instance PToJSVal CSSPrimitiveValue where
pToJSVal = unCSSPrimitiveValue
instance PFromJSVal CSSPrimitiveValue where
pFromJSVal = CSSPrimitiveValue
instance ToJSVal CSSPrimitiveValue where
toJSVal = return . unCSSPrimitiveValue
instance FromJSVal CSSPrimitiveValue where
fromJSVal = return . fmap CSSPrimitiveValue . maybeJSNullOrUndefined
instance IsCSSValue CSSPrimitiveValue
instance IsGObject CSSPrimitiveValue where
typeGType _ = gTypeCSSPrimitiveValue
foreign import javascript unsafe "window[\"CSSPrimitiveValue\"]" gTypeCSSPrimitiveValue :: GType
newtype CSSRule = CSSRule { unCSSRule :: JSVal }
instance Eq (CSSRule) where
(CSSRule a) == (CSSRule b) = js_eq a b
instance PToJSVal CSSRule where
pToJSVal = unCSSRule
instance PFromJSVal CSSRule where
pFromJSVal = CSSRule
instance ToJSVal CSSRule where
toJSVal = return . unCSSRule
instance FromJSVal CSSRule where
fromJSVal = return . fmap CSSRule . maybeJSNullOrUndefined
class IsGObject o => IsCSSRule o
toCSSRule :: IsCSSRule o => o -> CSSRule
toCSSRule = CSSRule . coerce
instance IsCSSRule CSSRule
instance IsGObject CSSRule where
typeGType _ = gTypeCSSRule
foreign import javascript unsafe "window[\"CSSRule\"]" gTypeCSSRule :: GType
newtype CSSRuleList = CSSRuleList { unCSSRuleList :: JSVal }
instance Eq (CSSRuleList) where
(CSSRuleList a) == (CSSRuleList b) = js_eq a b
instance PToJSVal CSSRuleList where
pToJSVal = unCSSRuleList
instance PFromJSVal CSSRuleList where
pFromJSVal = CSSRuleList
instance ToJSVal CSSRuleList where
toJSVal = return . unCSSRuleList
instance FromJSVal CSSRuleList where
fromJSVal = return . fmap CSSRuleList . maybeJSNullOrUndefined
instance IsGObject CSSRuleList where
typeGType _ = gTypeCSSRuleList
foreign import javascript unsafe "window[\"CSSRuleList\"]" gTypeCSSRuleList :: GType
newtype CSSStyleDeclaration = CSSStyleDeclaration { unCSSStyleDeclaration :: JSVal }
instance Eq (CSSStyleDeclaration) where
(CSSStyleDeclaration a) == (CSSStyleDeclaration b) = js_eq a b
instance PToJSVal CSSStyleDeclaration where
pToJSVal = unCSSStyleDeclaration
instance PFromJSVal CSSStyleDeclaration where
pFromJSVal = CSSStyleDeclaration
instance ToJSVal CSSStyleDeclaration where
toJSVal = return . unCSSStyleDeclaration
instance FromJSVal CSSStyleDeclaration where
fromJSVal = return . fmap CSSStyleDeclaration . maybeJSNullOrUndefined
instance IsGObject CSSStyleDeclaration where
typeGType _ = gTypeCSSStyleDeclaration
foreign import javascript unsafe "window[\"CSSStyleDeclaration\"]" gTypeCSSStyleDeclaration :: GType
newtype CSSStyleRule = CSSStyleRule { unCSSStyleRule :: JSVal }
instance Eq (CSSStyleRule) where
(CSSStyleRule a) == (CSSStyleRule b) = js_eq a b
instance PToJSVal CSSStyleRule where
pToJSVal = unCSSStyleRule
instance PFromJSVal CSSStyleRule where
pFromJSVal = CSSStyleRule
instance ToJSVal CSSStyleRule where
toJSVal = return . unCSSStyleRule
instance FromJSVal CSSStyleRule where
fromJSVal = return . fmap CSSStyleRule . maybeJSNullOrUndefined
instance IsCSSRule CSSStyleRule
instance IsGObject CSSStyleRule where
typeGType _ = gTypeCSSStyleRule
foreign import javascript unsafe "window[\"CSSStyleRule\"]" gTypeCSSStyleRule :: GType
newtype CSSStyleSheet = CSSStyleSheet { unCSSStyleSheet :: JSVal }
instance Eq (CSSStyleSheet) where
(CSSStyleSheet a) == (CSSStyleSheet b) = js_eq a b
instance PToJSVal CSSStyleSheet where
pToJSVal = unCSSStyleSheet
instance PFromJSVal CSSStyleSheet where
pFromJSVal = CSSStyleSheet
instance ToJSVal CSSStyleSheet where
toJSVal = return . unCSSStyleSheet
instance FromJSVal CSSStyleSheet where
fromJSVal = return . fmap CSSStyleSheet . maybeJSNullOrUndefined
instance IsStyleSheet CSSStyleSheet
instance IsGObject CSSStyleSheet where
typeGType _ = gTypeCSSStyleSheet
foreign import javascript unsafe "window[\"CSSStyleSheet\"]" gTypeCSSStyleSheet :: GType
newtype CSSSupportsRule = CSSSupportsRule { unCSSSupportsRule :: JSVal }
instance Eq (CSSSupportsRule) where
(CSSSupportsRule a) == (CSSSupportsRule b) = js_eq a b
instance PToJSVal CSSSupportsRule where
pToJSVal = unCSSSupportsRule
instance PFromJSVal CSSSupportsRule where
pFromJSVal = CSSSupportsRule
instance ToJSVal CSSSupportsRule where
toJSVal = return . unCSSSupportsRule
instance FromJSVal CSSSupportsRule where
fromJSVal = return . fmap CSSSupportsRule . maybeJSNullOrUndefined
instance IsCSSRule CSSSupportsRule
instance IsGObject CSSSupportsRule where
typeGType _ = gTypeCSSSupportsRule
foreign import javascript unsafe "window[\"CSSSupportsRule\"]" gTypeCSSSupportsRule :: GType
newtype CSSUnknownRule = CSSUnknownRule { unCSSUnknownRule :: JSVal }
instance Eq (CSSUnknownRule) where
(CSSUnknownRule a) == (CSSUnknownRule b) = js_eq a b
instance PToJSVal CSSUnknownRule where
pToJSVal = unCSSUnknownRule
instance PFromJSVal CSSUnknownRule where
pFromJSVal = CSSUnknownRule
instance ToJSVal CSSUnknownRule where
toJSVal = return . unCSSUnknownRule
instance FromJSVal CSSUnknownRule where
fromJSVal = return . fmap CSSUnknownRule . maybeJSNullOrUndefined
instance IsCSSRule CSSUnknownRule
instance IsGObject CSSUnknownRule where
typeGType _ = gTypeCSSUnknownRule
foreign import javascript unsafe "window[\"CSSUnknownRule\"]" gTypeCSSUnknownRule :: GType
newtype CSSValue = CSSValue { unCSSValue :: JSVal }
instance Eq (CSSValue) where
(CSSValue a) == (CSSValue b) = js_eq a b
instance PToJSVal CSSValue where
pToJSVal = unCSSValue
instance PFromJSVal CSSValue where
pFromJSVal = CSSValue
instance ToJSVal CSSValue where
toJSVal = return . unCSSValue
instance FromJSVal CSSValue where
fromJSVal = return . fmap CSSValue . maybeJSNullOrUndefined
class IsGObject o => IsCSSValue o
toCSSValue :: IsCSSValue o => o -> CSSValue
toCSSValue = CSSValue . coerce
instance IsCSSValue CSSValue
instance IsGObject CSSValue where
typeGType _ = gTypeCSSValue
foreign import javascript unsafe "window[\"CSSValue\"]" gTypeCSSValue :: GType
newtype CSSValueList = CSSValueList { unCSSValueList :: JSVal }
instance Eq (CSSValueList) where
(CSSValueList a) == (CSSValueList b) = js_eq a b
instance PToJSVal CSSValueList where
pToJSVal = unCSSValueList
instance PFromJSVal CSSValueList where
pFromJSVal = CSSValueList
instance ToJSVal CSSValueList where
toJSVal = return . unCSSValueList
instance FromJSVal CSSValueList where
fromJSVal = return . fmap CSSValueList . maybeJSNullOrUndefined
class IsCSSValue o => IsCSSValueList o
toCSSValueList :: IsCSSValueList o => o -> CSSValueList
toCSSValueList = CSSValueList . coerce
instance IsCSSValueList CSSValueList
instance IsCSSValue CSSValueList
instance IsGObject CSSValueList where
typeGType _ = gTypeCSSValueList
foreign import javascript unsafe "window[\"CSSValueList\"]" gTypeCSSValueList :: GType
newtype CanvasGradient = CanvasGradient { unCanvasGradient :: JSVal }
instance Eq (CanvasGradient) where
(CanvasGradient a) == (CanvasGradient b) = js_eq a b
instance PToJSVal CanvasGradient where
pToJSVal = unCanvasGradient
instance PFromJSVal CanvasGradient where
pFromJSVal = CanvasGradient
instance ToJSVal CanvasGradient where
toJSVal = return . unCanvasGradient
instance FromJSVal CanvasGradient where
fromJSVal = return . fmap CanvasGradient . maybeJSNullOrUndefined
instance IsGObject CanvasGradient where
typeGType _ = gTypeCanvasGradient
foreign import javascript unsafe "window[\"CanvasGradient\"]" gTypeCanvasGradient :: GType
newtype CanvasPattern = CanvasPattern { unCanvasPattern :: JSVal }
instance Eq (CanvasPattern) where
(CanvasPattern a) == (CanvasPattern b) = js_eq a b
instance PToJSVal CanvasPattern where
pToJSVal = unCanvasPattern
instance PFromJSVal CanvasPattern where
pFromJSVal = CanvasPattern
instance ToJSVal CanvasPattern where
toJSVal = return . unCanvasPattern
instance FromJSVal CanvasPattern where
fromJSVal = return . fmap CanvasPattern . maybeJSNullOrUndefined
instance IsGObject CanvasPattern where
typeGType _ = gTypeCanvasPattern
foreign import javascript unsafe "window[\"CanvasPattern\"]" gTypeCanvasPattern :: GType
newtype CanvasProxy = CanvasProxy { unCanvasProxy :: JSVal }
instance Eq (CanvasProxy) where
(CanvasProxy a) == (CanvasProxy b) = js_eq a b
instance PToJSVal CanvasProxy where
pToJSVal = unCanvasProxy
instance PFromJSVal CanvasProxy where
pFromJSVal = CanvasProxy
instance ToJSVal CanvasProxy where
toJSVal = return . unCanvasProxy
instance FromJSVal CanvasProxy where
fromJSVal = return . fmap CanvasProxy . maybeJSNullOrUndefined
instance IsGObject CanvasProxy where
typeGType _ = gTypeCanvasProxy
foreign import javascript unsafe "window[\"CanvasProxy\"]" gTypeCanvasProxy :: GType
newtype CanvasRenderingContext = CanvasRenderingContext { unCanvasRenderingContext :: JSVal }
instance Eq (CanvasRenderingContext) where
(CanvasRenderingContext a) == (CanvasRenderingContext b) = js_eq a b
instance PToJSVal CanvasRenderingContext where
pToJSVal = unCanvasRenderingContext
instance PFromJSVal CanvasRenderingContext where
pFromJSVal = CanvasRenderingContext
instance ToJSVal CanvasRenderingContext where
toJSVal = return . unCanvasRenderingContext
instance FromJSVal CanvasRenderingContext where
fromJSVal = return . fmap CanvasRenderingContext . maybeJSNullOrUndefined
class IsGObject o => IsCanvasRenderingContext o
toCanvasRenderingContext :: IsCanvasRenderingContext o => o -> CanvasRenderingContext
toCanvasRenderingContext = CanvasRenderingContext . coerce
instance IsCanvasRenderingContext CanvasRenderingContext
instance IsGObject CanvasRenderingContext where
typeGType _ = gTypeCanvasRenderingContext
foreign import javascript unsafe "window[\"CanvasRenderingContext\"]" gTypeCanvasRenderingContext :: GType
newtype CanvasRenderingContext2D = CanvasRenderingContext2D { unCanvasRenderingContext2D :: JSVal }
instance Eq (CanvasRenderingContext2D) where
(CanvasRenderingContext2D a) == (CanvasRenderingContext2D b) = js_eq a b
instance PToJSVal CanvasRenderingContext2D where
pToJSVal = unCanvasRenderingContext2D
instance PFromJSVal CanvasRenderingContext2D where
pFromJSVal = CanvasRenderingContext2D
instance ToJSVal CanvasRenderingContext2D where
toJSVal = return . unCanvasRenderingContext2D
instance FromJSVal CanvasRenderingContext2D where
fromJSVal = return . fmap CanvasRenderingContext2D . maybeJSNullOrUndefined
instance IsCanvasRenderingContext CanvasRenderingContext2D
instance IsGObject CanvasRenderingContext2D where
typeGType _ = gTypeCanvasRenderingContext2D
foreign import javascript unsafe "window[\"CanvasRenderingContext2D\"]" gTypeCanvasRenderingContext2D :: GType
newtype CapabilityRange = CapabilityRange { unCapabilityRange :: JSVal }
instance Eq (CapabilityRange) where
(CapabilityRange a) == (CapabilityRange b) = js_eq a b
instance PToJSVal CapabilityRange where
pToJSVal = unCapabilityRange
instance PFromJSVal CapabilityRange where
pFromJSVal = CapabilityRange
instance ToJSVal CapabilityRange where
toJSVal = return . unCapabilityRange
instance FromJSVal CapabilityRange where
fromJSVal = return . fmap CapabilityRange . maybeJSNullOrUndefined
instance IsGObject CapabilityRange where
typeGType _ = gTypeCapabilityRange
foreign import javascript unsafe "window[\"CapabilityRange\"]" gTypeCapabilityRange :: GType
newtype ChannelMergerNode = ChannelMergerNode { unChannelMergerNode :: JSVal }
instance Eq (ChannelMergerNode) where
(ChannelMergerNode a) == (ChannelMergerNode b) = js_eq a b
instance PToJSVal ChannelMergerNode where
pToJSVal = unChannelMergerNode
instance PFromJSVal ChannelMergerNode where
pFromJSVal = ChannelMergerNode
instance ToJSVal ChannelMergerNode where
toJSVal = return . unChannelMergerNode
instance FromJSVal ChannelMergerNode where
fromJSVal = return . fmap ChannelMergerNode . maybeJSNullOrUndefined
instance IsAudioNode ChannelMergerNode
instance IsEventTarget ChannelMergerNode
instance IsGObject ChannelMergerNode where
typeGType _ = gTypeChannelMergerNode
foreign import javascript unsafe "window[\"ChannelMergerNode\"]" gTypeChannelMergerNode :: GType
newtype ChannelSplitterNode = ChannelSplitterNode { unChannelSplitterNode :: JSVal }
instance Eq (ChannelSplitterNode) where
(ChannelSplitterNode a) == (ChannelSplitterNode b) = js_eq a b
instance PToJSVal ChannelSplitterNode where
pToJSVal = unChannelSplitterNode
instance PFromJSVal ChannelSplitterNode where
pFromJSVal = ChannelSplitterNode
instance ToJSVal ChannelSplitterNode where
toJSVal = return . unChannelSplitterNode
instance FromJSVal ChannelSplitterNode where
fromJSVal = return . fmap ChannelSplitterNode . maybeJSNullOrUndefined
instance IsAudioNode ChannelSplitterNode
instance IsEventTarget ChannelSplitterNode
instance IsGObject ChannelSplitterNode where
typeGType _ = gTypeChannelSplitterNode
foreign import javascript unsafe "window[\"ChannelSplitterNode\"]" gTypeChannelSplitterNode :: GType
newtype CharacterData = CharacterData { unCharacterData :: JSVal }
instance Eq (CharacterData) where
(CharacterData a) == (CharacterData b) = js_eq a b
instance PToJSVal CharacterData where
pToJSVal = unCharacterData
instance PFromJSVal CharacterData where
pFromJSVal = CharacterData
instance ToJSVal CharacterData where
toJSVal = return . unCharacterData
instance FromJSVal CharacterData where
fromJSVal = return . fmap CharacterData . maybeJSNullOrUndefined
class IsNode o => IsCharacterData o
toCharacterData :: IsCharacterData o => o -> CharacterData
toCharacterData = CharacterData . coerce
instance IsCharacterData CharacterData
instance IsNode CharacterData
instance IsEventTarget CharacterData
instance IsGObject CharacterData where
typeGType _ = gTypeCharacterData
foreign import javascript unsafe "window[\"CharacterData\"]" gTypeCharacterData :: GType
newtype ChildNode = ChildNode { unChildNode :: JSVal }
instance Eq (ChildNode) where
(ChildNode a) == (ChildNode b) = js_eq a b
instance PToJSVal ChildNode where
pToJSVal = unChildNode
instance PFromJSVal ChildNode where
pFromJSVal = ChildNode
instance ToJSVal ChildNode where
toJSVal = return . unChildNode
instance FromJSVal ChildNode where
fromJSVal = return . fmap ChildNode . maybeJSNullOrUndefined
instance IsGObject ChildNode where
typeGType _ = gTypeChildNode
foreign import javascript unsafe "window[\"ChildNode\"]" gTypeChildNode :: GType
newtype ClientRect = ClientRect { unClientRect :: JSVal }
instance Eq (ClientRect) where
(ClientRect a) == (ClientRect b) = js_eq a b
instance PToJSVal ClientRect where
pToJSVal = unClientRect
instance PFromJSVal ClientRect where
pFromJSVal = ClientRect
instance ToJSVal ClientRect where
toJSVal = return . unClientRect
instance FromJSVal ClientRect where
fromJSVal = return . fmap ClientRect . maybeJSNullOrUndefined
instance IsGObject ClientRect where
typeGType _ = gTypeClientRect
foreign import javascript unsafe "window[\"ClientRect\"]" gTypeClientRect :: GType
newtype ClientRectList = ClientRectList { unClientRectList :: JSVal }
instance Eq (ClientRectList) where
(ClientRectList a) == (ClientRectList b) = js_eq a b
instance PToJSVal ClientRectList where
pToJSVal = unClientRectList
instance PFromJSVal ClientRectList where
pFromJSVal = ClientRectList
instance ToJSVal ClientRectList where
toJSVal = return . unClientRectList
instance FromJSVal ClientRectList where
fromJSVal = return . fmap ClientRectList . maybeJSNullOrUndefined
instance IsGObject ClientRectList where
typeGType _ = gTypeClientRectList
foreign import javascript unsafe "window[\"ClientRectList\"]" gTypeClientRectList :: GType
newtype CloseEvent = CloseEvent { unCloseEvent :: JSVal }
instance Eq (CloseEvent) where
(CloseEvent a) == (CloseEvent b) = js_eq a b
instance PToJSVal CloseEvent where
pToJSVal = unCloseEvent
instance PFromJSVal CloseEvent where
pFromJSVal = CloseEvent
instance ToJSVal CloseEvent where
toJSVal = return . unCloseEvent
instance FromJSVal CloseEvent where
fromJSVal = return . fmap CloseEvent . maybeJSNullOrUndefined
instance IsEvent CloseEvent
instance IsGObject CloseEvent where
typeGType _ = gTypeCloseEvent
foreign import javascript unsafe "window[\"CloseEvent\"]" gTypeCloseEvent :: GType
newtype CommandLineAPIHost = CommandLineAPIHost { unCommandLineAPIHost :: JSVal }
instance Eq (CommandLineAPIHost) where
(CommandLineAPIHost a) == (CommandLineAPIHost b) = js_eq a b
instance PToJSVal CommandLineAPIHost where
pToJSVal = unCommandLineAPIHost
instance PFromJSVal CommandLineAPIHost where
pFromJSVal = CommandLineAPIHost
instance ToJSVal CommandLineAPIHost where
toJSVal = return . unCommandLineAPIHost
instance FromJSVal CommandLineAPIHost where
fromJSVal = return . fmap CommandLineAPIHost . maybeJSNullOrUndefined
instance IsGObject CommandLineAPIHost where
typeGType _ = gTypeCommandLineAPIHost
foreign import javascript unsafe "window[\"CommandLineAPIHost\"]" gTypeCommandLineAPIHost :: GType
newtype Comment = Comment { unComment :: JSVal }
instance Eq (Comment) where
(Comment a) == (Comment b) = js_eq a b
instance PToJSVal Comment where
pToJSVal = unComment
instance PFromJSVal Comment where
pFromJSVal = Comment
instance ToJSVal Comment where
toJSVal = return . unComment
instance FromJSVal Comment where
fromJSVal = return . fmap Comment . maybeJSNullOrUndefined
instance IsCharacterData Comment
instance IsNode Comment
instance IsEventTarget Comment
instance IsGObject Comment where
typeGType _ = gTypeComment
foreign import javascript unsafe "window[\"Comment\"]" gTypeComment :: GType
newtype CompositionEvent = CompositionEvent { unCompositionEvent :: JSVal }
instance Eq (CompositionEvent) where
(CompositionEvent a) == (CompositionEvent b) = js_eq a b
instance PToJSVal CompositionEvent where
pToJSVal = unCompositionEvent
instance PFromJSVal CompositionEvent where
pFromJSVal = CompositionEvent
instance ToJSVal CompositionEvent where
toJSVal = return . unCompositionEvent
instance FromJSVal CompositionEvent where
fromJSVal = return . fmap CompositionEvent . maybeJSNullOrUndefined
instance IsUIEvent CompositionEvent
instance IsEvent CompositionEvent
instance IsGObject CompositionEvent where
typeGType _ = gTypeCompositionEvent
foreign import javascript unsafe "window[\"CompositionEvent\"]" gTypeCompositionEvent :: GType
newtype ConvolverNode = ConvolverNode { unConvolverNode :: JSVal }
instance Eq (ConvolverNode) where
(ConvolverNode a) == (ConvolverNode b) = js_eq a b
instance PToJSVal ConvolverNode where
pToJSVal = unConvolverNode
instance PFromJSVal ConvolverNode where
pFromJSVal = ConvolverNode
instance ToJSVal ConvolverNode where
toJSVal = return . unConvolverNode
instance FromJSVal ConvolverNode where
fromJSVal = return . fmap ConvolverNode . maybeJSNullOrUndefined
instance IsAudioNode ConvolverNode
instance IsEventTarget ConvolverNode
instance IsGObject ConvolverNode where
typeGType _ = gTypeConvolverNode
foreign import javascript unsafe "window[\"ConvolverNode\"]" gTypeConvolverNode :: GType
newtype Coordinates = Coordinates { unCoordinates :: JSVal }
instance Eq (Coordinates) where
(Coordinates a) == (Coordinates b) = js_eq a b
instance PToJSVal Coordinates where
pToJSVal = unCoordinates
instance PFromJSVal Coordinates where
pFromJSVal = Coordinates
instance ToJSVal Coordinates where
toJSVal = return . unCoordinates
instance FromJSVal Coordinates where
fromJSVal = return . fmap Coordinates . maybeJSNullOrUndefined
instance IsGObject Coordinates where
typeGType _ = gTypeCoordinates
foreign import javascript unsafe "window[\"Coordinates\"]" gTypeCoordinates :: GType
newtype Counter = Counter { unCounter :: JSVal }
instance Eq (Counter) where
(Counter a) == (Counter b) = js_eq a b
instance PToJSVal Counter where
pToJSVal = unCounter
instance PFromJSVal Counter where
pFromJSVal = Counter
instance ToJSVal Counter where
toJSVal = return . unCounter
instance FromJSVal Counter where
fromJSVal = return . fmap Counter . maybeJSNullOrUndefined
instance IsGObject Counter where
typeGType _ = gTypeCounter
foreign import javascript unsafe "window[\"Counter\"]" gTypeCounter :: GType
newtype Crypto = Crypto { unCrypto :: JSVal }
instance Eq (Crypto) where
(Crypto a) == (Crypto b) = js_eq a b
instance PToJSVal Crypto where
pToJSVal = unCrypto
instance PFromJSVal Crypto where
pFromJSVal = Crypto
instance ToJSVal Crypto where
toJSVal = return . unCrypto
instance FromJSVal Crypto where
fromJSVal = return . fmap Crypto . maybeJSNullOrUndefined
instance IsGObject Crypto where
typeGType _ = gTypeCrypto
foreign import javascript unsafe "window[\"Crypto\"]" gTypeCrypto :: GType
newtype CryptoKey = CryptoKey { unCryptoKey :: JSVal }
instance Eq (CryptoKey) where
(CryptoKey a) == (CryptoKey b) = js_eq a b
instance PToJSVal CryptoKey where
pToJSVal = unCryptoKey
instance PFromJSVal CryptoKey where
pFromJSVal = CryptoKey
instance ToJSVal CryptoKey where
toJSVal = return . unCryptoKey
instance FromJSVal CryptoKey where
fromJSVal = return . fmap CryptoKey . maybeJSNullOrUndefined
instance IsGObject CryptoKey where
typeGType _ = gTypeCryptoKey
foreign import javascript unsafe "window[\"CryptoKey\"]" gTypeCryptoKey :: GType
newtype CryptoKeyPair = CryptoKeyPair { unCryptoKeyPair :: JSVal }
instance Eq (CryptoKeyPair) where
(CryptoKeyPair a) == (CryptoKeyPair b) = js_eq a b
instance PToJSVal CryptoKeyPair where
pToJSVal = unCryptoKeyPair
instance PFromJSVal CryptoKeyPair where
pFromJSVal = CryptoKeyPair
instance ToJSVal CryptoKeyPair where
toJSVal = return . unCryptoKeyPair
instance FromJSVal CryptoKeyPair where
fromJSVal = return . fmap CryptoKeyPair . maybeJSNullOrUndefined
instance IsGObject CryptoKeyPair where
typeGType _ = gTypeCryptoKeyPair
foreign import javascript unsafe "window[\"CryptoKeyPair\"]" gTypeCryptoKeyPair :: GType
newtype CustomEvent = CustomEvent { unCustomEvent :: JSVal }
instance Eq (CustomEvent) where
(CustomEvent a) == (CustomEvent b) = js_eq a b
instance PToJSVal CustomEvent where
pToJSVal = unCustomEvent
instance PFromJSVal CustomEvent where
pFromJSVal = CustomEvent
instance ToJSVal CustomEvent where
toJSVal = return . unCustomEvent
instance FromJSVal CustomEvent where
fromJSVal = return . fmap CustomEvent . maybeJSNullOrUndefined
instance IsEvent CustomEvent
instance IsGObject CustomEvent where
typeGType _ = gTypeCustomEvent
foreign import javascript unsafe "window[\"CustomEvent\"]" gTypeCustomEvent :: GType
newtype DOMError = DOMError { unDOMError :: JSVal }
instance Eq (DOMError) where
(DOMError a) == (DOMError b) = js_eq a b
instance PToJSVal DOMError where
pToJSVal = unDOMError
instance PFromJSVal DOMError where
pFromJSVal = DOMError
instance ToJSVal DOMError where
toJSVal = return . unDOMError
instance FromJSVal DOMError where
fromJSVal = return . fmap DOMError . maybeJSNullOrUndefined
class IsGObject o => IsDOMError o
toDOMError :: IsDOMError o => o -> DOMError
toDOMError = DOMError . coerce
instance IsDOMError DOMError
instance IsGObject DOMError where
typeGType _ = gTypeDOMError
foreign import javascript unsafe "window[\"DOMError\"]" gTypeDOMError :: GType
newtype DOMImplementation = DOMImplementation { unDOMImplementation :: JSVal }
instance Eq (DOMImplementation) where
(DOMImplementation a) == (DOMImplementation b) = js_eq a b
instance PToJSVal DOMImplementation where
pToJSVal = unDOMImplementation
instance PFromJSVal DOMImplementation where
pFromJSVal = DOMImplementation
instance ToJSVal DOMImplementation where
toJSVal = return . unDOMImplementation
instance FromJSVal DOMImplementation where
fromJSVal = return . fmap DOMImplementation . maybeJSNullOrUndefined
instance IsGObject DOMImplementation where
typeGType _ = gTypeDOMImplementation
foreign import javascript unsafe "window[\"DOMImplementation\"]" gTypeDOMImplementation :: GType
newtype DOMNamedFlowCollection = DOMNamedFlowCollection { unDOMNamedFlowCollection :: JSVal }
instance Eq (DOMNamedFlowCollection) where
(DOMNamedFlowCollection a) == (DOMNamedFlowCollection b) = js_eq a b
instance PToJSVal DOMNamedFlowCollection where
pToJSVal = unDOMNamedFlowCollection
instance PFromJSVal DOMNamedFlowCollection where
pFromJSVal = DOMNamedFlowCollection
instance ToJSVal DOMNamedFlowCollection where
toJSVal = return . unDOMNamedFlowCollection
instance FromJSVal DOMNamedFlowCollection where
fromJSVal = return . fmap DOMNamedFlowCollection . maybeJSNullOrUndefined
instance IsGObject DOMNamedFlowCollection where
typeGType _ = gTypeDOMNamedFlowCollection
foreign import javascript unsafe "window[\"WebKitNamedFlowCollection\"]" gTypeDOMNamedFlowCollection :: GType
newtype DOMParser = DOMParser { unDOMParser :: JSVal }
instance Eq (DOMParser) where
(DOMParser a) == (DOMParser b) = js_eq a b
instance PToJSVal DOMParser where
pToJSVal = unDOMParser
instance PFromJSVal DOMParser where
pFromJSVal = DOMParser
instance ToJSVal DOMParser where
toJSVal = return . unDOMParser
instance FromJSVal DOMParser where
fromJSVal = return . fmap DOMParser . maybeJSNullOrUndefined
instance IsGObject DOMParser where
typeGType _ = gTypeDOMParser
foreign import javascript unsafe "window[\"DOMParser\"]" gTypeDOMParser :: GType
newtype DOMSettableTokenList = DOMSettableTokenList { unDOMSettableTokenList :: JSVal }
instance Eq (DOMSettableTokenList) where
(DOMSettableTokenList a) == (DOMSettableTokenList b) = js_eq a b
instance PToJSVal DOMSettableTokenList where
pToJSVal = unDOMSettableTokenList
instance PFromJSVal DOMSettableTokenList where
pFromJSVal = DOMSettableTokenList
instance ToJSVal DOMSettableTokenList where
toJSVal = return . unDOMSettableTokenList
instance FromJSVal DOMSettableTokenList where
fromJSVal = return . fmap DOMSettableTokenList . maybeJSNullOrUndefined
instance IsDOMTokenList DOMSettableTokenList
instance IsGObject DOMSettableTokenList where
typeGType _ = gTypeDOMSettableTokenList
foreign import javascript unsafe "window[\"DOMSettableTokenList\"]" gTypeDOMSettableTokenList :: GType
newtype DOMStringList = DOMStringList { unDOMStringList :: JSVal }
instance Eq (DOMStringList) where
(DOMStringList a) == (DOMStringList b) = js_eq a b
instance PToJSVal DOMStringList where
pToJSVal = unDOMStringList
instance PFromJSVal DOMStringList where
pFromJSVal = DOMStringList
instance ToJSVal DOMStringList where
toJSVal = return . unDOMStringList
instance FromJSVal DOMStringList where
fromJSVal = return . fmap DOMStringList . maybeJSNullOrUndefined
instance IsGObject DOMStringList where
typeGType _ = gTypeDOMStringList
foreign import javascript unsafe "window[\"DOMStringList\"]" gTypeDOMStringList :: GType
newtype DOMStringMap = DOMStringMap { unDOMStringMap :: JSVal }
instance Eq (DOMStringMap) where
(DOMStringMap a) == (DOMStringMap b) = js_eq a b
instance PToJSVal DOMStringMap where
pToJSVal = unDOMStringMap
instance PFromJSVal DOMStringMap where
pFromJSVal = DOMStringMap
instance ToJSVal DOMStringMap where
toJSVal = return . unDOMStringMap
instance FromJSVal DOMStringMap where
fromJSVal = return . fmap DOMStringMap . maybeJSNullOrUndefined
instance IsGObject DOMStringMap where
typeGType _ = gTypeDOMStringMap
foreign import javascript unsafe "window[\"DOMStringMap\"]" gTypeDOMStringMap :: GType
newtype DOMTokenList = DOMTokenList { unDOMTokenList :: JSVal }
instance Eq (DOMTokenList) where
(DOMTokenList a) == (DOMTokenList b) = js_eq a b
instance PToJSVal DOMTokenList where
pToJSVal = unDOMTokenList
instance PFromJSVal DOMTokenList where
pFromJSVal = DOMTokenList
instance ToJSVal DOMTokenList where
toJSVal = return . unDOMTokenList
instance FromJSVal DOMTokenList where
fromJSVal = return . fmap DOMTokenList . maybeJSNullOrUndefined
class IsGObject o => IsDOMTokenList o
toDOMTokenList :: IsDOMTokenList o => o -> DOMTokenList
toDOMTokenList = DOMTokenList . coerce
instance IsDOMTokenList DOMTokenList
instance IsGObject DOMTokenList where
typeGType _ = gTypeDOMTokenList
foreign import javascript unsafe "window[\"DOMTokenList\"]" gTypeDOMTokenList :: GType
newtype DataCue = DataCue { unDataCue :: JSVal }
instance Eq (DataCue) where
(DataCue a) == (DataCue b) = js_eq a b
instance PToJSVal DataCue where
pToJSVal = unDataCue
instance PFromJSVal DataCue where
pFromJSVal = DataCue
instance ToJSVal DataCue where
toJSVal = return . unDataCue
instance FromJSVal DataCue where
fromJSVal = return . fmap DataCue . maybeJSNullOrUndefined
instance IsTextTrackCue DataCue
instance IsEventTarget DataCue
instance IsGObject DataCue where
typeGType _ = gTypeDataCue
foreign import javascript unsafe "window[\"WebKitDataCue\"]" gTypeDataCue :: GType
newtype DataTransfer = DataTransfer { unDataTransfer :: JSVal }
instance Eq (DataTransfer) where
(DataTransfer a) == (DataTransfer b) = js_eq a b
instance PToJSVal DataTransfer where
pToJSVal = unDataTransfer
instance PFromJSVal DataTransfer where
pFromJSVal = DataTransfer
instance ToJSVal DataTransfer where
toJSVal = return . unDataTransfer
instance FromJSVal DataTransfer where
fromJSVal = return . fmap DataTransfer . maybeJSNullOrUndefined
instance IsGObject DataTransfer where
typeGType _ = gTypeDataTransfer
foreign import javascript unsafe "window[\"DataTransfer\"]" gTypeDataTransfer :: GType
newtype DataTransferItem = DataTransferItem { unDataTransferItem :: JSVal }
instance Eq (DataTransferItem) where
(DataTransferItem a) == (DataTransferItem b) = js_eq a b
instance PToJSVal DataTransferItem where
pToJSVal = unDataTransferItem
instance PFromJSVal DataTransferItem where
pFromJSVal = DataTransferItem
instance ToJSVal DataTransferItem where
toJSVal = return . unDataTransferItem
instance FromJSVal DataTransferItem where
fromJSVal = return . fmap DataTransferItem . maybeJSNullOrUndefined
instance IsGObject DataTransferItem where
typeGType _ = gTypeDataTransferItem
foreign import javascript unsafe "window[\"DataTransferItem\"]" gTypeDataTransferItem :: GType
newtype DataTransferItemList = DataTransferItemList { unDataTransferItemList :: JSVal }
instance Eq (DataTransferItemList) where
(DataTransferItemList a) == (DataTransferItemList b) = js_eq a b
instance PToJSVal DataTransferItemList where
pToJSVal = unDataTransferItemList
instance PFromJSVal DataTransferItemList where
pFromJSVal = DataTransferItemList
instance ToJSVal DataTransferItemList where
toJSVal = return . unDataTransferItemList
instance FromJSVal DataTransferItemList where
fromJSVal = return . fmap DataTransferItemList . maybeJSNullOrUndefined
instance IsGObject DataTransferItemList where
typeGType _ = gTypeDataTransferItemList
foreign import javascript unsafe "window[\"DataTransferItemList\"]" gTypeDataTransferItemList :: GType
newtype Database = Database { unDatabase :: JSVal }
instance Eq (Database) where
(Database a) == (Database b) = js_eq a b
instance PToJSVal Database where
pToJSVal = unDatabase
instance PFromJSVal Database where
pFromJSVal = Database
instance ToJSVal Database where
toJSVal = return . unDatabase
instance FromJSVal Database where
fromJSVal = return . fmap Database . maybeJSNullOrUndefined
instance IsGObject Database where
typeGType _ = gTypeDatabase
foreign import javascript unsafe "window[\"Database\"]" gTypeDatabase :: GType
newtype DedicatedWorkerGlobalScope = DedicatedWorkerGlobalScope { unDedicatedWorkerGlobalScope :: JSVal }
instance Eq (DedicatedWorkerGlobalScope) where
(DedicatedWorkerGlobalScope a) == (DedicatedWorkerGlobalScope b) = js_eq a b
instance PToJSVal DedicatedWorkerGlobalScope where
pToJSVal = unDedicatedWorkerGlobalScope
instance PFromJSVal DedicatedWorkerGlobalScope where
pFromJSVal = DedicatedWorkerGlobalScope
instance ToJSVal DedicatedWorkerGlobalScope where
toJSVal = return . unDedicatedWorkerGlobalScope
instance FromJSVal DedicatedWorkerGlobalScope where
fromJSVal = return . fmap DedicatedWorkerGlobalScope . maybeJSNullOrUndefined
instance IsWorkerGlobalScope DedicatedWorkerGlobalScope
instance IsEventTarget DedicatedWorkerGlobalScope
instance IsGObject DedicatedWorkerGlobalScope where
typeGType _ = gTypeDedicatedWorkerGlobalScope
foreign import javascript unsafe "window[\"DedicatedWorkerGlobalScope\"]" gTypeDedicatedWorkerGlobalScope :: GType
newtype DelayNode = DelayNode { unDelayNode :: JSVal }
instance Eq (DelayNode) where
(DelayNode a) == (DelayNode b) = js_eq a b
instance PToJSVal DelayNode where
pToJSVal = unDelayNode
instance PFromJSVal DelayNode where
pFromJSVal = DelayNode
instance ToJSVal DelayNode where
toJSVal = return . unDelayNode
instance FromJSVal DelayNode where
fromJSVal = return . fmap DelayNode . maybeJSNullOrUndefined
instance IsAudioNode DelayNode
instance IsEventTarget DelayNode
instance IsGObject DelayNode where
typeGType _ = gTypeDelayNode
foreign import javascript unsafe "window[\"DelayNode\"]" gTypeDelayNode :: GType
newtype DeviceMotionEvent = DeviceMotionEvent { unDeviceMotionEvent :: JSVal }
instance Eq (DeviceMotionEvent) where
(DeviceMotionEvent a) == (DeviceMotionEvent b) = js_eq a b
instance PToJSVal DeviceMotionEvent where
pToJSVal = unDeviceMotionEvent
instance PFromJSVal DeviceMotionEvent where
pFromJSVal = DeviceMotionEvent
instance ToJSVal DeviceMotionEvent where
toJSVal = return . unDeviceMotionEvent
instance FromJSVal DeviceMotionEvent where
fromJSVal = return . fmap DeviceMotionEvent . maybeJSNullOrUndefined
instance IsEvent DeviceMotionEvent
instance IsGObject DeviceMotionEvent where
typeGType _ = gTypeDeviceMotionEvent
foreign import javascript unsafe "window[\"DeviceMotionEvent\"]" gTypeDeviceMotionEvent :: GType
newtype DeviceOrientationEvent = DeviceOrientationEvent { unDeviceOrientationEvent :: JSVal }
instance Eq (DeviceOrientationEvent) where
(DeviceOrientationEvent a) == (DeviceOrientationEvent b) = js_eq a b
instance PToJSVal DeviceOrientationEvent where
pToJSVal = unDeviceOrientationEvent
instance PFromJSVal DeviceOrientationEvent where
pFromJSVal = DeviceOrientationEvent
instance ToJSVal DeviceOrientationEvent where
toJSVal = return . unDeviceOrientationEvent
instance FromJSVal DeviceOrientationEvent where
fromJSVal = return . fmap DeviceOrientationEvent . maybeJSNullOrUndefined
instance IsEvent DeviceOrientationEvent
instance IsGObject DeviceOrientationEvent where
typeGType _ = gTypeDeviceOrientationEvent
foreign import javascript unsafe "window[\"DeviceOrientationEvent\"]" gTypeDeviceOrientationEvent :: GType
newtype DeviceProximityEvent = DeviceProximityEvent { unDeviceProximityEvent :: JSVal }
instance Eq (DeviceProximityEvent) where
(DeviceProximityEvent a) == (DeviceProximityEvent b) = js_eq a b
instance PToJSVal DeviceProximityEvent where
pToJSVal = unDeviceProximityEvent
instance PFromJSVal DeviceProximityEvent where
pFromJSVal = DeviceProximityEvent
instance ToJSVal DeviceProximityEvent where
toJSVal = return . unDeviceProximityEvent
instance FromJSVal DeviceProximityEvent where
fromJSVal = return . fmap DeviceProximityEvent . maybeJSNullOrUndefined
instance IsEvent DeviceProximityEvent
instance IsGObject DeviceProximityEvent where
typeGType _ = gTypeDeviceProximityEvent
foreign import javascript unsafe "window[\"DeviceProximityEvent\"]" gTypeDeviceProximityEvent :: GType
newtype Document = Document { unDocument :: JSVal }
instance Eq (Document) where
(Document a) == (Document b) = js_eq a b
instance PToJSVal Document where
pToJSVal = unDocument
instance PFromJSVal Document where
pFromJSVal = Document
instance ToJSVal Document where
toJSVal = return . unDocument
instance FromJSVal Document where
fromJSVal = return . fmap Document . maybeJSNullOrUndefined
class IsNode o => IsDocument o
toDocument :: IsDocument o => o -> Document
toDocument = Document . coerce
instance IsDocument Document
instance IsNode Document
instance IsEventTarget Document
instance IsGObject Document where
typeGType _ = gTypeDocument
foreign import javascript unsafe "window[\"Document\"]" gTypeDocument :: GType
newtype DocumentFragment = DocumentFragment { unDocumentFragment :: JSVal }
instance Eq (DocumentFragment) where
(DocumentFragment a) == (DocumentFragment b) = js_eq a b
instance PToJSVal DocumentFragment where
pToJSVal = unDocumentFragment
instance PFromJSVal DocumentFragment where
pFromJSVal = DocumentFragment
instance ToJSVal DocumentFragment where
toJSVal = return . unDocumentFragment
instance FromJSVal DocumentFragment where
fromJSVal = return . fmap DocumentFragment . maybeJSNullOrUndefined
instance IsNode DocumentFragment
instance IsEventTarget DocumentFragment
instance IsGObject DocumentFragment where
typeGType _ = gTypeDocumentFragment
foreign import javascript unsafe "window[\"DocumentFragment\"]" gTypeDocumentFragment :: GType
newtype DocumentType = DocumentType { unDocumentType :: JSVal }
instance Eq (DocumentType) where
(DocumentType a) == (DocumentType b) = js_eq a b
instance PToJSVal DocumentType where
pToJSVal = unDocumentType
instance PFromJSVal DocumentType where
pFromJSVal = DocumentType
instance ToJSVal DocumentType where
toJSVal = return . unDocumentType
instance FromJSVal DocumentType where
fromJSVal = return . fmap DocumentType . maybeJSNullOrUndefined
instance IsNode DocumentType
instance IsEventTarget DocumentType
instance IsGObject DocumentType where
typeGType _ = gTypeDocumentType
foreign import javascript unsafe "window[\"DocumentType\"]" gTypeDocumentType :: GType
newtype DynamicsCompressorNode = DynamicsCompressorNode { unDynamicsCompressorNode :: JSVal }
instance Eq (DynamicsCompressorNode) where
(DynamicsCompressorNode a) == (DynamicsCompressorNode b) = js_eq a b
instance PToJSVal DynamicsCompressorNode where
pToJSVal = unDynamicsCompressorNode
instance PFromJSVal DynamicsCompressorNode where
pFromJSVal = DynamicsCompressorNode
instance ToJSVal DynamicsCompressorNode where
toJSVal = return . unDynamicsCompressorNode
instance FromJSVal DynamicsCompressorNode where
fromJSVal = return . fmap DynamicsCompressorNode . maybeJSNullOrUndefined
instance IsAudioNode DynamicsCompressorNode
instance IsEventTarget DynamicsCompressorNode
instance IsGObject DynamicsCompressorNode where
typeGType _ = gTypeDynamicsCompressorNode
foreign import javascript unsafe "window[\"DynamicsCompressorNode\"]" gTypeDynamicsCompressorNode :: GType
newtype EXTBlendMinMax = EXTBlendMinMax { unEXTBlendMinMax :: JSVal }
instance Eq (EXTBlendMinMax) where
(EXTBlendMinMax a) == (EXTBlendMinMax b) = js_eq a b
instance PToJSVal EXTBlendMinMax where
pToJSVal = unEXTBlendMinMax
instance PFromJSVal EXTBlendMinMax where
pFromJSVal = EXTBlendMinMax
instance ToJSVal EXTBlendMinMax where
toJSVal = return . unEXTBlendMinMax
instance FromJSVal EXTBlendMinMax where
fromJSVal = return . fmap EXTBlendMinMax . maybeJSNullOrUndefined
instance IsGObject EXTBlendMinMax where
typeGType _ = gTypeEXTBlendMinMax
foreign import javascript unsafe "window[\"EXTBlendMinMax\"]" gTypeEXTBlendMinMax :: GType
newtype EXTFragDepth = EXTFragDepth { unEXTFragDepth :: JSVal }
instance Eq (EXTFragDepth) where
(EXTFragDepth a) == (EXTFragDepth b) = js_eq a b
instance PToJSVal EXTFragDepth where
pToJSVal = unEXTFragDepth
instance PFromJSVal EXTFragDepth where
pFromJSVal = EXTFragDepth
instance ToJSVal EXTFragDepth where
toJSVal = return . unEXTFragDepth
instance FromJSVal EXTFragDepth where
fromJSVal = return . fmap EXTFragDepth . maybeJSNullOrUndefined
instance IsGObject EXTFragDepth where
typeGType _ = gTypeEXTFragDepth
foreign import javascript unsafe "window[\"EXTFragDepth\"]" gTypeEXTFragDepth :: GType
newtype EXTShaderTextureLOD = EXTShaderTextureLOD { unEXTShaderTextureLOD :: JSVal }
instance Eq (EXTShaderTextureLOD) where
(EXTShaderTextureLOD a) == (EXTShaderTextureLOD b) = js_eq a b
instance PToJSVal EXTShaderTextureLOD where
pToJSVal = unEXTShaderTextureLOD
instance PFromJSVal EXTShaderTextureLOD where
pFromJSVal = EXTShaderTextureLOD
instance ToJSVal EXTShaderTextureLOD where
toJSVal = return . unEXTShaderTextureLOD
instance FromJSVal EXTShaderTextureLOD where
fromJSVal = return . fmap EXTShaderTextureLOD . maybeJSNullOrUndefined
instance IsGObject EXTShaderTextureLOD where
typeGType _ = gTypeEXTShaderTextureLOD
foreign import javascript unsafe "window[\"EXTShaderTextureLOD\"]" gTypeEXTShaderTextureLOD :: GType
newtype EXTTextureFilterAnisotropic = EXTTextureFilterAnisotropic { unEXTTextureFilterAnisotropic :: JSVal }
instance Eq (EXTTextureFilterAnisotropic) where
(EXTTextureFilterAnisotropic a) == (EXTTextureFilterAnisotropic b) = js_eq a b
instance PToJSVal EXTTextureFilterAnisotropic where
pToJSVal = unEXTTextureFilterAnisotropic
instance PFromJSVal EXTTextureFilterAnisotropic where
pFromJSVal = EXTTextureFilterAnisotropic
instance ToJSVal EXTTextureFilterAnisotropic where
toJSVal = return . unEXTTextureFilterAnisotropic
instance FromJSVal EXTTextureFilterAnisotropic where
fromJSVal = return . fmap EXTTextureFilterAnisotropic . maybeJSNullOrUndefined
instance IsGObject EXTTextureFilterAnisotropic where
typeGType _ = gTypeEXTTextureFilterAnisotropic
foreign import javascript unsafe "window[\"EXTTextureFilterAnisotropic\"]" gTypeEXTTextureFilterAnisotropic :: GType
newtype EXTsRGB = EXTsRGB { unEXTsRGB :: JSVal }
instance Eq (EXTsRGB) where
(EXTsRGB a) == (EXTsRGB b) = js_eq a b
instance PToJSVal EXTsRGB where
pToJSVal = unEXTsRGB
instance PFromJSVal EXTsRGB where
pFromJSVal = EXTsRGB
instance ToJSVal EXTsRGB where
toJSVal = return . unEXTsRGB
instance FromJSVal EXTsRGB where
fromJSVal = return . fmap EXTsRGB . maybeJSNullOrUndefined
instance IsGObject EXTsRGB where
typeGType _ = gTypeEXTsRGB
foreign import javascript unsafe "window[\"EXTsRGB\"]" gTypeEXTsRGB :: GType
newtype Element = Element { unElement :: JSVal }
instance Eq (Element) where
(Element a) == (Element b) = js_eq a b
instance PToJSVal Element where
pToJSVal = unElement
instance PFromJSVal Element where
pFromJSVal = Element
instance ToJSVal Element where
toJSVal = return . unElement
instance FromJSVal Element where
fromJSVal = return . fmap Element . maybeJSNullOrUndefined
class IsNode o => IsElement o
toElement :: IsElement o => o -> Element
toElement = Element . coerce
instance IsElement Element
instance IsNode Element
instance IsEventTarget Element
instance IsGObject Element where
typeGType _ = gTypeElement
foreign import javascript unsafe "window[\"Element\"]" gTypeElement :: GType
newtype Entity = Entity { unEntity :: JSVal }
instance Eq (Entity) where
(Entity a) == (Entity b) = js_eq a b
instance PToJSVal Entity where
pToJSVal = unEntity
instance PFromJSVal Entity where
pFromJSVal = Entity
instance ToJSVal Entity where
toJSVal = return . unEntity
instance FromJSVal Entity where
fromJSVal = return . fmap Entity . maybeJSNullOrUndefined
instance IsNode Entity
instance IsEventTarget Entity
instance IsGObject Entity where
typeGType _ = gTypeEntity
foreign import javascript unsafe "window[\"Entity\"]" gTypeEntity :: GType
newtype EntityReference = EntityReference { unEntityReference :: JSVal }
instance Eq (EntityReference) where
(EntityReference a) == (EntityReference b) = js_eq a b
instance PToJSVal EntityReference where
pToJSVal = unEntityReference
instance PFromJSVal EntityReference where
pFromJSVal = EntityReference
instance ToJSVal EntityReference where
toJSVal = return . unEntityReference
instance FromJSVal EntityReference where
fromJSVal = return . fmap EntityReference . maybeJSNullOrUndefined
instance IsNode EntityReference
instance IsEventTarget EntityReference
instance IsGObject EntityReference where
typeGType _ = gTypeEntityReference
foreign import javascript unsafe "window[\"EntityReference\"]" gTypeEntityReference :: GType
newtype ErrorEvent = ErrorEvent { unErrorEvent :: JSVal }
instance Eq (ErrorEvent) where
(ErrorEvent a) == (ErrorEvent b) = js_eq a b
instance PToJSVal ErrorEvent where
pToJSVal = unErrorEvent
instance PFromJSVal ErrorEvent where
pFromJSVal = ErrorEvent
instance ToJSVal ErrorEvent where
toJSVal = return . unErrorEvent
instance FromJSVal ErrorEvent where
fromJSVal = return . fmap ErrorEvent . maybeJSNullOrUndefined
instance IsEvent ErrorEvent
instance IsGObject ErrorEvent where
typeGType _ = gTypeErrorEvent
foreign import javascript unsafe "window[\"ErrorEvent\"]" gTypeErrorEvent :: GType
newtype Event = Event { unEvent :: JSVal }
instance Eq (Event) where
(Event a) == (Event b) = js_eq a b
instance PToJSVal Event where
pToJSVal = unEvent
instance PFromJSVal Event where
pFromJSVal = Event
instance ToJSVal Event where
toJSVal = return . unEvent
instance FromJSVal Event where
fromJSVal = return . fmap Event . maybeJSNullOrUndefined
class IsGObject o => IsEvent o
toEvent :: IsEvent o => o -> Event
toEvent = Event . coerce
instance IsEvent Event
instance IsGObject Event where
typeGType _ = gTypeEvent
foreign import javascript unsafe "window[\"Event\"]" gTypeEvent :: GType
newtype EventListener = EventListener { unEventListener :: JSVal }
instance Eq (EventListener) where
(EventListener a) == (EventListener b) = js_eq a b
instance PToJSVal EventListener where
pToJSVal = unEventListener
instance PFromJSVal EventListener where
pFromJSVal = EventListener
instance ToJSVal EventListener where
toJSVal = return . unEventListener
instance FromJSVal EventListener where
fromJSVal = return . fmap EventListener . maybeJSNullOrUndefined
instance IsGObject EventListener where
typeGType _ = gTypeEventListener
foreign import javascript unsafe "window[\"EventListener\"]" gTypeEventListener :: GType
newtype EventSource = EventSource { unEventSource :: JSVal }
instance Eq (EventSource) where
(EventSource a) == (EventSource b) = js_eq a b
instance PToJSVal EventSource where
pToJSVal = unEventSource
instance PFromJSVal EventSource where
pFromJSVal = EventSource
instance ToJSVal EventSource where
toJSVal = return . unEventSource
instance FromJSVal EventSource where
fromJSVal = return . fmap EventSource . maybeJSNullOrUndefined
instance IsEventTarget EventSource
instance IsGObject EventSource where
typeGType _ = gTypeEventSource
foreign import javascript unsafe "window[\"EventSource\"]" gTypeEventSource :: GType
newtype EventTarget = EventTarget { unEventTarget :: JSVal }
instance Eq (EventTarget) where
(EventTarget a) == (EventTarget b) = js_eq a b
instance PToJSVal EventTarget where
pToJSVal = unEventTarget
instance PFromJSVal EventTarget where
pFromJSVal = EventTarget
instance ToJSVal EventTarget where
toJSVal = return . unEventTarget
instance FromJSVal EventTarget where
fromJSVal = return . fmap EventTarget . maybeJSNullOrUndefined
class IsGObject o => IsEventTarget o
toEventTarget :: IsEventTarget o => o -> EventTarget
toEventTarget = EventTarget . coerce
instance IsEventTarget EventTarget
instance IsGObject EventTarget where
typeGType _ = gTypeEventTarget
foreign import javascript unsafe "window[\"EventTarget\"]" gTypeEventTarget :: GType
newtype File = File { unFile :: JSVal }
instance Eq (File) where
(File a) == (File b) = js_eq a b
instance PToJSVal File where
pToJSVal = unFile
instance PFromJSVal File where
pFromJSVal = File
instance ToJSVal File where
toJSVal = return . unFile
instance FromJSVal File where
fromJSVal = return . fmap File . maybeJSNullOrUndefined
instance IsBlob File
instance IsGObject File where
typeGType _ = gTypeFile
foreign import javascript unsafe "window[\"File\"]" gTypeFile :: GType
newtype FileError = FileError { unFileError :: JSVal }
instance Eq (FileError) where
(FileError a) == (FileError b) = js_eq a b
instance PToJSVal FileError where
pToJSVal = unFileError
instance PFromJSVal FileError where
pFromJSVal = FileError
instance ToJSVal FileError where
toJSVal = return . unFileError
instance FromJSVal FileError where
fromJSVal = return . fmap FileError . maybeJSNullOrUndefined
instance IsGObject FileError where
typeGType _ = gTypeFileError
foreign import javascript unsafe "window[\"FileError\"]" gTypeFileError :: GType
newtype FileList = FileList { unFileList :: JSVal }
instance Eq (FileList) where
(FileList a) == (FileList b) = js_eq a b
instance PToJSVal FileList where
pToJSVal = unFileList
instance PFromJSVal FileList where
pFromJSVal = FileList
instance ToJSVal FileList where
toJSVal = return . unFileList
instance FromJSVal FileList where
fromJSVal = return . fmap FileList . maybeJSNullOrUndefined
instance IsGObject FileList where
typeGType _ = gTypeFileList
foreign import javascript unsafe "window[\"FileList\"]" gTypeFileList :: GType
newtype FileReader = FileReader { unFileReader :: JSVal }
instance Eq (FileReader) where
(FileReader a) == (FileReader b) = js_eq a b
instance PToJSVal FileReader where
pToJSVal = unFileReader
instance PFromJSVal FileReader where
pFromJSVal = FileReader
instance ToJSVal FileReader where
toJSVal = return . unFileReader
instance FromJSVal FileReader where
fromJSVal = return . fmap FileReader . maybeJSNullOrUndefined
instance IsEventTarget FileReader
instance IsGObject FileReader where
typeGType _ = gTypeFileReader
foreign import javascript unsafe "window[\"FileReader\"]" gTypeFileReader :: GType
newtype FileReaderSync = FileReaderSync { unFileReaderSync :: JSVal }
instance Eq (FileReaderSync) where
(FileReaderSync a) == (FileReaderSync b) = js_eq a b
instance PToJSVal FileReaderSync where
pToJSVal = unFileReaderSync
instance PFromJSVal FileReaderSync where
pFromJSVal = FileReaderSync
instance ToJSVal FileReaderSync where
toJSVal = return . unFileReaderSync
instance FromJSVal FileReaderSync where
fromJSVal = return . fmap FileReaderSync . maybeJSNullOrUndefined
instance IsGObject FileReaderSync where
typeGType _ = gTypeFileReaderSync
foreign import javascript unsafe "window[\"FileReaderSync\"]" gTypeFileReaderSync :: GType
newtype FocusEvent = FocusEvent { unFocusEvent :: JSVal }
instance Eq (FocusEvent) where
(FocusEvent a) == (FocusEvent b) = js_eq a b
instance PToJSVal FocusEvent where
pToJSVal = unFocusEvent
instance PFromJSVal FocusEvent where
pFromJSVal = FocusEvent
instance ToJSVal FocusEvent where
toJSVal = return . unFocusEvent
instance FromJSVal FocusEvent where
fromJSVal = return . fmap FocusEvent . maybeJSNullOrUndefined
instance IsUIEvent FocusEvent
instance IsEvent FocusEvent
instance IsGObject FocusEvent where
typeGType _ = gTypeFocusEvent
foreign import javascript unsafe "window[\"FocusEvent\"]" gTypeFocusEvent :: GType
newtype FontLoader = FontLoader { unFontLoader :: JSVal }
instance Eq (FontLoader) where
(FontLoader a) == (FontLoader b) = js_eq a b
instance PToJSVal FontLoader where
pToJSVal = unFontLoader
instance PFromJSVal FontLoader where
pFromJSVal = FontLoader
instance ToJSVal FontLoader where
toJSVal = return . unFontLoader
instance FromJSVal FontLoader where
fromJSVal = return . fmap FontLoader . maybeJSNullOrUndefined
instance IsEventTarget FontLoader
instance IsGObject FontLoader where
typeGType _ = gTypeFontLoader
foreign import javascript unsafe "window[\"FontLoader\"]" gTypeFontLoader :: GType
newtype FormData = FormData { unFormData :: JSVal }
instance Eq (FormData) where
(FormData a) == (FormData b) = js_eq a b
instance PToJSVal FormData where
pToJSVal = unFormData
instance PFromJSVal FormData where
pFromJSVal = FormData
instance ToJSVal FormData where
toJSVal = return . unFormData
instance FromJSVal FormData where
fromJSVal = return . fmap FormData . maybeJSNullOrUndefined
instance IsGObject FormData where
typeGType _ = gTypeFormData
foreign import javascript unsafe "window[\"FormData\"]" gTypeFormData :: GType
newtype GainNode = GainNode { unGainNode :: JSVal }
instance Eq (GainNode) where
(GainNode a) == (GainNode b) = js_eq a b
instance PToJSVal GainNode where
pToJSVal = unGainNode
instance PFromJSVal GainNode where
pFromJSVal = GainNode
instance ToJSVal GainNode where
toJSVal = return . unGainNode
instance FromJSVal GainNode where
fromJSVal = return . fmap GainNode . maybeJSNullOrUndefined
instance IsAudioNode GainNode
instance IsEventTarget GainNode
instance IsGObject GainNode where
typeGType _ = gTypeGainNode
foreign import javascript unsafe "window[\"GainNode\"]" gTypeGainNode :: GType
newtype Gamepad = Gamepad { unGamepad :: JSVal }
instance Eq (Gamepad) where
(Gamepad a) == (Gamepad b) = js_eq a b
instance PToJSVal Gamepad where
pToJSVal = unGamepad
instance PFromJSVal Gamepad where
pFromJSVal = Gamepad
instance ToJSVal Gamepad where
toJSVal = return . unGamepad
instance FromJSVal Gamepad where
fromJSVal = return . fmap Gamepad . maybeJSNullOrUndefined
instance IsGObject Gamepad where
typeGType _ = gTypeGamepad
foreign import javascript unsafe "window[\"Gamepad\"]" gTypeGamepad :: GType
newtype GamepadButton = GamepadButton { unGamepadButton :: JSVal }
instance Eq (GamepadButton) where
(GamepadButton a) == (GamepadButton b) = js_eq a b
instance PToJSVal GamepadButton where
pToJSVal = unGamepadButton
instance PFromJSVal GamepadButton where
pFromJSVal = GamepadButton
instance ToJSVal GamepadButton where
toJSVal = return . unGamepadButton
instance FromJSVal GamepadButton where
fromJSVal = return . fmap GamepadButton . maybeJSNullOrUndefined
instance IsGObject GamepadButton where
typeGType _ = gTypeGamepadButton
foreign import javascript unsafe "window[\"GamepadButton\"]" gTypeGamepadButton :: GType
newtype GamepadEvent = GamepadEvent { unGamepadEvent :: JSVal }
instance Eq (GamepadEvent) where
(GamepadEvent a) == (GamepadEvent b) = js_eq a b
instance PToJSVal GamepadEvent where
pToJSVal = unGamepadEvent
instance PFromJSVal GamepadEvent where
pFromJSVal = GamepadEvent
instance ToJSVal GamepadEvent where
toJSVal = return . unGamepadEvent
instance FromJSVal GamepadEvent where
fromJSVal = return . fmap GamepadEvent . maybeJSNullOrUndefined
instance IsEvent GamepadEvent
instance IsGObject GamepadEvent where
typeGType _ = gTypeGamepadEvent
foreign import javascript unsafe "window[\"GamepadEvent\"]" gTypeGamepadEvent :: GType
newtype Geolocation = Geolocation { unGeolocation :: JSVal }
instance Eq (Geolocation) where
(Geolocation a) == (Geolocation b) = js_eq a b
instance PToJSVal Geolocation where
pToJSVal = unGeolocation
instance PFromJSVal Geolocation where
pFromJSVal = Geolocation
instance ToJSVal Geolocation where
toJSVal = return . unGeolocation
instance FromJSVal Geolocation where
fromJSVal = return . fmap Geolocation . maybeJSNullOrUndefined
instance IsGObject Geolocation where
typeGType _ = gTypeGeolocation
foreign import javascript unsafe "window[\"Geolocation\"]" gTypeGeolocation :: GType
newtype Geoposition = Geoposition { unGeoposition :: JSVal }
instance Eq (Geoposition) where
(Geoposition a) == (Geoposition b) = js_eq a b
instance PToJSVal Geoposition where
pToJSVal = unGeoposition
instance PFromJSVal Geoposition where
pFromJSVal = Geoposition
instance ToJSVal Geoposition where
toJSVal = return . unGeoposition
instance FromJSVal Geoposition where
fromJSVal = return . fmap Geoposition . maybeJSNullOrUndefined
instance IsGObject Geoposition where
typeGType _ = gTypeGeoposition
foreign import javascript unsafe "window[\"Geoposition\"]" gTypeGeoposition :: GType
newtype HTMLAllCollection = HTMLAllCollection { unHTMLAllCollection :: JSVal }
instance Eq (HTMLAllCollection) where
(HTMLAllCollection a) == (HTMLAllCollection b) = js_eq a b
instance PToJSVal HTMLAllCollection where
pToJSVal = unHTMLAllCollection
instance PFromJSVal HTMLAllCollection where
pFromJSVal = HTMLAllCollection
instance ToJSVal HTMLAllCollection where
toJSVal = return . unHTMLAllCollection
instance FromJSVal HTMLAllCollection where
fromJSVal = return . fmap HTMLAllCollection . maybeJSNullOrUndefined
instance IsGObject HTMLAllCollection where
typeGType _ = gTypeHTMLAllCollection
foreign import javascript unsafe "window[\"HTMLAllCollection\"]" gTypeHTMLAllCollection :: GType
newtype HTMLAnchorElement = HTMLAnchorElement { unHTMLAnchorElement :: JSVal }
instance Eq (HTMLAnchorElement) where
(HTMLAnchorElement a) == (HTMLAnchorElement b) = js_eq a b
instance PToJSVal HTMLAnchorElement where
pToJSVal = unHTMLAnchorElement
instance PFromJSVal HTMLAnchorElement where
pFromJSVal = HTMLAnchorElement
instance ToJSVal HTMLAnchorElement where
toJSVal = return . unHTMLAnchorElement
instance FromJSVal HTMLAnchorElement where
fromJSVal = return . fmap HTMLAnchorElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLAnchorElement
instance IsElement HTMLAnchorElement
instance IsNode HTMLAnchorElement
instance IsEventTarget HTMLAnchorElement
instance IsGObject HTMLAnchorElement where
typeGType _ = gTypeHTMLAnchorElement
foreign import javascript unsafe "window[\"HTMLAnchorElement\"]" gTypeHTMLAnchorElement :: GType
newtype HTMLAppletElement = HTMLAppletElement { unHTMLAppletElement :: JSVal }
instance Eq (HTMLAppletElement) where
(HTMLAppletElement a) == (HTMLAppletElement b) = js_eq a b
instance PToJSVal HTMLAppletElement where
pToJSVal = unHTMLAppletElement
instance PFromJSVal HTMLAppletElement where
pFromJSVal = HTMLAppletElement
instance ToJSVal HTMLAppletElement where
toJSVal = return . unHTMLAppletElement
instance FromJSVal HTMLAppletElement where
fromJSVal = return . fmap HTMLAppletElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLAppletElement
instance IsElement HTMLAppletElement
instance IsNode HTMLAppletElement
instance IsEventTarget HTMLAppletElement
instance IsGObject HTMLAppletElement where
typeGType _ = gTypeHTMLAppletElement
foreign import javascript unsafe "window[\"HTMLAppletElement\"]" gTypeHTMLAppletElement :: GType
newtype HTMLAreaElement = HTMLAreaElement { unHTMLAreaElement :: JSVal }
instance Eq (HTMLAreaElement) where
(HTMLAreaElement a) == (HTMLAreaElement b) = js_eq a b
instance PToJSVal HTMLAreaElement where
pToJSVal = unHTMLAreaElement
instance PFromJSVal HTMLAreaElement where
pFromJSVal = HTMLAreaElement
instance ToJSVal HTMLAreaElement where
toJSVal = return . unHTMLAreaElement
instance FromJSVal HTMLAreaElement where
fromJSVal = return . fmap HTMLAreaElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLAreaElement
instance IsElement HTMLAreaElement
instance IsNode HTMLAreaElement
instance IsEventTarget HTMLAreaElement
instance IsGObject HTMLAreaElement where
typeGType _ = gTypeHTMLAreaElement
foreign import javascript unsafe "window[\"HTMLAreaElement\"]" gTypeHTMLAreaElement :: GType
newtype HTMLAudioElement = HTMLAudioElement { unHTMLAudioElement :: JSVal }
instance Eq (HTMLAudioElement) where
(HTMLAudioElement a) == (HTMLAudioElement b) = js_eq a b
instance PToJSVal HTMLAudioElement where
pToJSVal = unHTMLAudioElement
instance PFromJSVal HTMLAudioElement where
pFromJSVal = HTMLAudioElement
instance ToJSVal HTMLAudioElement where
toJSVal = return . unHTMLAudioElement
instance FromJSVal HTMLAudioElement where
fromJSVal = return . fmap HTMLAudioElement . maybeJSNullOrUndefined
instance IsHTMLMediaElement HTMLAudioElement
instance IsHTMLElement HTMLAudioElement
instance IsElement HTMLAudioElement
instance IsNode HTMLAudioElement
instance IsEventTarget HTMLAudioElement
instance IsGObject HTMLAudioElement where
typeGType _ = gTypeHTMLAudioElement
foreign import javascript unsafe "window[\"HTMLAudioElement\"]" gTypeHTMLAudioElement :: GType
newtype HTMLBRElement = HTMLBRElement { unHTMLBRElement :: JSVal }
instance Eq (HTMLBRElement) where
(HTMLBRElement a) == (HTMLBRElement b) = js_eq a b
instance PToJSVal HTMLBRElement where
pToJSVal = unHTMLBRElement
instance PFromJSVal HTMLBRElement where
pFromJSVal = HTMLBRElement
instance ToJSVal HTMLBRElement where
toJSVal = return . unHTMLBRElement
instance FromJSVal HTMLBRElement where
fromJSVal = return . fmap HTMLBRElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLBRElement
instance IsElement HTMLBRElement
instance IsNode HTMLBRElement
instance IsEventTarget HTMLBRElement
instance IsGObject HTMLBRElement where
typeGType _ = gTypeHTMLBRElement
foreign import javascript unsafe "window[\"HTMLBRElement\"]" gTypeHTMLBRElement :: GType
newtype HTMLBaseElement = HTMLBaseElement { unHTMLBaseElement :: JSVal }
instance Eq (HTMLBaseElement) where
(HTMLBaseElement a) == (HTMLBaseElement b) = js_eq a b
instance PToJSVal HTMLBaseElement where
pToJSVal = unHTMLBaseElement
instance PFromJSVal HTMLBaseElement where
pFromJSVal = HTMLBaseElement
instance ToJSVal HTMLBaseElement where
toJSVal = return . unHTMLBaseElement
instance FromJSVal HTMLBaseElement where
fromJSVal = return . fmap HTMLBaseElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLBaseElement
instance IsElement HTMLBaseElement
instance IsNode HTMLBaseElement
instance IsEventTarget HTMLBaseElement
instance IsGObject HTMLBaseElement where
typeGType _ = gTypeHTMLBaseElement
foreign import javascript unsafe "window[\"HTMLBaseElement\"]" gTypeHTMLBaseElement :: GType
newtype HTMLBaseFontElement = HTMLBaseFontElement { unHTMLBaseFontElement :: JSVal }
instance Eq (HTMLBaseFontElement) where
(HTMLBaseFontElement a) == (HTMLBaseFontElement b) = js_eq a b
instance PToJSVal HTMLBaseFontElement where
pToJSVal = unHTMLBaseFontElement
instance PFromJSVal HTMLBaseFontElement where
pFromJSVal = HTMLBaseFontElement
instance ToJSVal HTMLBaseFontElement where
toJSVal = return . unHTMLBaseFontElement
instance FromJSVal HTMLBaseFontElement where
fromJSVal = return . fmap HTMLBaseFontElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLBaseFontElement
instance IsElement HTMLBaseFontElement
instance IsNode HTMLBaseFontElement
instance IsEventTarget HTMLBaseFontElement
instance IsGObject HTMLBaseFontElement where
typeGType _ = gTypeHTMLBaseFontElement
foreign import javascript unsafe "window[\"HTMLBaseFontElement\"]" gTypeHTMLBaseFontElement :: GType
newtype HTMLBodyElement = HTMLBodyElement { unHTMLBodyElement :: JSVal }
instance Eq (HTMLBodyElement) where
(HTMLBodyElement a) == (HTMLBodyElement b) = js_eq a b
instance PToJSVal HTMLBodyElement where
pToJSVal = unHTMLBodyElement
instance PFromJSVal HTMLBodyElement where
pFromJSVal = HTMLBodyElement
instance ToJSVal HTMLBodyElement where
toJSVal = return . unHTMLBodyElement
instance FromJSVal HTMLBodyElement where
fromJSVal = return . fmap HTMLBodyElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLBodyElement
instance IsElement HTMLBodyElement
instance IsNode HTMLBodyElement
instance IsEventTarget HTMLBodyElement
instance IsGObject HTMLBodyElement where
typeGType _ = gTypeHTMLBodyElement
foreign import javascript unsafe "window[\"HTMLBodyElement\"]" gTypeHTMLBodyElement :: GType
newtype HTMLButtonElement = HTMLButtonElement { unHTMLButtonElement :: JSVal }
instance Eq (HTMLButtonElement) where
(HTMLButtonElement a) == (HTMLButtonElement b) = js_eq a b
instance PToJSVal HTMLButtonElement where
pToJSVal = unHTMLButtonElement
instance PFromJSVal HTMLButtonElement where
pFromJSVal = HTMLButtonElement
instance ToJSVal HTMLButtonElement where
toJSVal = return . unHTMLButtonElement
instance FromJSVal HTMLButtonElement where
fromJSVal = return . fmap HTMLButtonElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLButtonElement
instance IsElement HTMLButtonElement
instance IsNode HTMLButtonElement
instance IsEventTarget HTMLButtonElement
instance IsGObject HTMLButtonElement where
typeGType _ = gTypeHTMLButtonElement
foreign import javascript unsafe "window[\"HTMLButtonElement\"]" gTypeHTMLButtonElement :: GType
newtype HTMLCanvasElement = HTMLCanvasElement { unHTMLCanvasElement :: JSVal }
instance Eq (HTMLCanvasElement) where
(HTMLCanvasElement a) == (HTMLCanvasElement b) = js_eq a b
instance PToJSVal HTMLCanvasElement where
pToJSVal = unHTMLCanvasElement
instance PFromJSVal HTMLCanvasElement where
pFromJSVal = HTMLCanvasElement
instance ToJSVal HTMLCanvasElement where
toJSVal = return . unHTMLCanvasElement
instance FromJSVal HTMLCanvasElement where
fromJSVal = return . fmap HTMLCanvasElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLCanvasElement
instance IsElement HTMLCanvasElement
instance IsNode HTMLCanvasElement
instance IsEventTarget HTMLCanvasElement
instance IsGObject HTMLCanvasElement where
typeGType _ = gTypeHTMLCanvasElement
foreign import javascript unsafe "window[\"HTMLCanvasElement\"]" gTypeHTMLCanvasElement :: GType
newtype HTMLCollection = HTMLCollection { unHTMLCollection :: JSVal }
instance Eq (HTMLCollection) where
(HTMLCollection a) == (HTMLCollection b) = js_eq a b
instance PToJSVal HTMLCollection where
pToJSVal = unHTMLCollection
instance PFromJSVal HTMLCollection where
pFromJSVal = HTMLCollection
instance ToJSVal HTMLCollection where
toJSVal = return . unHTMLCollection
instance FromJSVal HTMLCollection where
fromJSVal = return . fmap HTMLCollection . maybeJSNullOrUndefined
class IsGObject o => IsHTMLCollection o
toHTMLCollection :: IsHTMLCollection o => o -> HTMLCollection
toHTMLCollection = HTMLCollection . coerce
instance IsHTMLCollection HTMLCollection
instance IsGObject HTMLCollection where
typeGType _ = gTypeHTMLCollection
foreign import javascript unsafe "window[\"HTMLCollection\"]" gTypeHTMLCollection :: GType
newtype HTMLDListElement = HTMLDListElement { unHTMLDListElement :: JSVal }
instance Eq (HTMLDListElement) where
(HTMLDListElement a) == (HTMLDListElement b) = js_eq a b
instance PToJSVal HTMLDListElement where
pToJSVal = unHTMLDListElement
instance PFromJSVal HTMLDListElement where
pFromJSVal = HTMLDListElement
instance ToJSVal HTMLDListElement where
toJSVal = return . unHTMLDListElement
instance FromJSVal HTMLDListElement where
fromJSVal = return . fmap HTMLDListElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLDListElement
instance IsElement HTMLDListElement
instance IsNode HTMLDListElement
instance IsEventTarget HTMLDListElement
instance IsGObject HTMLDListElement where
typeGType _ = gTypeHTMLDListElement
foreign import javascript unsafe "window[\"HTMLDListElement\"]" gTypeHTMLDListElement :: GType
newtype HTMLDataListElement = HTMLDataListElement { unHTMLDataListElement :: JSVal }
instance Eq (HTMLDataListElement) where
(HTMLDataListElement a) == (HTMLDataListElement b) = js_eq a b
instance PToJSVal HTMLDataListElement where
pToJSVal = unHTMLDataListElement
instance PFromJSVal HTMLDataListElement where
pFromJSVal = HTMLDataListElement
instance ToJSVal HTMLDataListElement where
toJSVal = return . unHTMLDataListElement
instance FromJSVal HTMLDataListElement where
fromJSVal = return . fmap HTMLDataListElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLDataListElement
instance IsElement HTMLDataListElement
instance IsNode HTMLDataListElement
instance IsEventTarget HTMLDataListElement
instance IsGObject HTMLDataListElement where
typeGType _ = gTypeHTMLDataListElement
foreign import javascript unsafe "window[\"HTMLDataListElement\"]" gTypeHTMLDataListElement :: GType
newtype HTMLDetailsElement = HTMLDetailsElement { unHTMLDetailsElement :: JSVal }
instance Eq (HTMLDetailsElement) where
(HTMLDetailsElement a) == (HTMLDetailsElement b) = js_eq a b
instance PToJSVal HTMLDetailsElement where
pToJSVal = unHTMLDetailsElement
instance PFromJSVal HTMLDetailsElement where
pFromJSVal = HTMLDetailsElement
instance ToJSVal HTMLDetailsElement where
toJSVal = return . unHTMLDetailsElement
instance FromJSVal HTMLDetailsElement where
fromJSVal = return . fmap HTMLDetailsElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLDetailsElement
instance IsElement HTMLDetailsElement
instance IsNode HTMLDetailsElement
instance IsEventTarget HTMLDetailsElement
instance IsGObject HTMLDetailsElement where
typeGType _ = gTypeHTMLDetailsElement
foreign import javascript unsafe "window[\"HTMLDetailsElement\"]" gTypeHTMLDetailsElement :: GType
newtype HTMLDirectoryElement = HTMLDirectoryElement { unHTMLDirectoryElement :: JSVal }
instance Eq (HTMLDirectoryElement) where
(HTMLDirectoryElement a) == (HTMLDirectoryElement b) = js_eq a b
instance PToJSVal HTMLDirectoryElement where
pToJSVal = unHTMLDirectoryElement
instance PFromJSVal HTMLDirectoryElement where
pFromJSVal = HTMLDirectoryElement
instance ToJSVal HTMLDirectoryElement where
toJSVal = return . unHTMLDirectoryElement
instance FromJSVal HTMLDirectoryElement where
fromJSVal = return . fmap HTMLDirectoryElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLDirectoryElement
instance IsElement HTMLDirectoryElement
instance IsNode HTMLDirectoryElement
instance IsEventTarget HTMLDirectoryElement
instance IsGObject HTMLDirectoryElement where
typeGType _ = gTypeHTMLDirectoryElement
foreign import javascript unsafe "window[\"HTMLDirectoryElement\"]" gTypeHTMLDirectoryElement :: GType
newtype HTMLDivElement = HTMLDivElement { unHTMLDivElement :: JSVal }
instance Eq (HTMLDivElement) where
(HTMLDivElement a) == (HTMLDivElement b) = js_eq a b
instance PToJSVal HTMLDivElement where
pToJSVal = unHTMLDivElement
instance PFromJSVal HTMLDivElement where
pFromJSVal = HTMLDivElement
instance ToJSVal HTMLDivElement where
toJSVal = return . unHTMLDivElement
instance FromJSVal HTMLDivElement where
fromJSVal = return . fmap HTMLDivElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLDivElement
instance IsElement HTMLDivElement
instance IsNode HTMLDivElement
instance IsEventTarget HTMLDivElement
instance IsGObject HTMLDivElement where
typeGType _ = gTypeHTMLDivElement
foreign import javascript unsafe "window[\"HTMLDivElement\"]" gTypeHTMLDivElement :: GType
newtype HTMLDocument = HTMLDocument { unHTMLDocument :: JSVal }
instance Eq (HTMLDocument) where
(HTMLDocument a) == (HTMLDocument b) = js_eq a b
instance PToJSVal HTMLDocument where
pToJSVal = unHTMLDocument
instance PFromJSVal HTMLDocument where
pFromJSVal = HTMLDocument
instance ToJSVal HTMLDocument where
toJSVal = return . unHTMLDocument
instance FromJSVal HTMLDocument where
fromJSVal = return . fmap HTMLDocument . maybeJSNullOrUndefined
instance IsDocument HTMLDocument
instance IsNode HTMLDocument
instance IsEventTarget HTMLDocument
instance IsGObject HTMLDocument where
typeGType _ = gTypeHTMLDocument
foreign import javascript unsafe "window[\"HTMLDocument\"]" gTypeHTMLDocument :: GType
newtype HTMLElement = HTMLElement { unHTMLElement :: JSVal }
instance Eq (HTMLElement) where
(HTMLElement a) == (HTMLElement b) = js_eq a b
instance PToJSVal HTMLElement where
pToJSVal = unHTMLElement
instance PFromJSVal HTMLElement where
pFromJSVal = HTMLElement
instance ToJSVal HTMLElement where
toJSVal = return . unHTMLElement
instance FromJSVal HTMLElement where
fromJSVal = return . fmap HTMLElement . maybeJSNullOrUndefined
class IsElement o => IsHTMLElement o
toHTMLElement :: IsHTMLElement o => o -> HTMLElement
toHTMLElement = HTMLElement . coerce
instance IsHTMLElement HTMLElement
instance IsElement HTMLElement
instance IsNode HTMLElement
instance IsEventTarget HTMLElement
instance IsGObject HTMLElement where
typeGType _ = gTypeHTMLElement
foreign import javascript unsafe "window[\"HTMLElement\"]" gTypeHTMLElement :: GType
newtype HTMLEmbedElement = HTMLEmbedElement { unHTMLEmbedElement :: JSVal }
instance Eq (HTMLEmbedElement) where
(HTMLEmbedElement a) == (HTMLEmbedElement b) = js_eq a b
instance PToJSVal HTMLEmbedElement where
pToJSVal = unHTMLEmbedElement
instance PFromJSVal HTMLEmbedElement where
pFromJSVal = HTMLEmbedElement
instance ToJSVal HTMLEmbedElement where
toJSVal = return . unHTMLEmbedElement
instance FromJSVal HTMLEmbedElement where
fromJSVal = return . fmap HTMLEmbedElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLEmbedElement
instance IsElement HTMLEmbedElement
instance IsNode HTMLEmbedElement
instance IsEventTarget HTMLEmbedElement
instance IsGObject HTMLEmbedElement where
typeGType _ = gTypeHTMLEmbedElement
foreign import javascript unsafe "window[\"HTMLEmbedElement\"]" gTypeHTMLEmbedElement :: GType
newtype HTMLFieldSetElement = HTMLFieldSetElement { unHTMLFieldSetElement :: JSVal }
instance Eq (HTMLFieldSetElement) where
(HTMLFieldSetElement a) == (HTMLFieldSetElement b) = js_eq a b
instance PToJSVal HTMLFieldSetElement where
pToJSVal = unHTMLFieldSetElement
instance PFromJSVal HTMLFieldSetElement where
pFromJSVal = HTMLFieldSetElement
instance ToJSVal HTMLFieldSetElement where
toJSVal = return . unHTMLFieldSetElement
instance FromJSVal HTMLFieldSetElement where
fromJSVal = return . fmap HTMLFieldSetElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLFieldSetElement
instance IsElement HTMLFieldSetElement
instance IsNode HTMLFieldSetElement
instance IsEventTarget HTMLFieldSetElement
instance IsGObject HTMLFieldSetElement where
typeGType _ = gTypeHTMLFieldSetElement
foreign import javascript unsafe "window[\"HTMLFieldSetElement\"]" gTypeHTMLFieldSetElement :: GType
newtype HTMLFontElement = HTMLFontElement { unHTMLFontElement :: JSVal }
instance Eq (HTMLFontElement) where
(HTMLFontElement a) == (HTMLFontElement b) = js_eq a b
instance PToJSVal HTMLFontElement where
pToJSVal = unHTMLFontElement
instance PFromJSVal HTMLFontElement where
pFromJSVal = HTMLFontElement
instance ToJSVal HTMLFontElement where
toJSVal = return . unHTMLFontElement
instance FromJSVal HTMLFontElement where
fromJSVal = return . fmap HTMLFontElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLFontElement
instance IsElement HTMLFontElement
instance IsNode HTMLFontElement
instance IsEventTarget HTMLFontElement
instance IsGObject HTMLFontElement where
typeGType _ = gTypeHTMLFontElement
foreign import javascript unsafe "window[\"HTMLFontElement\"]" gTypeHTMLFontElement :: GType
newtype HTMLFormControlsCollection = HTMLFormControlsCollection { unHTMLFormControlsCollection :: JSVal }
instance Eq (HTMLFormControlsCollection) where
(HTMLFormControlsCollection a) == (HTMLFormControlsCollection b) = js_eq a b
instance PToJSVal HTMLFormControlsCollection where
pToJSVal = unHTMLFormControlsCollection
instance PFromJSVal HTMLFormControlsCollection where
pFromJSVal = HTMLFormControlsCollection
instance ToJSVal HTMLFormControlsCollection where
toJSVal = return . unHTMLFormControlsCollection
instance FromJSVal HTMLFormControlsCollection where
fromJSVal = return . fmap HTMLFormControlsCollection . maybeJSNullOrUndefined
instance IsHTMLCollection HTMLFormControlsCollection
instance IsGObject HTMLFormControlsCollection where
typeGType _ = gTypeHTMLFormControlsCollection
foreign import javascript unsafe "window[\"HTMLFormControlsCollection\"]" gTypeHTMLFormControlsCollection :: GType
newtype HTMLFormElement = HTMLFormElement { unHTMLFormElement :: JSVal }
instance Eq (HTMLFormElement) where
(HTMLFormElement a) == (HTMLFormElement b) = js_eq a b
instance PToJSVal HTMLFormElement where
pToJSVal = unHTMLFormElement
instance PFromJSVal HTMLFormElement where
pFromJSVal = HTMLFormElement
instance ToJSVal HTMLFormElement where
toJSVal = return . unHTMLFormElement
instance FromJSVal HTMLFormElement where
fromJSVal = return . fmap HTMLFormElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLFormElement
instance IsElement HTMLFormElement
instance IsNode HTMLFormElement
instance IsEventTarget HTMLFormElement
instance IsGObject HTMLFormElement where
typeGType _ = gTypeHTMLFormElement
foreign import javascript unsafe "window[\"HTMLFormElement\"]" gTypeHTMLFormElement :: GType
newtype HTMLFrameElement = HTMLFrameElement { unHTMLFrameElement :: JSVal }
instance Eq (HTMLFrameElement) where
(HTMLFrameElement a) == (HTMLFrameElement b) = js_eq a b
instance PToJSVal HTMLFrameElement where
pToJSVal = unHTMLFrameElement
instance PFromJSVal HTMLFrameElement where
pFromJSVal = HTMLFrameElement
instance ToJSVal HTMLFrameElement where
toJSVal = return . unHTMLFrameElement
instance FromJSVal HTMLFrameElement where
fromJSVal = return . fmap HTMLFrameElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLFrameElement
instance IsElement HTMLFrameElement
instance IsNode HTMLFrameElement
instance IsEventTarget HTMLFrameElement
instance IsGObject HTMLFrameElement where
typeGType _ = gTypeHTMLFrameElement
foreign import javascript unsafe "window[\"HTMLFrameElement\"]" gTypeHTMLFrameElement :: GType
newtype HTMLFrameSetElement = HTMLFrameSetElement { unHTMLFrameSetElement :: JSVal }
instance Eq (HTMLFrameSetElement) where
(HTMLFrameSetElement a) == (HTMLFrameSetElement b) = js_eq a b
instance PToJSVal HTMLFrameSetElement where
pToJSVal = unHTMLFrameSetElement
instance PFromJSVal HTMLFrameSetElement where
pFromJSVal = HTMLFrameSetElement
instance ToJSVal HTMLFrameSetElement where
toJSVal = return . unHTMLFrameSetElement
instance FromJSVal HTMLFrameSetElement where
fromJSVal = return . fmap HTMLFrameSetElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLFrameSetElement
instance IsElement HTMLFrameSetElement
instance IsNode HTMLFrameSetElement
instance IsEventTarget HTMLFrameSetElement
instance IsGObject HTMLFrameSetElement where
typeGType _ = gTypeHTMLFrameSetElement
foreign import javascript unsafe "window[\"HTMLFrameSetElement\"]" gTypeHTMLFrameSetElement :: GType
newtype HTMLHRElement = HTMLHRElement { unHTMLHRElement :: JSVal }
instance Eq (HTMLHRElement) where
(HTMLHRElement a) == (HTMLHRElement b) = js_eq a b
instance PToJSVal HTMLHRElement where
pToJSVal = unHTMLHRElement
instance PFromJSVal HTMLHRElement where
pFromJSVal = HTMLHRElement
instance ToJSVal HTMLHRElement where
toJSVal = return . unHTMLHRElement
instance FromJSVal HTMLHRElement where
fromJSVal = return . fmap HTMLHRElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLHRElement
instance IsElement HTMLHRElement
instance IsNode HTMLHRElement
instance IsEventTarget HTMLHRElement
instance IsGObject HTMLHRElement where
typeGType _ = gTypeHTMLHRElement
foreign import javascript unsafe "window[\"HTMLHRElement\"]" gTypeHTMLHRElement :: GType
newtype HTMLHeadElement = HTMLHeadElement { unHTMLHeadElement :: JSVal }
instance Eq (HTMLHeadElement) where
(HTMLHeadElement a) == (HTMLHeadElement b) = js_eq a b
instance PToJSVal HTMLHeadElement where
pToJSVal = unHTMLHeadElement
instance PFromJSVal HTMLHeadElement where
pFromJSVal = HTMLHeadElement
instance ToJSVal HTMLHeadElement where
toJSVal = return . unHTMLHeadElement
instance FromJSVal HTMLHeadElement where
fromJSVal = return . fmap HTMLHeadElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLHeadElement
instance IsElement HTMLHeadElement
instance IsNode HTMLHeadElement
instance IsEventTarget HTMLHeadElement
instance IsGObject HTMLHeadElement where
typeGType _ = gTypeHTMLHeadElement
foreign import javascript unsafe "window[\"HTMLHeadElement\"]" gTypeHTMLHeadElement :: GType
newtype HTMLHeadingElement = HTMLHeadingElement { unHTMLHeadingElement :: JSVal }
instance Eq (HTMLHeadingElement) where
(HTMLHeadingElement a) == (HTMLHeadingElement b) = js_eq a b
instance PToJSVal HTMLHeadingElement where
pToJSVal = unHTMLHeadingElement
instance PFromJSVal HTMLHeadingElement where
pFromJSVal = HTMLHeadingElement
instance ToJSVal HTMLHeadingElement where
toJSVal = return . unHTMLHeadingElement
instance FromJSVal HTMLHeadingElement where
fromJSVal = return . fmap HTMLHeadingElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLHeadingElement
instance IsElement HTMLHeadingElement
instance IsNode HTMLHeadingElement
instance IsEventTarget HTMLHeadingElement
instance IsGObject HTMLHeadingElement where
typeGType _ = gTypeHTMLHeadingElement
foreign import javascript unsafe "window[\"HTMLHeadingElement\"]" gTypeHTMLHeadingElement :: GType
newtype HTMLHtmlElement = HTMLHtmlElement { unHTMLHtmlElement :: JSVal }
instance Eq (HTMLHtmlElement) where
(HTMLHtmlElement a) == (HTMLHtmlElement b) = js_eq a b
instance PToJSVal HTMLHtmlElement where
pToJSVal = unHTMLHtmlElement
instance PFromJSVal HTMLHtmlElement where
pFromJSVal = HTMLHtmlElement
instance ToJSVal HTMLHtmlElement where
toJSVal = return . unHTMLHtmlElement
instance FromJSVal HTMLHtmlElement where
fromJSVal = return . fmap HTMLHtmlElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLHtmlElement
instance IsElement HTMLHtmlElement
instance IsNode HTMLHtmlElement
instance IsEventTarget HTMLHtmlElement
instance IsGObject HTMLHtmlElement where
typeGType _ = gTypeHTMLHtmlElement
foreign import javascript unsafe "window[\"HTMLHtmlElement\"]" gTypeHTMLHtmlElement :: GType
newtype HTMLIFrameElement = HTMLIFrameElement { unHTMLIFrameElement :: JSVal }
instance Eq (HTMLIFrameElement) where
(HTMLIFrameElement a) == (HTMLIFrameElement b) = js_eq a b
instance PToJSVal HTMLIFrameElement where
pToJSVal = unHTMLIFrameElement
instance PFromJSVal HTMLIFrameElement where
pFromJSVal = HTMLIFrameElement
instance ToJSVal HTMLIFrameElement where
toJSVal = return . unHTMLIFrameElement
instance FromJSVal HTMLIFrameElement where
fromJSVal = return . fmap HTMLIFrameElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLIFrameElement
instance IsElement HTMLIFrameElement
instance IsNode HTMLIFrameElement
instance IsEventTarget HTMLIFrameElement
instance IsGObject HTMLIFrameElement where
typeGType _ = gTypeHTMLIFrameElement
foreign import javascript unsafe "window[\"HTMLIFrameElement\"]" gTypeHTMLIFrameElement :: GType
newtype HTMLImageElement = HTMLImageElement { unHTMLImageElement :: JSVal }
instance Eq (HTMLImageElement) where
(HTMLImageElement a) == (HTMLImageElement b) = js_eq a b
instance PToJSVal HTMLImageElement where
pToJSVal = unHTMLImageElement
instance PFromJSVal HTMLImageElement where
pFromJSVal = HTMLImageElement
instance ToJSVal HTMLImageElement where
toJSVal = return . unHTMLImageElement
instance FromJSVal HTMLImageElement where
fromJSVal = return . fmap HTMLImageElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLImageElement
instance IsElement HTMLImageElement
instance IsNode HTMLImageElement
instance IsEventTarget HTMLImageElement
instance IsGObject HTMLImageElement where
typeGType _ = gTypeHTMLImageElement
foreign import javascript unsafe "window[\"HTMLImageElement\"]" gTypeHTMLImageElement :: GType
newtype HTMLInputElement = HTMLInputElement { unHTMLInputElement :: JSVal }
instance Eq (HTMLInputElement) where
(HTMLInputElement a) == (HTMLInputElement b) = js_eq a b
instance PToJSVal HTMLInputElement where
pToJSVal = unHTMLInputElement
instance PFromJSVal HTMLInputElement where
pFromJSVal = HTMLInputElement
instance ToJSVal HTMLInputElement where
toJSVal = return . unHTMLInputElement
instance FromJSVal HTMLInputElement where
fromJSVal = return . fmap HTMLInputElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLInputElement
instance IsElement HTMLInputElement
instance IsNode HTMLInputElement
instance IsEventTarget HTMLInputElement
instance IsGObject HTMLInputElement where
typeGType _ = gTypeHTMLInputElement
foreign import javascript unsafe "window[\"HTMLInputElement\"]" gTypeHTMLInputElement :: GType
newtype HTMLKeygenElement = HTMLKeygenElement { unHTMLKeygenElement :: JSVal }
instance Eq (HTMLKeygenElement) where
(HTMLKeygenElement a) == (HTMLKeygenElement b) = js_eq a b
instance PToJSVal HTMLKeygenElement where
pToJSVal = unHTMLKeygenElement
instance PFromJSVal HTMLKeygenElement where
pFromJSVal = HTMLKeygenElement
instance ToJSVal HTMLKeygenElement where
toJSVal = return . unHTMLKeygenElement
instance FromJSVal HTMLKeygenElement where
fromJSVal = return . fmap HTMLKeygenElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLKeygenElement
instance IsElement HTMLKeygenElement
instance IsNode HTMLKeygenElement
instance IsEventTarget HTMLKeygenElement
instance IsGObject HTMLKeygenElement where
typeGType _ = gTypeHTMLKeygenElement
foreign import javascript unsafe "window[\"HTMLKeygenElement\"]" gTypeHTMLKeygenElement :: GType
newtype HTMLLIElement = HTMLLIElement { unHTMLLIElement :: JSVal }
instance Eq (HTMLLIElement) where
(HTMLLIElement a) == (HTMLLIElement b) = js_eq a b
instance PToJSVal HTMLLIElement where
pToJSVal = unHTMLLIElement
instance PFromJSVal HTMLLIElement where
pFromJSVal = HTMLLIElement
instance ToJSVal HTMLLIElement where
toJSVal = return . unHTMLLIElement
instance FromJSVal HTMLLIElement where
fromJSVal = return . fmap HTMLLIElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLLIElement
instance IsElement HTMLLIElement
instance IsNode HTMLLIElement
instance IsEventTarget HTMLLIElement
instance IsGObject HTMLLIElement where
typeGType _ = gTypeHTMLLIElement
foreign import javascript unsafe "window[\"HTMLLIElement\"]" gTypeHTMLLIElement :: GType
newtype HTMLLabelElement = HTMLLabelElement { unHTMLLabelElement :: JSVal }
instance Eq (HTMLLabelElement) where
(HTMLLabelElement a) == (HTMLLabelElement b) = js_eq a b
instance PToJSVal HTMLLabelElement where
pToJSVal = unHTMLLabelElement
instance PFromJSVal HTMLLabelElement where
pFromJSVal = HTMLLabelElement
instance ToJSVal HTMLLabelElement where
toJSVal = return . unHTMLLabelElement
instance FromJSVal HTMLLabelElement where
fromJSVal = return . fmap HTMLLabelElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLLabelElement
instance IsElement HTMLLabelElement
instance IsNode HTMLLabelElement
instance IsEventTarget HTMLLabelElement
instance IsGObject HTMLLabelElement where
typeGType _ = gTypeHTMLLabelElement
foreign import javascript unsafe "window[\"HTMLLabelElement\"]" gTypeHTMLLabelElement :: GType
newtype HTMLLegendElement = HTMLLegendElement { unHTMLLegendElement :: JSVal }
instance Eq (HTMLLegendElement) where
(HTMLLegendElement a) == (HTMLLegendElement b) = js_eq a b
instance PToJSVal HTMLLegendElement where
pToJSVal = unHTMLLegendElement
instance PFromJSVal HTMLLegendElement where
pFromJSVal = HTMLLegendElement
instance ToJSVal HTMLLegendElement where
toJSVal = return . unHTMLLegendElement
instance FromJSVal HTMLLegendElement where
fromJSVal = return . fmap HTMLLegendElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLLegendElement
instance IsElement HTMLLegendElement
instance IsNode HTMLLegendElement
instance IsEventTarget HTMLLegendElement
instance IsGObject HTMLLegendElement where
typeGType _ = gTypeHTMLLegendElement
foreign import javascript unsafe "window[\"HTMLLegendElement\"]" gTypeHTMLLegendElement :: GType
newtype HTMLLinkElement = HTMLLinkElement { unHTMLLinkElement :: JSVal }
instance Eq (HTMLLinkElement) where
(HTMLLinkElement a) == (HTMLLinkElement b) = js_eq a b
instance PToJSVal HTMLLinkElement where
pToJSVal = unHTMLLinkElement
instance PFromJSVal HTMLLinkElement where
pFromJSVal = HTMLLinkElement
instance ToJSVal HTMLLinkElement where
toJSVal = return . unHTMLLinkElement
instance FromJSVal HTMLLinkElement where
fromJSVal = return . fmap HTMLLinkElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLLinkElement
instance IsElement HTMLLinkElement
instance IsNode HTMLLinkElement
instance IsEventTarget HTMLLinkElement
instance IsGObject HTMLLinkElement where
typeGType _ = gTypeHTMLLinkElement
foreign import javascript unsafe "window[\"HTMLLinkElement\"]" gTypeHTMLLinkElement :: GType
newtype HTMLMapElement = HTMLMapElement { unHTMLMapElement :: JSVal }
instance Eq (HTMLMapElement) where
(HTMLMapElement a) == (HTMLMapElement b) = js_eq a b
instance PToJSVal HTMLMapElement where
pToJSVal = unHTMLMapElement
instance PFromJSVal HTMLMapElement where
pFromJSVal = HTMLMapElement
instance ToJSVal HTMLMapElement where
toJSVal = return . unHTMLMapElement
instance FromJSVal HTMLMapElement where
fromJSVal = return . fmap HTMLMapElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLMapElement
instance IsElement HTMLMapElement
instance IsNode HTMLMapElement
instance IsEventTarget HTMLMapElement
instance IsGObject HTMLMapElement where
typeGType _ = gTypeHTMLMapElement
foreign import javascript unsafe "window[\"HTMLMapElement\"]" gTypeHTMLMapElement :: GType
newtype HTMLMarqueeElement = HTMLMarqueeElement { unHTMLMarqueeElement :: JSVal }
instance Eq (HTMLMarqueeElement) where
(HTMLMarqueeElement a) == (HTMLMarqueeElement b) = js_eq a b
instance PToJSVal HTMLMarqueeElement where
pToJSVal = unHTMLMarqueeElement
instance PFromJSVal HTMLMarqueeElement where
pFromJSVal = HTMLMarqueeElement
instance ToJSVal HTMLMarqueeElement where
toJSVal = return . unHTMLMarqueeElement
instance FromJSVal HTMLMarqueeElement where
fromJSVal = return . fmap HTMLMarqueeElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLMarqueeElement
instance IsElement HTMLMarqueeElement
instance IsNode HTMLMarqueeElement
instance IsEventTarget HTMLMarqueeElement
instance IsGObject HTMLMarqueeElement where
typeGType _ = gTypeHTMLMarqueeElement
foreign import javascript unsafe "window[\"HTMLMarqueeElement\"]" gTypeHTMLMarqueeElement :: GType
newtype HTMLMediaElement = HTMLMediaElement { unHTMLMediaElement :: JSVal }
instance Eq (HTMLMediaElement) where
(HTMLMediaElement a) == (HTMLMediaElement b) = js_eq a b
instance PToJSVal HTMLMediaElement where
pToJSVal = unHTMLMediaElement
instance PFromJSVal HTMLMediaElement where
pFromJSVal = HTMLMediaElement
instance ToJSVal HTMLMediaElement where
toJSVal = return . unHTMLMediaElement
instance FromJSVal HTMLMediaElement where
fromJSVal = return . fmap HTMLMediaElement . maybeJSNullOrUndefined
class IsHTMLElement o => IsHTMLMediaElement o
toHTMLMediaElement :: IsHTMLMediaElement o => o -> HTMLMediaElement
toHTMLMediaElement = HTMLMediaElement . coerce
instance IsHTMLMediaElement HTMLMediaElement
instance IsHTMLElement HTMLMediaElement
instance IsElement HTMLMediaElement
instance IsNode HTMLMediaElement
instance IsEventTarget HTMLMediaElement
instance IsGObject HTMLMediaElement where
typeGType _ = gTypeHTMLMediaElement
foreign import javascript unsafe "window[\"HTMLMediaElement\"]" gTypeHTMLMediaElement :: GType
newtype HTMLMenuElement = HTMLMenuElement { unHTMLMenuElement :: JSVal }
instance Eq (HTMLMenuElement) where
(HTMLMenuElement a) == (HTMLMenuElement b) = js_eq a b
instance PToJSVal HTMLMenuElement where
pToJSVal = unHTMLMenuElement
instance PFromJSVal HTMLMenuElement where
pFromJSVal = HTMLMenuElement
instance ToJSVal HTMLMenuElement where
toJSVal = return . unHTMLMenuElement
instance FromJSVal HTMLMenuElement where
fromJSVal = return . fmap HTMLMenuElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLMenuElement
instance IsElement HTMLMenuElement
instance IsNode HTMLMenuElement
instance IsEventTarget HTMLMenuElement
instance IsGObject HTMLMenuElement where
typeGType _ = gTypeHTMLMenuElement
foreign import javascript unsafe "window[\"HTMLMenuElement\"]" gTypeHTMLMenuElement :: GType
newtype HTMLMetaElement = HTMLMetaElement { unHTMLMetaElement :: JSVal }
instance Eq (HTMLMetaElement) where
(HTMLMetaElement a) == (HTMLMetaElement b) = js_eq a b
instance PToJSVal HTMLMetaElement where
pToJSVal = unHTMLMetaElement
instance PFromJSVal HTMLMetaElement where
pFromJSVal = HTMLMetaElement
instance ToJSVal HTMLMetaElement where
toJSVal = return . unHTMLMetaElement
instance FromJSVal HTMLMetaElement where
fromJSVal = return . fmap HTMLMetaElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLMetaElement
instance IsElement HTMLMetaElement
instance IsNode HTMLMetaElement
instance IsEventTarget HTMLMetaElement
instance IsGObject HTMLMetaElement where
typeGType _ = gTypeHTMLMetaElement
foreign import javascript unsafe "window[\"HTMLMetaElement\"]" gTypeHTMLMetaElement :: GType
newtype HTMLMeterElement = HTMLMeterElement { unHTMLMeterElement :: JSVal }
instance Eq (HTMLMeterElement) where
(HTMLMeterElement a) == (HTMLMeterElement b) = js_eq a b
instance PToJSVal HTMLMeterElement where
pToJSVal = unHTMLMeterElement
instance PFromJSVal HTMLMeterElement where
pFromJSVal = HTMLMeterElement
instance ToJSVal HTMLMeterElement where
toJSVal = return . unHTMLMeterElement
instance FromJSVal HTMLMeterElement where
fromJSVal = return . fmap HTMLMeterElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLMeterElement
instance IsElement HTMLMeterElement
instance IsNode HTMLMeterElement
instance IsEventTarget HTMLMeterElement
instance IsGObject HTMLMeterElement where
typeGType _ = gTypeHTMLMeterElement
foreign import javascript unsafe "window[\"HTMLMeterElement\"]" gTypeHTMLMeterElement :: GType
newtype HTMLModElement = HTMLModElement { unHTMLModElement :: JSVal }
instance Eq (HTMLModElement) where
(HTMLModElement a) == (HTMLModElement b) = js_eq a b
instance PToJSVal HTMLModElement where
pToJSVal = unHTMLModElement
instance PFromJSVal HTMLModElement where
pFromJSVal = HTMLModElement
instance ToJSVal HTMLModElement where
toJSVal = return . unHTMLModElement
instance FromJSVal HTMLModElement where
fromJSVal = return . fmap HTMLModElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLModElement
instance IsElement HTMLModElement
instance IsNode HTMLModElement
instance IsEventTarget HTMLModElement
instance IsGObject HTMLModElement where
typeGType _ = gTypeHTMLModElement
foreign import javascript unsafe "window[\"HTMLModElement\"]" gTypeHTMLModElement :: GType
newtype HTMLOListElement = HTMLOListElement { unHTMLOListElement :: JSVal }
instance Eq (HTMLOListElement) where
(HTMLOListElement a) == (HTMLOListElement b) = js_eq a b
instance PToJSVal HTMLOListElement where
pToJSVal = unHTMLOListElement
instance PFromJSVal HTMLOListElement where
pFromJSVal = HTMLOListElement
instance ToJSVal HTMLOListElement where
toJSVal = return . unHTMLOListElement
instance FromJSVal HTMLOListElement where
fromJSVal = return . fmap HTMLOListElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLOListElement
instance IsElement HTMLOListElement
instance IsNode HTMLOListElement
instance IsEventTarget HTMLOListElement
instance IsGObject HTMLOListElement where
typeGType _ = gTypeHTMLOListElement
foreign import javascript unsafe "window[\"HTMLOListElement\"]" gTypeHTMLOListElement :: GType
newtype HTMLObjectElement = HTMLObjectElement { unHTMLObjectElement :: JSVal }
instance Eq (HTMLObjectElement) where
(HTMLObjectElement a) == (HTMLObjectElement b) = js_eq a b
instance PToJSVal HTMLObjectElement where
pToJSVal = unHTMLObjectElement
instance PFromJSVal HTMLObjectElement where
pFromJSVal = HTMLObjectElement
instance ToJSVal HTMLObjectElement where
toJSVal = return . unHTMLObjectElement
instance FromJSVal HTMLObjectElement where
fromJSVal = return . fmap HTMLObjectElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLObjectElement
instance IsElement HTMLObjectElement
instance IsNode HTMLObjectElement
instance IsEventTarget HTMLObjectElement
instance IsGObject HTMLObjectElement where
typeGType _ = gTypeHTMLObjectElement
foreign import javascript unsafe "window[\"HTMLObjectElement\"]" gTypeHTMLObjectElement :: GType
newtype HTMLOptGroupElement = HTMLOptGroupElement { unHTMLOptGroupElement :: JSVal }
instance Eq (HTMLOptGroupElement) where
(HTMLOptGroupElement a) == (HTMLOptGroupElement b) = js_eq a b
instance PToJSVal HTMLOptGroupElement where
pToJSVal = unHTMLOptGroupElement
instance PFromJSVal HTMLOptGroupElement where
pFromJSVal = HTMLOptGroupElement
instance ToJSVal HTMLOptGroupElement where
toJSVal = return . unHTMLOptGroupElement
instance FromJSVal HTMLOptGroupElement where
fromJSVal = return . fmap HTMLOptGroupElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLOptGroupElement
instance IsElement HTMLOptGroupElement
instance IsNode HTMLOptGroupElement
instance IsEventTarget HTMLOptGroupElement
instance IsGObject HTMLOptGroupElement where
typeGType _ = gTypeHTMLOptGroupElement
foreign import javascript unsafe "window[\"HTMLOptGroupElement\"]" gTypeHTMLOptGroupElement :: GType
newtype HTMLOptionElement = HTMLOptionElement { unHTMLOptionElement :: JSVal }
instance Eq (HTMLOptionElement) where
(HTMLOptionElement a) == (HTMLOptionElement b) = js_eq a b
instance PToJSVal HTMLOptionElement where
pToJSVal = unHTMLOptionElement
instance PFromJSVal HTMLOptionElement where
pFromJSVal = HTMLOptionElement
instance ToJSVal HTMLOptionElement where
toJSVal = return . unHTMLOptionElement
instance FromJSVal HTMLOptionElement where
fromJSVal = return . fmap HTMLOptionElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLOptionElement
instance IsElement HTMLOptionElement
instance IsNode HTMLOptionElement
instance IsEventTarget HTMLOptionElement
instance IsGObject HTMLOptionElement where
typeGType _ = gTypeHTMLOptionElement
foreign import javascript unsafe "window[\"HTMLOptionElement\"]" gTypeHTMLOptionElement :: GType
newtype HTMLOptionsCollection = HTMLOptionsCollection { unHTMLOptionsCollection :: JSVal }
instance Eq (HTMLOptionsCollection) where
(HTMLOptionsCollection a) == (HTMLOptionsCollection b) = js_eq a b
instance PToJSVal HTMLOptionsCollection where
pToJSVal = unHTMLOptionsCollection
instance PFromJSVal HTMLOptionsCollection where
pFromJSVal = HTMLOptionsCollection
instance ToJSVal HTMLOptionsCollection where
toJSVal = return . unHTMLOptionsCollection
instance FromJSVal HTMLOptionsCollection where
fromJSVal = return . fmap HTMLOptionsCollection . maybeJSNullOrUndefined
instance IsHTMLCollection HTMLOptionsCollection
instance IsGObject HTMLOptionsCollection where
typeGType _ = gTypeHTMLOptionsCollection
foreign import javascript unsafe "window[\"HTMLOptionsCollection\"]" gTypeHTMLOptionsCollection :: GType
newtype HTMLOutputElement = HTMLOutputElement { unHTMLOutputElement :: JSVal }
instance Eq (HTMLOutputElement) where
(HTMLOutputElement a) == (HTMLOutputElement b) = js_eq a b
instance PToJSVal HTMLOutputElement where
pToJSVal = unHTMLOutputElement
instance PFromJSVal HTMLOutputElement where
pFromJSVal = HTMLOutputElement
instance ToJSVal HTMLOutputElement where
toJSVal = return . unHTMLOutputElement
instance FromJSVal HTMLOutputElement where
fromJSVal = return . fmap HTMLOutputElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLOutputElement
instance IsElement HTMLOutputElement
instance IsNode HTMLOutputElement
instance IsEventTarget HTMLOutputElement
instance IsGObject HTMLOutputElement where
typeGType _ = gTypeHTMLOutputElement
foreign import javascript unsafe "window[\"HTMLOutputElement\"]" gTypeHTMLOutputElement :: GType
newtype HTMLParagraphElement = HTMLParagraphElement { unHTMLParagraphElement :: JSVal }
instance Eq (HTMLParagraphElement) where
(HTMLParagraphElement a) == (HTMLParagraphElement b) = js_eq a b
instance PToJSVal HTMLParagraphElement where
pToJSVal = unHTMLParagraphElement
instance PFromJSVal HTMLParagraphElement where
pFromJSVal = HTMLParagraphElement
instance ToJSVal HTMLParagraphElement where
toJSVal = return . unHTMLParagraphElement
instance FromJSVal HTMLParagraphElement where
fromJSVal = return . fmap HTMLParagraphElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLParagraphElement
instance IsElement HTMLParagraphElement
instance IsNode HTMLParagraphElement
instance IsEventTarget HTMLParagraphElement
instance IsGObject HTMLParagraphElement where
typeGType _ = gTypeHTMLParagraphElement
foreign import javascript unsafe "window[\"HTMLParagraphElement\"]" gTypeHTMLParagraphElement :: GType
newtype HTMLParamElement = HTMLParamElement { unHTMLParamElement :: JSVal }
instance Eq (HTMLParamElement) where
(HTMLParamElement a) == (HTMLParamElement b) = js_eq a b
instance PToJSVal HTMLParamElement where
pToJSVal = unHTMLParamElement
instance PFromJSVal HTMLParamElement where
pFromJSVal = HTMLParamElement
instance ToJSVal HTMLParamElement where
toJSVal = return . unHTMLParamElement
instance FromJSVal HTMLParamElement where
fromJSVal = return . fmap HTMLParamElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLParamElement
instance IsElement HTMLParamElement
instance IsNode HTMLParamElement
instance IsEventTarget HTMLParamElement
instance IsGObject HTMLParamElement where
typeGType _ = gTypeHTMLParamElement
foreign import javascript unsafe "window[\"HTMLParamElement\"]" gTypeHTMLParamElement :: GType
newtype HTMLPreElement = HTMLPreElement { unHTMLPreElement :: JSVal }
instance Eq (HTMLPreElement) where
(HTMLPreElement a) == (HTMLPreElement b) = js_eq a b
instance PToJSVal HTMLPreElement where
pToJSVal = unHTMLPreElement
instance PFromJSVal HTMLPreElement where
pFromJSVal = HTMLPreElement
instance ToJSVal HTMLPreElement where
toJSVal = return . unHTMLPreElement
instance FromJSVal HTMLPreElement where
fromJSVal = return . fmap HTMLPreElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLPreElement
instance IsElement HTMLPreElement
instance IsNode HTMLPreElement
instance IsEventTarget HTMLPreElement
instance IsGObject HTMLPreElement where
typeGType _ = gTypeHTMLPreElement
foreign import javascript unsafe "window[\"HTMLPreElement\"]" gTypeHTMLPreElement :: GType
newtype HTMLProgressElement = HTMLProgressElement { unHTMLProgressElement :: JSVal }
instance Eq (HTMLProgressElement) where
(HTMLProgressElement a) == (HTMLProgressElement b) = js_eq a b
instance PToJSVal HTMLProgressElement where
pToJSVal = unHTMLProgressElement
instance PFromJSVal HTMLProgressElement where
pFromJSVal = HTMLProgressElement
instance ToJSVal HTMLProgressElement where
toJSVal = return . unHTMLProgressElement
instance FromJSVal HTMLProgressElement where
fromJSVal = return . fmap HTMLProgressElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLProgressElement
instance IsElement HTMLProgressElement
instance IsNode HTMLProgressElement
instance IsEventTarget HTMLProgressElement
instance IsGObject HTMLProgressElement where
typeGType _ = gTypeHTMLProgressElement
foreign import javascript unsafe "window[\"HTMLProgressElement\"]" gTypeHTMLProgressElement :: GType
newtype HTMLQuoteElement = HTMLQuoteElement { unHTMLQuoteElement :: JSVal }
instance Eq (HTMLQuoteElement) where
(HTMLQuoteElement a) == (HTMLQuoteElement b) = js_eq a b
instance PToJSVal HTMLQuoteElement where
pToJSVal = unHTMLQuoteElement
instance PFromJSVal HTMLQuoteElement where
pFromJSVal = HTMLQuoteElement
instance ToJSVal HTMLQuoteElement where
toJSVal = return . unHTMLQuoteElement
instance FromJSVal HTMLQuoteElement where
fromJSVal = return . fmap HTMLQuoteElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLQuoteElement
instance IsElement HTMLQuoteElement
instance IsNode HTMLQuoteElement
instance IsEventTarget HTMLQuoteElement
instance IsGObject HTMLQuoteElement where
typeGType _ = gTypeHTMLQuoteElement
foreign import javascript unsafe "window[\"HTMLQuoteElement\"]" gTypeHTMLQuoteElement :: GType
newtype HTMLScriptElement = HTMLScriptElement { unHTMLScriptElement :: JSVal }
instance Eq (HTMLScriptElement) where
(HTMLScriptElement a) == (HTMLScriptElement b) = js_eq a b
instance PToJSVal HTMLScriptElement where
pToJSVal = unHTMLScriptElement
instance PFromJSVal HTMLScriptElement where
pFromJSVal = HTMLScriptElement
instance ToJSVal HTMLScriptElement where
toJSVal = return . unHTMLScriptElement
instance FromJSVal HTMLScriptElement where
fromJSVal = return . fmap HTMLScriptElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLScriptElement
instance IsElement HTMLScriptElement
instance IsNode HTMLScriptElement
instance IsEventTarget HTMLScriptElement
instance IsGObject HTMLScriptElement where
typeGType _ = gTypeHTMLScriptElement
foreign import javascript unsafe "window[\"HTMLScriptElement\"]" gTypeHTMLScriptElement :: GType
newtype HTMLSelectElement = HTMLSelectElement { unHTMLSelectElement :: JSVal }
instance Eq (HTMLSelectElement) where
(HTMLSelectElement a) == (HTMLSelectElement b) = js_eq a b
instance PToJSVal HTMLSelectElement where
pToJSVal = unHTMLSelectElement
instance PFromJSVal HTMLSelectElement where
pFromJSVal = HTMLSelectElement
instance ToJSVal HTMLSelectElement where
toJSVal = return . unHTMLSelectElement
instance FromJSVal HTMLSelectElement where
fromJSVal = return . fmap HTMLSelectElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLSelectElement
instance IsElement HTMLSelectElement
instance IsNode HTMLSelectElement
instance IsEventTarget HTMLSelectElement
instance IsGObject HTMLSelectElement where
typeGType _ = gTypeHTMLSelectElement
foreign import javascript unsafe "window[\"HTMLSelectElement\"]" gTypeHTMLSelectElement :: GType
newtype HTMLSourceElement = HTMLSourceElement { unHTMLSourceElement :: JSVal }
instance Eq (HTMLSourceElement) where
(HTMLSourceElement a) == (HTMLSourceElement b) = js_eq a b
instance PToJSVal HTMLSourceElement where
pToJSVal = unHTMLSourceElement
instance PFromJSVal HTMLSourceElement where
pFromJSVal = HTMLSourceElement
instance ToJSVal HTMLSourceElement where
toJSVal = return . unHTMLSourceElement
instance FromJSVal HTMLSourceElement where
fromJSVal = return . fmap HTMLSourceElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLSourceElement
instance IsElement HTMLSourceElement
instance IsNode HTMLSourceElement
instance IsEventTarget HTMLSourceElement
instance IsGObject HTMLSourceElement where
typeGType _ = gTypeHTMLSourceElement
foreign import javascript unsafe "window[\"HTMLSourceElement\"]" gTypeHTMLSourceElement :: GType
newtype HTMLSpanElement = HTMLSpanElement { unHTMLSpanElement :: JSVal }
instance Eq (HTMLSpanElement) where
(HTMLSpanElement a) == (HTMLSpanElement b) = js_eq a b
instance PToJSVal HTMLSpanElement where
pToJSVal = unHTMLSpanElement
instance PFromJSVal HTMLSpanElement where
pFromJSVal = HTMLSpanElement
instance ToJSVal HTMLSpanElement where
toJSVal = return . unHTMLSpanElement
instance FromJSVal HTMLSpanElement where
fromJSVal = return . fmap HTMLSpanElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLSpanElement
instance IsElement HTMLSpanElement
instance IsNode HTMLSpanElement
instance IsEventTarget HTMLSpanElement
instance IsGObject HTMLSpanElement where
typeGType _ = gTypeHTMLSpanElement
foreign import javascript unsafe "window[\"HTMLSpanElement\"]" gTypeHTMLSpanElement :: GType
newtype HTMLStyleElement = HTMLStyleElement { unHTMLStyleElement :: JSVal }
instance Eq (HTMLStyleElement) where
(HTMLStyleElement a) == (HTMLStyleElement b) = js_eq a b
instance PToJSVal HTMLStyleElement where
pToJSVal = unHTMLStyleElement
instance PFromJSVal HTMLStyleElement where
pFromJSVal = HTMLStyleElement
instance ToJSVal HTMLStyleElement where
toJSVal = return . unHTMLStyleElement
instance FromJSVal HTMLStyleElement where
fromJSVal = return . fmap HTMLStyleElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLStyleElement
instance IsElement HTMLStyleElement
instance IsNode HTMLStyleElement
instance IsEventTarget HTMLStyleElement
instance IsGObject HTMLStyleElement where
typeGType _ = gTypeHTMLStyleElement
foreign import javascript unsafe "window[\"HTMLStyleElement\"]" gTypeHTMLStyleElement :: GType
newtype HTMLTableCaptionElement = HTMLTableCaptionElement { unHTMLTableCaptionElement :: JSVal }
instance Eq (HTMLTableCaptionElement) where
(HTMLTableCaptionElement a) == (HTMLTableCaptionElement b) = js_eq a b
instance PToJSVal HTMLTableCaptionElement where
pToJSVal = unHTMLTableCaptionElement
instance PFromJSVal HTMLTableCaptionElement where
pFromJSVal = HTMLTableCaptionElement
instance ToJSVal HTMLTableCaptionElement where
toJSVal = return . unHTMLTableCaptionElement
instance FromJSVal HTMLTableCaptionElement where
fromJSVal = return . fmap HTMLTableCaptionElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLTableCaptionElement
instance IsElement HTMLTableCaptionElement
instance IsNode HTMLTableCaptionElement
instance IsEventTarget HTMLTableCaptionElement
instance IsGObject HTMLTableCaptionElement where
typeGType _ = gTypeHTMLTableCaptionElement
foreign import javascript unsafe "window[\"HTMLTableCaptionElement\"]" gTypeHTMLTableCaptionElement :: GType
newtype HTMLTableCellElement = HTMLTableCellElement { unHTMLTableCellElement :: JSVal }
instance Eq (HTMLTableCellElement) where
(HTMLTableCellElement a) == (HTMLTableCellElement b) = js_eq a b
instance PToJSVal HTMLTableCellElement where
pToJSVal = unHTMLTableCellElement
instance PFromJSVal HTMLTableCellElement where
pFromJSVal = HTMLTableCellElement
instance ToJSVal HTMLTableCellElement where
toJSVal = return . unHTMLTableCellElement
instance FromJSVal HTMLTableCellElement where
fromJSVal = return . fmap HTMLTableCellElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLTableCellElement
instance IsElement HTMLTableCellElement
instance IsNode HTMLTableCellElement
instance IsEventTarget HTMLTableCellElement
instance IsGObject HTMLTableCellElement where
typeGType _ = gTypeHTMLTableCellElement
foreign import javascript unsafe "window[\"HTMLTableCellElement\"]" gTypeHTMLTableCellElement :: GType
newtype HTMLTableColElement = HTMLTableColElement { unHTMLTableColElement :: JSVal }
instance Eq (HTMLTableColElement) where
(HTMLTableColElement a) == (HTMLTableColElement b) = js_eq a b
instance PToJSVal HTMLTableColElement where
pToJSVal = unHTMLTableColElement
instance PFromJSVal HTMLTableColElement where
pFromJSVal = HTMLTableColElement
instance ToJSVal HTMLTableColElement where
toJSVal = return . unHTMLTableColElement
instance FromJSVal HTMLTableColElement where
fromJSVal = return . fmap HTMLTableColElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLTableColElement
instance IsElement HTMLTableColElement
instance IsNode HTMLTableColElement
instance IsEventTarget HTMLTableColElement
instance IsGObject HTMLTableColElement where
typeGType _ = gTypeHTMLTableColElement
foreign import javascript unsafe "window[\"HTMLTableColElement\"]" gTypeHTMLTableColElement :: GType
newtype HTMLTableElement = HTMLTableElement { unHTMLTableElement :: JSVal }
instance Eq (HTMLTableElement) where
(HTMLTableElement a) == (HTMLTableElement b) = js_eq a b
instance PToJSVal HTMLTableElement where
pToJSVal = unHTMLTableElement
instance PFromJSVal HTMLTableElement where
pFromJSVal = HTMLTableElement
instance ToJSVal HTMLTableElement where
toJSVal = return . unHTMLTableElement
instance FromJSVal HTMLTableElement where
fromJSVal = return . fmap HTMLTableElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLTableElement
instance IsElement HTMLTableElement
instance IsNode HTMLTableElement
instance IsEventTarget HTMLTableElement
instance IsGObject HTMLTableElement where
typeGType _ = gTypeHTMLTableElement
foreign import javascript unsafe "window[\"HTMLTableElement\"]" gTypeHTMLTableElement :: GType
newtype HTMLTableRowElement = HTMLTableRowElement { unHTMLTableRowElement :: JSVal }
instance Eq (HTMLTableRowElement) where
(HTMLTableRowElement a) == (HTMLTableRowElement b) = js_eq a b
instance PToJSVal HTMLTableRowElement where
pToJSVal = unHTMLTableRowElement
instance PFromJSVal HTMLTableRowElement where
pFromJSVal = HTMLTableRowElement
instance ToJSVal HTMLTableRowElement where
toJSVal = return . unHTMLTableRowElement
instance FromJSVal HTMLTableRowElement where
fromJSVal = return . fmap HTMLTableRowElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLTableRowElement
instance IsElement HTMLTableRowElement
instance IsNode HTMLTableRowElement
instance IsEventTarget HTMLTableRowElement
instance IsGObject HTMLTableRowElement where
typeGType _ = gTypeHTMLTableRowElement
foreign import javascript unsafe "window[\"HTMLTableRowElement\"]" gTypeHTMLTableRowElement :: GType
newtype HTMLTableSectionElement = HTMLTableSectionElement { unHTMLTableSectionElement :: JSVal }
instance Eq (HTMLTableSectionElement) where
(HTMLTableSectionElement a) == (HTMLTableSectionElement b) = js_eq a b
instance PToJSVal HTMLTableSectionElement where
pToJSVal = unHTMLTableSectionElement
instance PFromJSVal HTMLTableSectionElement where
pFromJSVal = HTMLTableSectionElement
instance ToJSVal HTMLTableSectionElement where
toJSVal = return . unHTMLTableSectionElement
instance FromJSVal HTMLTableSectionElement where
fromJSVal = return . fmap HTMLTableSectionElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLTableSectionElement
instance IsElement HTMLTableSectionElement
instance IsNode HTMLTableSectionElement
instance IsEventTarget HTMLTableSectionElement
instance IsGObject HTMLTableSectionElement where
typeGType _ = gTypeHTMLTableSectionElement
foreign import javascript unsafe "window[\"HTMLTableSectionElement\"]" gTypeHTMLTableSectionElement :: GType
newtype HTMLTemplateElement = HTMLTemplateElement { unHTMLTemplateElement :: JSVal }
instance Eq (HTMLTemplateElement) where
(HTMLTemplateElement a) == (HTMLTemplateElement b) = js_eq a b
instance PToJSVal HTMLTemplateElement where
pToJSVal = unHTMLTemplateElement
instance PFromJSVal HTMLTemplateElement where
pFromJSVal = HTMLTemplateElement
instance ToJSVal HTMLTemplateElement where
toJSVal = return . unHTMLTemplateElement
instance FromJSVal HTMLTemplateElement where
fromJSVal = return . fmap HTMLTemplateElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLTemplateElement
instance IsElement HTMLTemplateElement
instance IsNode HTMLTemplateElement
instance IsEventTarget HTMLTemplateElement
instance IsGObject HTMLTemplateElement where
typeGType _ = gTypeHTMLTemplateElement
foreign import javascript unsafe "window[\"HTMLTemplateElement\"]" gTypeHTMLTemplateElement :: GType
newtype HTMLTextAreaElement = HTMLTextAreaElement { unHTMLTextAreaElement :: JSVal }
instance Eq (HTMLTextAreaElement) where
(HTMLTextAreaElement a) == (HTMLTextAreaElement b) = js_eq a b
instance PToJSVal HTMLTextAreaElement where
pToJSVal = unHTMLTextAreaElement
instance PFromJSVal HTMLTextAreaElement where
pFromJSVal = HTMLTextAreaElement
instance ToJSVal HTMLTextAreaElement where
toJSVal = return . unHTMLTextAreaElement
instance FromJSVal HTMLTextAreaElement where
fromJSVal = return . fmap HTMLTextAreaElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLTextAreaElement
instance IsElement HTMLTextAreaElement
instance IsNode HTMLTextAreaElement
instance IsEventTarget HTMLTextAreaElement
instance IsGObject HTMLTextAreaElement where
typeGType _ = gTypeHTMLTextAreaElement
foreign import javascript unsafe "window[\"HTMLTextAreaElement\"]" gTypeHTMLTextAreaElement :: GType
newtype HTMLTitleElement = HTMLTitleElement { unHTMLTitleElement :: JSVal }
instance Eq (HTMLTitleElement) where
(HTMLTitleElement a) == (HTMLTitleElement b) = js_eq a b
instance PToJSVal HTMLTitleElement where
pToJSVal = unHTMLTitleElement
instance PFromJSVal HTMLTitleElement where
pFromJSVal = HTMLTitleElement
instance ToJSVal HTMLTitleElement where
toJSVal = return . unHTMLTitleElement
instance FromJSVal HTMLTitleElement where
fromJSVal = return . fmap HTMLTitleElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLTitleElement
instance IsElement HTMLTitleElement
instance IsNode HTMLTitleElement
instance IsEventTarget HTMLTitleElement
instance IsGObject HTMLTitleElement where
typeGType _ = gTypeHTMLTitleElement
foreign import javascript unsafe "window[\"HTMLTitleElement\"]" gTypeHTMLTitleElement :: GType
newtype HTMLTrackElement = HTMLTrackElement { unHTMLTrackElement :: JSVal }
instance Eq (HTMLTrackElement) where
(HTMLTrackElement a) == (HTMLTrackElement b) = js_eq a b
instance PToJSVal HTMLTrackElement where
pToJSVal = unHTMLTrackElement
instance PFromJSVal HTMLTrackElement where
pFromJSVal = HTMLTrackElement
instance ToJSVal HTMLTrackElement where
toJSVal = return . unHTMLTrackElement
instance FromJSVal HTMLTrackElement where
fromJSVal = return . fmap HTMLTrackElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLTrackElement
instance IsElement HTMLTrackElement
instance IsNode HTMLTrackElement
instance IsEventTarget HTMLTrackElement
instance IsGObject HTMLTrackElement where
typeGType _ = gTypeHTMLTrackElement
foreign import javascript unsafe "window[\"HTMLTrackElement\"]" gTypeHTMLTrackElement :: GType
newtype HTMLUListElement = HTMLUListElement { unHTMLUListElement :: JSVal }
instance Eq (HTMLUListElement) where
(HTMLUListElement a) == (HTMLUListElement b) = js_eq a b
instance PToJSVal HTMLUListElement where
pToJSVal = unHTMLUListElement
instance PFromJSVal HTMLUListElement where
pFromJSVal = HTMLUListElement
instance ToJSVal HTMLUListElement where
toJSVal = return . unHTMLUListElement
instance FromJSVal HTMLUListElement where
fromJSVal = return . fmap HTMLUListElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLUListElement
instance IsElement HTMLUListElement
instance IsNode HTMLUListElement
instance IsEventTarget HTMLUListElement
instance IsGObject HTMLUListElement where
typeGType _ = gTypeHTMLUListElement
foreign import javascript unsafe "window[\"HTMLUListElement\"]" gTypeHTMLUListElement :: GType
newtype HTMLUnknownElement = HTMLUnknownElement { unHTMLUnknownElement :: JSVal }
instance Eq (HTMLUnknownElement) where
(HTMLUnknownElement a) == (HTMLUnknownElement b) = js_eq a b
instance PToJSVal HTMLUnknownElement where
pToJSVal = unHTMLUnknownElement
instance PFromJSVal HTMLUnknownElement where
pFromJSVal = HTMLUnknownElement
instance ToJSVal HTMLUnknownElement where
toJSVal = return . unHTMLUnknownElement
instance FromJSVal HTMLUnknownElement where
fromJSVal = return . fmap HTMLUnknownElement . maybeJSNullOrUndefined
instance IsHTMLElement HTMLUnknownElement
instance IsElement HTMLUnknownElement
instance IsNode HTMLUnknownElement
instance IsEventTarget HTMLUnknownElement
instance IsGObject HTMLUnknownElement where
typeGType _ = gTypeHTMLUnknownElement
foreign import javascript unsafe "window[\"HTMLUnknownElement\"]" gTypeHTMLUnknownElement :: GType
newtype HTMLVideoElement = HTMLVideoElement { unHTMLVideoElement :: JSVal }
instance Eq (HTMLVideoElement) where
(HTMLVideoElement a) == (HTMLVideoElement b) = js_eq a b
instance PToJSVal HTMLVideoElement where
pToJSVal = unHTMLVideoElement
instance PFromJSVal HTMLVideoElement where
pFromJSVal = HTMLVideoElement
instance ToJSVal HTMLVideoElement where
toJSVal = return . unHTMLVideoElement
instance FromJSVal HTMLVideoElement where
fromJSVal = return . fmap HTMLVideoElement . maybeJSNullOrUndefined
instance IsHTMLMediaElement HTMLVideoElement
instance IsHTMLElement HTMLVideoElement
instance IsElement HTMLVideoElement
instance IsNode HTMLVideoElement
instance IsEventTarget HTMLVideoElement
instance IsGObject HTMLVideoElement where
typeGType _ = gTypeHTMLVideoElement
foreign import javascript unsafe "window[\"HTMLVideoElement\"]" gTypeHTMLVideoElement :: GType
newtype HashChangeEvent = HashChangeEvent { unHashChangeEvent :: JSVal }
instance Eq (HashChangeEvent) where
(HashChangeEvent a) == (HashChangeEvent b) = js_eq a b
instance PToJSVal HashChangeEvent where
pToJSVal = unHashChangeEvent
instance PFromJSVal HashChangeEvent where
pFromJSVal = HashChangeEvent
instance ToJSVal HashChangeEvent where
toJSVal = return . unHashChangeEvent
instance FromJSVal HashChangeEvent where
fromJSVal = return . fmap HashChangeEvent . maybeJSNullOrUndefined
instance IsEvent HashChangeEvent
instance IsGObject HashChangeEvent where
typeGType _ = gTypeHashChangeEvent
foreign import javascript unsafe "window[\"HashChangeEvent\"]" gTypeHashChangeEvent :: GType
newtype History = History { unHistory :: JSVal }
instance Eq (History) where
(History a) == (History b) = js_eq a b
instance PToJSVal History where
pToJSVal = unHistory
instance PFromJSVal History where
pFromJSVal = History
instance ToJSVal History where
toJSVal = return . unHistory
instance FromJSVal History where
fromJSVal = return . fmap History . maybeJSNullOrUndefined
instance IsGObject History where
typeGType _ = gTypeHistory
foreign import javascript unsafe "window[\"History\"]" gTypeHistory :: GType
newtype IDBAny = IDBAny { unIDBAny :: JSVal }
instance Eq (IDBAny) where
(IDBAny a) == (IDBAny b) = js_eq a b
instance PToJSVal IDBAny where
pToJSVal = unIDBAny
instance PFromJSVal IDBAny where
pFromJSVal = IDBAny
instance ToJSVal IDBAny where
toJSVal = return . unIDBAny
instance FromJSVal IDBAny where
fromJSVal = return . fmap IDBAny . maybeJSNullOrUndefined
instance IsGObject IDBAny where
typeGType _ = gTypeIDBAny
foreign import javascript unsafe "window[\"IDBAny\"]" gTypeIDBAny :: GType
newtype IDBCursor = IDBCursor { unIDBCursor :: JSVal }
instance Eq (IDBCursor) where
(IDBCursor a) == (IDBCursor b) = js_eq a b
instance PToJSVal IDBCursor where
pToJSVal = unIDBCursor
instance PFromJSVal IDBCursor where
pFromJSVal = IDBCursor
instance ToJSVal IDBCursor where
toJSVal = return . unIDBCursor
instance FromJSVal IDBCursor where
fromJSVal = return . fmap IDBCursor . maybeJSNullOrUndefined
class IsGObject o => IsIDBCursor o
toIDBCursor :: IsIDBCursor o => o -> IDBCursor
toIDBCursor = IDBCursor . coerce
instance IsIDBCursor IDBCursor
instance IsGObject IDBCursor where
typeGType _ = gTypeIDBCursor
foreign import javascript unsafe "window[\"IDBCursor\"]" gTypeIDBCursor :: GType
newtype IDBCursorWithValue = IDBCursorWithValue { unIDBCursorWithValue :: JSVal }
instance Eq (IDBCursorWithValue) where
(IDBCursorWithValue a) == (IDBCursorWithValue b) = js_eq a b
instance PToJSVal IDBCursorWithValue where
pToJSVal = unIDBCursorWithValue
instance PFromJSVal IDBCursorWithValue where
pFromJSVal = IDBCursorWithValue
instance ToJSVal IDBCursorWithValue where
toJSVal = return . unIDBCursorWithValue
instance FromJSVal IDBCursorWithValue where
fromJSVal = return . fmap IDBCursorWithValue . maybeJSNullOrUndefined
instance IsIDBCursor IDBCursorWithValue
instance IsGObject IDBCursorWithValue where
typeGType _ = gTypeIDBCursorWithValue
foreign import javascript unsafe "window[\"IDBCursorWithValue\"]" gTypeIDBCursorWithValue :: GType
newtype IDBDatabase = IDBDatabase { unIDBDatabase :: JSVal }
instance Eq (IDBDatabase) where
(IDBDatabase a) == (IDBDatabase b) = js_eq a b
instance PToJSVal IDBDatabase where
pToJSVal = unIDBDatabase
instance PFromJSVal IDBDatabase where
pFromJSVal = IDBDatabase
instance ToJSVal IDBDatabase where
toJSVal = return . unIDBDatabase
instance FromJSVal IDBDatabase where
fromJSVal = return . fmap IDBDatabase . maybeJSNullOrUndefined
instance IsEventTarget IDBDatabase
instance IsGObject IDBDatabase where
typeGType _ = gTypeIDBDatabase
foreign import javascript unsafe "window[\"IDBDatabase\"]" gTypeIDBDatabase :: GType
newtype IDBFactory = IDBFactory { unIDBFactory :: JSVal }
instance Eq (IDBFactory) where
(IDBFactory a) == (IDBFactory b) = js_eq a b
instance PToJSVal IDBFactory where
pToJSVal = unIDBFactory
instance PFromJSVal IDBFactory where
pFromJSVal = IDBFactory
instance ToJSVal IDBFactory where
toJSVal = return . unIDBFactory
instance FromJSVal IDBFactory where
fromJSVal = return . fmap IDBFactory . maybeJSNullOrUndefined
instance IsGObject IDBFactory where
typeGType _ = gTypeIDBFactory
foreign import javascript unsafe "window[\"IDBFactory\"]" gTypeIDBFactory :: GType
newtype IDBIndex = IDBIndex { unIDBIndex :: JSVal }
instance Eq (IDBIndex) where
(IDBIndex a) == (IDBIndex b) = js_eq a b
instance PToJSVal IDBIndex where
pToJSVal = unIDBIndex
instance PFromJSVal IDBIndex where
pFromJSVal = IDBIndex
instance ToJSVal IDBIndex where
toJSVal = return . unIDBIndex
instance FromJSVal IDBIndex where
fromJSVal = return . fmap IDBIndex . maybeJSNullOrUndefined
instance IsGObject IDBIndex where
typeGType _ = gTypeIDBIndex
foreign import javascript unsafe "window[\"IDBIndex\"]" gTypeIDBIndex :: GType
newtype IDBKeyRange = IDBKeyRange { unIDBKeyRange :: JSVal }
instance Eq (IDBKeyRange) where
(IDBKeyRange a) == (IDBKeyRange b) = js_eq a b
instance PToJSVal IDBKeyRange where
pToJSVal = unIDBKeyRange
instance PFromJSVal IDBKeyRange where
pFromJSVal = IDBKeyRange
instance ToJSVal IDBKeyRange where
toJSVal = return . unIDBKeyRange
instance FromJSVal IDBKeyRange where
fromJSVal = return . fmap IDBKeyRange . maybeJSNullOrUndefined
instance IsGObject IDBKeyRange where
typeGType _ = gTypeIDBKeyRange
foreign import javascript unsafe "window[\"IDBKeyRange\"]" gTypeIDBKeyRange :: GType
newtype IDBObjectStore = IDBObjectStore { unIDBObjectStore :: JSVal }
instance Eq (IDBObjectStore) where
(IDBObjectStore a) == (IDBObjectStore b) = js_eq a b
instance PToJSVal IDBObjectStore where
pToJSVal = unIDBObjectStore
instance PFromJSVal IDBObjectStore where
pFromJSVal = IDBObjectStore
instance ToJSVal IDBObjectStore where
toJSVal = return . unIDBObjectStore
instance FromJSVal IDBObjectStore where
fromJSVal = return . fmap IDBObjectStore . maybeJSNullOrUndefined
instance IsGObject IDBObjectStore where
typeGType _ = gTypeIDBObjectStore
foreign import javascript unsafe "window[\"IDBObjectStore\"]" gTypeIDBObjectStore :: GType
newtype IDBOpenDBRequest = IDBOpenDBRequest { unIDBOpenDBRequest :: JSVal }
instance Eq (IDBOpenDBRequest) where
(IDBOpenDBRequest a) == (IDBOpenDBRequest b) = js_eq a b
instance PToJSVal IDBOpenDBRequest where
pToJSVal = unIDBOpenDBRequest
instance PFromJSVal IDBOpenDBRequest where
pFromJSVal = IDBOpenDBRequest
instance ToJSVal IDBOpenDBRequest where
toJSVal = return . unIDBOpenDBRequest
instance FromJSVal IDBOpenDBRequest where
fromJSVal = return . fmap IDBOpenDBRequest . maybeJSNullOrUndefined
instance IsIDBRequest IDBOpenDBRequest
instance IsEventTarget IDBOpenDBRequest
instance IsGObject IDBOpenDBRequest where
typeGType _ = gTypeIDBOpenDBRequest
foreign import javascript unsafe "window[\"IDBOpenDBRequest\"]" gTypeIDBOpenDBRequest :: GType
newtype IDBRequest = IDBRequest { unIDBRequest :: JSVal }
instance Eq (IDBRequest) where
(IDBRequest a) == (IDBRequest b) = js_eq a b
instance PToJSVal IDBRequest where
pToJSVal = unIDBRequest
instance PFromJSVal IDBRequest where
pFromJSVal = IDBRequest
instance ToJSVal IDBRequest where
toJSVal = return . unIDBRequest
instance FromJSVal IDBRequest where
fromJSVal = return . fmap IDBRequest . maybeJSNullOrUndefined
class IsEventTarget o => IsIDBRequest o
toIDBRequest :: IsIDBRequest o => o -> IDBRequest
toIDBRequest = IDBRequest . coerce
instance IsIDBRequest IDBRequest
instance IsEventTarget IDBRequest
instance IsGObject IDBRequest where
typeGType _ = gTypeIDBRequest
foreign import javascript unsafe "window[\"IDBRequest\"]" gTypeIDBRequest :: GType
newtype IDBTransaction = IDBTransaction { unIDBTransaction :: JSVal }
instance Eq (IDBTransaction) where
(IDBTransaction a) == (IDBTransaction b) = js_eq a b
instance PToJSVal IDBTransaction where
pToJSVal = unIDBTransaction
instance PFromJSVal IDBTransaction where
pFromJSVal = IDBTransaction
instance ToJSVal IDBTransaction where
toJSVal = return . unIDBTransaction
instance FromJSVal IDBTransaction where
fromJSVal = return . fmap IDBTransaction . maybeJSNullOrUndefined
instance IsEventTarget IDBTransaction
instance IsGObject IDBTransaction where
typeGType _ = gTypeIDBTransaction
foreign import javascript unsafe "window[\"IDBTransaction\"]" gTypeIDBTransaction :: GType
newtype IDBVersionChangeEvent = IDBVersionChangeEvent { unIDBVersionChangeEvent :: JSVal }
instance Eq (IDBVersionChangeEvent) where
(IDBVersionChangeEvent a) == (IDBVersionChangeEvent b) = js_eq a b
instance PToJSVal IDBVersionChangeEvent where
pToJSVal = unIDBVersionChangeEvent
instance PFromJSVal IDBVersionChangeEvent where
pFromJSVal = IDBVersionChangeEvent
instance ToJSVal IDBVersionChangeEvent where
toJSVal = return . unIDBVersionChangeEvent
instance FromJSVal IDBVersionChangeEvent where
fromJSVal = return . fmap IDBVersionChangeEvent . maybeJSNullOrUndefined
instance IsEvent IDBVersionChangeEvent
instance IsGObject IDBVersionChangeEvent where
typeGType _ = gTypeIDBVersionChangeEvent
foreign import javascript unsafe "window[\"IDBVersionChangeEvent\"]" gTypeIDBVersionChangeEvent :: GType
newtype ImageData = ImageData { unImageData :: JSVal }
instance Eq (ImageData) where
(ImageData a) == (ImageData b) = js_eq a b
instance PToJSVal ImageData where
pToJSVal = unImageData
instance PFromJSVal ImageData where
pFromJSVal = ImageData
instance ToJSVal ImageData where
toJSVal = return . unImageData
instance FromJSVal ImageData where
fromJSVal = return . fmap ImageData . maybeJSNullOrUndefined
instance IsGObject ImageData where
typeGType _ = gTypeImageData
foreign import javascript unsafe "window[\"ImageData\"]" gTypeImageData :: GType
newtype InspectorFrontendHost = InspectorFrontendHost { unInspectorFrontendHost :: JSVal }
instance Eq (InspectorFrontendHost) where
(InspectorFrontendHost a) == (InspectorFrontendHost b) = js_eq a b
instance PToJSVal InspectorFrontendHost where
pToJSVal = unInspectorFrontendHost
instance PFromJSVal InspectorFrontendHost where
pFromJSVal = InspectorFrontendHost
instance ToJSVal InspectorFrontendHost where
toJSVal = return . unInspectorFrontendHost
instance FromJSVal InspectorFrontendHost where
fromJSVal = return . fmap InspectorFrontendHost . maybeJSNullOrUndefined
instance IsGObject InspectorFrontendHost where
typeGType _ = gTypeInspectorFrontendHost
foreign import javascript unsafe "window[\"InspectorFrontendHost\"]" gTypeInspectorFrontendHost :: GType
newtype InternalSettings = InternalSettings { unInternalSettings :: JSVal }
instance Eq (InternalSettings) where
(InternalSettings a) == (InternalSettings b) = js_eq a b
instance PToJSVal InternalSettings where
pToJSVal = unInternalSettings
instance PFromJSVal InternalSettings where
pFromJSVal = InternalSettings
instance ToJSVal InternalSettings where
toJSVal = return . unInternalSettings
instance FromJSVal InternalSettings where
fromJSVal = return . fmap InternalSettings . maybeJSNullOrUndefined
instance IsGObject InternalSettings where
typeGType _ = gTypeInternalSettings
foreign import javascript unsafe "window[\"InternalSettings\"]" gTypeInternalSettings :: GType
newtype Internals = Internals { unInternals :: JSVal }
instance Eq (Internals) where
(Internals a) == (Internals b) = js_eq a b
instance PToJSVal Internals where
pToJSVal = unInternals
instance PFromJSVal Internals where
pFromJSVal = Internals
instance ToJSVal Internals where
toJSVal = return . unInternals
instance FromJSVal Internals where
fromJSVal = return . fmap Internals . maybeJSNullOrUndefined
instance IsGObject Internals where
typeGType _ = gTypeInternals
foreign import javascript unsafe "window[\"Internals\"]" gTypeInternals :: GType
newtype KeyboardEvent = KeyboardEvent { unKeyboardEvent :: JSVal }
instance Eq (KeyboardEvent) where
(KeyboardEvent a) == (KeyboardEvent b) = js_eq a b
instance PToJSVal KeyboardEvent where
pToJSVal = unKeyboardEvent
instance PFromJSVal KeyboardEvent where
pFromJSVal = KeyboardEvent
instance ToJSVal KeyboardEvent where
toJSVal = return . unKeyboardEvent
instance FromJSVal KeyboardEvent where
fromJSVal = return . fmap KeyboardEvent . maybeJSNullOrUndefined
instance IsUIEvent KeyboardEvent
instance IsEvent KeyboardEvent
instance IsGObject KeyboardEvent where
typeGType _ = gTypeKeyboardEvent
foreign import javascript unsafe "window[\"KeyboardEvent\"]" gTypeKeyboardEvent :: GType
newtype Location = Location { unLocation :: JSVal }
instance Eq (Location) where
(Location a) == (Location b) = js_eq a b
instance PToJSVal Location where
pToJSVal = unLocation
instance PFromJSVal Location where
pFromJSVal = Location
instance ToJSVal Location where
toJSVal = return . unLocation
instance FromJSVal Location where
fromJSVal = return . fmap Location . maybeJSNullOrUndefined
instance IsGObject Location where
typeGType _ = gTypeLocation
foreign import javascript unsafe "window[\"Location\"]" gTypeLocation :: GType
newtype MallocStatistics = MallocStatistics { unMallocStatistics :: JSVal }
instance Eq (MallocStatistics) where
(MallocStatistics a) == (MallocStatistics b) = js_eq a b
instance PToJSVal MallocStatistics where
pToJSVal = unMallocStatistics
instance PFromJSVal MallocStatistics where
pFromJSVal = MallocStatistics
instance ToJSVal MallocStatistics where
toJSVal = return . unMallocStatistics
instance FromJSVal MallocStatistics where
fromJSVal = return . fmap MallocStatistics . maybeJSNullOrUndefined
instance IsGObject MallocStatistics where
typeGType _ = gTypeMallocStatistics
foreign import javascript unsafe "window[\"MallocStatistics\"]" gTypeMallocStatistics :: GType
newtype MediaController = MediaController { unMediaController :: JSVal }
instance Eq (MediaController) where
(MediaController a) == (MediaController b) = js_eq a b
instance PToJSVal MediaController where
pToJSVal = unMediaController
instance PFromJSVal MediaController where
pFromJSVal = MediaController
instance ToJSVal MediaController where
toJSVal = return . unMediaController
instance FromJSVal MediaController where
fromJSVal = return . fmap MediaController . maybeJSNullOrUndefined
instance IsEventTarget MediaController
instance IsGObject MediaController where
typeGType _ = gTypeMediaController
foreign import javascript unsafe "window[\"MediaController\"]" gTypeMediaController :: GType
newtype MediaControlsHost = MediaControlsHost { unMediaControlsHost :: JSVal }
instance Eq (MediaControlsHost) where
(MediaControlsHost a) == (MediaControlsHost b) = js_eq a b
instance PToJSVal MediaControlsHost where
pToJSVal = unMediaControlsHost
instance PFromJSVal MediaControlsHost where
pFromJSVal = MediaControlsHost
instance ToJSVal MediaControlsHost where
toJSVal = return . unMediaControlsHost
instance FromJSVal MediaControlsHost where
fromJSVal = return . fmap MediaControlsHost . maybeJSNullOrUndefined
instance IsGObject MediaControlsHost where
typeGType _ = gTypeMediaControlsHost
foreign import javascript unsafe "window[\"MediaControlsHost\"]" gTypeMediaControlsHost :: GType
newtype MediaElementAudioSourceNode = MediaElementAudioSourceNode { unMediaElementAudioSourceNode :: JSVal }
instance Eq (MediaElementAudioSourceNode) where
(MediaElementAudioSourceNode a) == (MediaElementAudioSourceNode b) = js_eq a b
instance PToJSVal MediaElementAudioSourceNode where
pToJSVal = unMediaElementAudioSourceNode
instance PFromJSVal MediaElementAudioSourceNode where
pFromJSVal = MediaElementAudioSourceNode
instance ToJSVal MediaElementAudioSourceNode where
toJSVal = return . unMediaElementAudioSourceNode
instance FromJSVal MediaElementAudioSourceNode where
fromJSVal = return . fmap MediaElementAudioSourceNode . maybeJSNullOrUndefined
instance IsAudioNode MediaElementAudioSourceNode
instance IsEventTarget MediaElementAudioSourceNode
instance IsGObject MediaElementAudioSourceNode where
typeGType _ = gTypeMediaElementAudioSourceNode
foreign import javascript unsafe "window[\"MediaElementAudioSourceNode\"]" gTypeMediaElementAudioSourceNode :: GType
newtype MediaError = MediaError { unMediaError :: JSVal }
instance Eq (MediaError) where
(MediaError a) == (MediaError b) = js_eq a b
instance PToJSVal MediaError where
pToJSVal = unMediaError
instance PFromJSVal MediaError where
pFromJSVal = MediaError
instance ToJSVal MediaError where
toJSVal = return . unMediaError
instance FromJSVal MediaError where
fromJSVal = return . fmap MediaError . maybeJSNullOrUndefined
instance IsGObject MediaError where
typeGType _ = gTypeMediaError
foreign import javascript unsafe "window[\"MediaError\"]" gTypeMediaError :: GType
newtype MediaKeyError = MediaKeyError { unMediaKeyError :: JSVal }
instance Eq (MediaKeyError) where
(MediaKeyError a) == (MediaKeyError b) = js_eq a b
instance PToJSVal MediaKeyError where
pToJSVal = unMediaKeyError
instance PFromJSVal MediaKeyError where
pFromJSVal = MediaKeyError
instance ToJSVal MediaKeyError where
toJSVal = return . unMediaKeyError
instance FromJSVal MediaKeyError where
fromJSVal = return . fmap MediaKeyError . maybeJSNullOrUndefined
instance IsGObject MediaKeyError where
typeGType _ = gTypeMediaKeyError
foreign import javascript unsafe "window[\"WebKitMediaKeyError\"]" gTypeMediaKeyError :: GType
newtype MediaKeyEvent = MediaKeyEvent { unMediaKeyEvent :: JSVal }
instance Eq (MediaKeyEvent) where
(MediaKeyEvent a) == (MediaKeyEvent b) = js_eq a b
instance PToJSVal MediaKeyEvent where
pToJSVal = unMediaKeyEvent
instance PFromJSVal MediaKeyEvent where
pFromJSVal = MediaKeyEvent
instance ToJSVal MediaKeyEvent where
toJSVal = return . unMediaKeyEvent
instance FromJSVal MediaKeyEvent where
fromJSVal = return . fmap MediaKeyEvent . maybeJSNullOrUndefined
instance IsEvent MediaKeyEvent
instance IsGObject MediaKeyEvent where
typeGType _ = gTypeMediaKeyEvent
foreign import javascript unsafe "window[\"MediaKeyEvent\"]" gTypeMediaKeyEvent :: GType
newtype MediaKeyMessageEvent = MediaKeyMessageEvent { unMediaKeyMessageEvent :: JSVal }
instance Eq (MediaKeyMessageEvent) where
(MediaKeyMessageEvent a) == (MediaKeyMessageEvent b) = js_eq a b
instance PToJSVal MediaKeyMessageEvent where
pToJSVal = unMediaKeyMessageEvent
instance PFromJSVal MediaKeyMessageEvent where
pFromJSVal = MediaKeyMessageEvent
instance ToJSVal MediaKeyMessageEvent where
toJSVal = return . unMediaKeyMessageEvent
instance FromJSVal MediaKeyMessageEvent where
fromJSVal = return . fmap MediaKeyMessageEvent . maybeJSNullOrUndefined
instance IsEvent MediaKeyMessageEvent
instance IsGObject MediaKeyMessageEvent where
typeGType _ = gTypeMediaKeyMessageEvent
foreign import javascript unsafe "window[\"WebKitMediaKeyMessageEvent\"]" gTypeMediaKeyMessageEvent :: GType
newtype MediaKeyNeededEvent = MediaKeyNeededEvent { unMediaKeyNeededEvent :: JSVal }
instance Eq (MediaKeyNeededEvent) where
(MediaKeyNeededEvent a) == (MediaKeyNeededEvent b) = js_eq a b
instance PToJSVal MediaKeyNeededEvent where
pToJSVal = unMediaKeyNeededEvent
instance PFromJSVal MediaKeyNeededEvent where
pFromJSVal = MediaKeyNeededEvent
instance ToJSVal MediaKeyNeededEvent where
toJSVal = return . unMediaKeyNeededEvent
instance FromJSVal MediaKeyNeededEvent where
fromJSVal = return . fmap MediaKeyNeededEvent . maybeJSNullOrUndefined
instance IsEvent MediaKeyNeededEvent
instance IsGObject MediaKeyNeededEvent where
typeGType _ = gTypeMediaKeyNeededEvent
foreign import javascript unsafe "window[\"MediaKeyNeededEvent\"]" gTypeMediaKeyNeededEvent :: GType
newtype MediaKeySession = MediaKeySession { unMediaKeySession :: JSVal }
instance Eq (MediaKeySession) where
(MediaKeySession a) == (MediaKeySession b) = js_eq a b
instance PToJSVal MediaKeySession where
pToJSVal = unMediaKeySession
instance PFromJSVal MediaKeySession where
pFromJSVal = MediaKeySession
instance ToJSVal MediaKeySession where
toJSVal = return . unMediaKeySession
instance FromJSVal MediaKeySession where
fromJSVal = return . fmap MediaKeySession . maybeJSNullOrUndefined
instance IsEventTarget MediaKeySession
instance IsGObject MediaKeySession where
typeGType _ = gTypeMediaKeySession
foreign import javascript unsafe "window[\"WebKitMediaKeySession\"]" gTypeMediaKeySession :: GType
newtype MediaKeys = MediaKeys { unMediaKeys :: JSVal }
instance Eq (MediaKeys) where
(MediaKeys a) == (MediaKeys b) = js_eq a b
instance PToJSVal MediaKeys where
pToJSVal = unMediaKeys
instance PFromJSVal MediaKeys where
pFromJSVal = MediaKeys
instance ToJSVal MediaKeys where
toJSVal = return . unMediaKeys
instance FromJSVal MediaKeys where
fromJSVal = return . fmap MediaKeys . maybeJSNullOrUndefined
instance IsGObject MediaKeys where
typeGType _ = gTypeMediaKeys
foreign import javascript unsafe "window[\"WebKitMediaKeys\"]" gTypeMediaKeys :: GType
newtype MediaList = MediaList { unMediaList :: JSVal }
instance Eq (MediaList) where
(MediaList a) == (MediaList b) = js_eq a b
instance PToJSVal MediaList where
pToJSVal = unMediaList
instance PFromJSVal MediaList where
pFromJSVal = MediaList
instance ToJSVal MediaList where
toJSVal = return . unMediaList
instance FromJSVal MediaList where
fromJSVal = return . fmap MediaList . maybeJSNullOrUndefined
instance IsGObject MediaList where
typeGType _ = gTypeMediaList
foreign import javascript unsafe "window[\"MediaList\"]" gTypeMediaList :: GType
newtype MediaQueryList = MediaQueryList { unMediaQueryList :: JSVal }
instance Eq (MediaQueryList) where
(MediaQueryList a) == (MediaQueryList b) = js_eq a b
instance PToJSVal MediaQueryList where
pToJSVal = unMediaQueryList
instance PFromJSVal MediaQueryList where
pFromJSVal = MediaQueryList
instance ToJSVal MediaQueryList where
toJSVal = return . unMediaQueryList
instance FromJSVal MediaQueryList where
fromJSVal = return . fmap MediaQueryList . maybeJSNullOrUndefined
instance IsGObject MediaQueryList where
typeGType _ = gTypeMediaQueryList
foreign import javascript unsafe "window[\"MediaQueryList\"]" gTypeMediaQueryList :: GType
newtype MediaSource = MediaSource { unMediaSource :: JSVal }
instance Eq (MediaSource) where
(MediaSource a) == (MediaSource b) = js_eq a b
instance PToJSVal MediaSource where
pToJSVal = unMediaSource
instance PFromJSVal MediaSource where
pFromJSVal = MediaSource
instance ToJSVal MediaSource where
toJSVal = return . unMediaSource
instance FromJSVal MediaSource where
fromJSVal = return . fmap MediaSource . maybeJSNullOrUndefined
instance IsEventTarget MediaSource
instance IsGObject MediaSource where
typeGType _ = gTypeMediaSource
foreign import javascript unsafe "window[\"MediaSource\"]" gTypeMediaSource :: GType
newtype MediaSourceStates = MediaSourceStates { unMediaSourceStates :: JSVal }
instance Eq (MediaSourceStates) where
(MediaSourceStates a) == (MediaSourceStates b) = js_eq a b
instance PToJSVal MediaSourceStates where
pToJSVal = unMediaSourceStates
instance PFromJSVal MediaSourceStates where
pFromJSVal = MediaSourceStates
instance ToJSVal MediaSourceStates where
toJSVal = return . unMediaSourceStates
instance FromJSVal MediaSourceStates where
fromJSVal = return . fmap MediaSourceStates . maybeJSNullOrUndefined
instance IsGObject MediaSourceStates where
typeGType _ = gTypeMediaSourceStates
foreign import javascript unsafe "window[\"MediaSourceStates\"]" gTypeMediaSourceStates :: GType
newtype MediaStream = MediaStream { unMediaStream :: JSVal }
instance Eq (MediaStream) where
(MediaStream a) == (MediaStream b) = js_eq a b
instance PToJSVal MediaStream where
pToJSVal = unMediaStream
instance PFromJSVal MediaStream where
pFromJSVal = MediaStream
instance ToJSVal MediaStream where
toJSVal = return . unMediaStream
instance FromJSVal MediaStream where
fromJSVal = return . fmap MediaStream . maybeJSNullOrUndefined
instance IsEventTarget MediaStream
instance IsGObject MediaStream where
typeGType _ = gTypeMediaStream
foreign import javascript unsafe "window[\"webkitMediaStream\"]" gTypeMediaStream :: GType
newtype MediaStreamAudioDestinationNode = MediaStreamAudioDestinationNode { unMediaStreamAudioDestinationNode :: JSVal }
instance Eq (MediaStreamAudioDestinationNode) where
(MediaStreamAudioDestinationNode a) == (MediaStreamAudioDestinationNode b) = js_eq a b
instance PToJSVal MediaStreamAudioDestinationNode where
pToJSVal = unMediaStreamAudioDestinationNode
instance PFromJSVal MediaStreamAudioDestinationNode where
pFromJSVal = MediaStreamAudioDestinationNode
instance ToJSVal MediaStreamAudioDestinationNode where
toJSVal = return . unMediaStreamAudioDestinationNode
instance FromJSVal MediaStreamAudioDestinationNode where
fromJSVal = return . fmap MediaStreamAudioDestinationNode . maybeJSNullOrUndefined
instance IsAudioNode MediaStreamAudioDestinationNode
instance IsEventTarget MediaStreamAudioDestinationNode
instance IsGObject MediaStreamAudioDestinationNode where
typeGType _ = gTypeMediaStreamAudioDestinationNode
foreign import javascript unsafe "window[\"MediaStreamAudioDestinationNode\"]" gTypeMediaStreamAudioDestinationNode :: GType
newtype MediaStreamAudioSourceNode = MediaStreamAudioSourceNode { unMediaStreamAudioSourceNode :: JSVal }
instance Eq (MediaStreamAudioSourceNode) where
(MediaStreamAudioSourceNode a) == (MediaStreamAudioSourceNode b) = js_eq a b
instance PToJSVal MediaStreamAudioSourceNode where
pToJSVal = unMediaStreamAudioSourceNode
instance PFromJSVal MediaStreamAudioSourceNode where
pFromJSVal = MediaStreamAudioSourceNode
instance ToJSVal MediaStreamAudioSourceNode where
toJSVal = return . unMediaStreamAudioSourceNode
instance FromJSVal MediaStreamAudioSourceNode where
fromJSVal = return . fmap MediaStreamAudioSourceNode . maybeJSNullOrUndefined
instance IsAudioNode MediaStreamAudioSourceNode
instance IsEventTarget MediaStreamAudioSourceNode
instance IsGObject MediaStreamAudioSourceNode where
typeGType _ = gTypeMediaStreamAudioSourceNode
foreign import javascript unsafe "window[\"MediaStreamAudioSourceNode\"]" gTypeMediaStreamAudioSourceNode :: GType
newtype MediaStreamCapabilities = MediaStreamCapabilities { unMediaStreamCapabilities :: JSVal }
instance Eq (MediaStreamCapabilities) where
(MediaStreamCapabilities a) == (MediaStreamCapabilities b) = js_eq a b
instance PToJSVal MediaStreamCapabilities where
pToJSVal = unMediaStreamCapabilities
instance PFromJSVal MediaStreamCapabilities where
pFromJSVal = MediaStreamCapabilities
instance ToJSVal MediaStreamCapabilities where
toJSVal = return . unMediaStreamCapabilities
instance FromJSVal MediaStreamCapabilities where
fromJSVal = return . fmap MediaStreamCapabilities . maybeJSNullOrUndefined
class IsGObject o => IsMediaStreamCapabilities o
toMediaStreamCapabilities :: IsMediaStreamCapabilities o => o -> MediaStreamCapabilities
toMediaStreamCapabilities = MediaStreamCapabilities . coerce
instance IsMediaStreamCapabilities MediaStreamCapabilities
instance IsGObject MediaStreamCapabilities where
typeGType _ = gTypeMediaStreamCapabilities
foreign import javascript unsafe "window[\"MediaStreamCapabilities\"]" gTypeMediaStreamCapabilities :: GType
newtype MediaStreamEvent = MediaStreamEvent { unMediaStreamEvent :: JSVal }
instance Eq (MediaStreamEvent) where
(MediaStreamEvent a) == (MediaStreamEvent b) = js_eq a b
instance PToJSVal MediaStreamEvent where
pToJSVal = unMediaStreamEvent
instance PFromJSVal MediaStreamEvent where
pFromJSVal = MediaStreamEvent
instance ToJSVal MediaStreamEvent where
toJSVal = return . unMediaStreamEvent
instance FromJSVal MediaStreamEvent where
fromJSVal = return . fmap MediaStreamEvent . maybeJSNullOrUndefined
instance IsEvent MediaStreamEvent
instance IsGObject MediaStreamEvent where
typeGType _ = gTypeMediaStreamEvent
foreign import javascript unsafe "window[\"MediaStreamEvent\"]" gTypeMediaStreamEvent :: GType
newtype MediaStreamTrack = MediaStreamTrack { unMediaStreamTrack :: JSVal }
instance Eq (MediaStreamTrack) where
(MediaStreamTrack a) == (MediaStreamTrack b) = js_eq a b
instance PToJSVal MediaStreamTrack where
pToJSVal = unMediaStreamTrack
instance PFromJSVal MediaStreamTrack where
pFromJSVal = MediaStreamTrack
instance ToJSVal MediaStreamTrack where
toJSVal = return . unMediaStreamTrack
instance FromJSVal MediaStreamTrack where
fromJSVal = return . fmap MediaStreamTrack . maybeJSNullOrUndefined
class IsEventTarget o => IsMediaStreamTrack o
toMediaStreamTrack :: IsMediaStreamTrack o => o -> MediaStreamTrack
toMediaStreamTrack = MediaStreamTrack . coerce
instance IsMediaStreamTrack MediaStreamTrack
instance IsEventTarget MediaStreamTrack
instance IsGObject MediaStreamTrack where
typeGType _ = gTypeMediaStreamTrack
foreign import javascript unsafe "window[\"MediaStreamTrack\"]" gTypeMediaStreamTrack :: GType
newtype MediaStreamTrackEvent = MediaStreamTrackEvent { unMediaStreamTrackEvent :: JSVal }
instance Eq (MediaStreamTrackEvent) where
(MediaStreamTrackEvent a) == (MediaStreamTrackEvent b) = js_eq a b
instance PToJSVal MediaStreamTrackEvent where
pToJSVal = unMediaStreamTrackEvent
instance PFromJSVal MediaStreamTrackEvent where
pFromJSVal = MediaStreamTrackEvent
instance ToJSVal MediaStreamTrackEvent where
toJSVal = return . unMediaStreamTrackEvent
instance FromJSVal MediaStreamTrackEvent where
fromJSVal = return . fmap MediaStreamTrackEvent . maybeJSNullOrUndefined
instance IsEvent MediaStreamTrackEvent
instance IsGObject MediaStreamTrackEvent where
typeGType _ = gTypeMediaStreamTrackEvent
foreign import javascript unsafe "window[\"MediaStreamTrackEvent\"]" gTypeMediaStreamTrackEvent :: GType
newtype MediaTrackConstraint = MediaTrackConstraint { unMediaTrackConstraint :: JSVal }
instance Eq (MediaTrackConstraint) where
(MediaTrackConstraint a) == (MediaTrackConstraint b) = js_eq a b
instance PToJSVal MediaTrackConstraint where
pToJSVal = unMediaTrackConstraint
instance PFromJSVal MediaTrackConstraint where
pFromJSVal = MediaTrackConstraint
instance ToJSVal MediaTrackConstraint where
toJSVal = return . unMediaTrackConstraint
instance FromJSVal MediaTrackConstraint where
fromJSVal = return . fmap MediaTrackConstraint . maybeJSNullOrUndefined
instance IsGObject MediaTrackConstraint where
typeGType _ = gTypeMediaTrackConstraint
foreign import javascript unsafe "window[\"MediaTrackConstraint\"]" gTypeMediaTrackConstraint :: GType
newtype MediaTrackConstraintSet = MediaTrackConstraintSet { unMediaTrackConstraintSet :: JSVal }
instance Eq (MediaTrackConstraintSet) where
(MediaTrackConstraintSet a) == (MediaTrackConstraintSet b) = js_eq a b
instance PToJSVal MediaTrackConstraintSet where
pToJSVal = unMediaTrackConstraintSet
instance PFromJSVal MediaTrackConstraintSet where
pFromJSVal = MediaTrackConstraintSet
instance ToJSVal MediaTrackConstraintSet where
toJSVal = return . unMediaTrackConstraintSet
instance FromJSVal MediaTrackConstraintSet where
fromJSVal = return . fmap MediaTrackConstraintSet . maybeJSNullOrUndefined
instance IsGObject MediaTrackConstraintSet where
typeGType _ = gTypeMediaTrackConstraintSet
foreign import javascript unsafe "window[\"MediaTrackConstraintSet\"]" gTypeMediaTrackConstraintSet :: GType
newtype MediaTrackConstraints = MediaTrackConstraints { unMediaTrackConstraints :: JSVal }
instance Eq (MediaTrackConstraints) where
(MediaTrackConstraints a) == (MediaTrackConstraints b) = js_eq a b
instance PToJSVal MediaTrackConstraints where
pToJSVal = unMediaTrackConstraints
instance PFromJSVal MediaTrackConstraints where
pFromJSVal = MediaTrackConstraints
instance ToJSVal MediaTrackConstraints where
toJSVal = return . unMediaTrackConstraints
instance FromJSVal MediaTrackConstraints where
fromJSVal = return . fmap MediaTrackConstraints . maybeJSNullOrUndefined
instance IsGObject MediaTrackConstraints where
typeGType _ = gTypeMediaTrackConstraints
foreign import javascript unsafe "window[\"MediaTrackConstraints\"]" gTypeMediaTrackConstraints :: GType
newtype MemoryInfo = MemoryInfo { unMemoryInfo :: JSVal }
instance Eq (MemoryInfo) where
(MemoryInfo a) == (MemoryInfo b) = js_eq a b
instance PToJSVal MemoryInfo where
pToJSVal = unMemoryInfo
instance PFromJSVal MemoryInfo where
pFromJSVal = MemoryInfo
instance ToJSVal MemoryInfo where
toJSVal = return . unMemoryInfo
instance FromJSVal MemoryInfo where
fromJSVal = return . fmap MemoryInfo . maybeJSNullOrUndefined
instance IsGObject MemoryInfo where
typeGType _ = gTypeMemoryInfo
foreign import javascript unsafe "window[\"MemoryInfo\"]" gTypeMemoryInfo :: GType
newtype MessageChannel = MessageChannel { unMessageChannel :: JSVal }
instance Eq (MessageChannel) where
(MessageChannel a) == (MessageChannel b) = js_eq a b
instance PToJSVal MessageChannel where
pToJSVal = unMessageChannel
instance PFromJSVal MessageChannel where
pFromJSVal = MessageChannel
instance ToJSVal MessageChannel where
toJSVal = return . unMessageChannel
instance FromJSVal MessageChannel where
fromJSVal = return . fmap MessageChannel . maybeJSNullOrUndefined
instance IsGObject MessageChannel where
typeGType _ = gTypeMessageChannel
foreign import javascript unsafe "window[\"MessageChannel\"]" gTypeMessageChannel :: GType
newtype MessageEvent = MessageEvent { unMessageEvent :: JSVal }
instance Eq (MessageEvent) where
(MessageEvent a) == (MessageEvent b) = js_eq a b
instance PToJSVal MessageEvent where
pToJSVal = unMessageEvent
instance PFromJSVal MessageEvent where
pFromJSVal = MessageEvent
instance ToJSVal MessageEvent where
toJSVal = return . unMessageEvent
instance FromJSVal MessageEvent where
fromJSVal = return . fmap MessageEvent . maybeJSNullOrUndefined
instance IsEvent MessageEvent
instance IsGObject MessageEvent where
typeGType _ = gTypeMessageEvent
foreign import javascript unsafe "window[\"MessageEvent\"]" gTypeMessageEvent :: GType
newtype MessagePort = MessagePort { unMessagePort :: JSVal }
instance Eq (MessagePort) where
(MessagePort a) == (MessagePort b) = js_eq a b
instance PToJSVal MessagePort where
pToJSVal = unMessagePort
instance PFromJSVal MessagePort where
pFromJSVal = MessagePort
instance ToJSVal MessagePort where
toJSVal = return . unMessagePort
instance FromJSVal MessagePort where
fromJSVal = return . fmap MessagePort . maybeJSNullOrUndefined
instance IsEventTarget MessagePort
instance IsGObject MessagePort where
typeGType _ = gTypeMessagePort
foreign import javascript unsafe "window[\"MessagePort\"]" gTypeMessagePort :: GType
newtype MimeType = MimeType { unMimeType :: JSVal }
instance Eq (MimeType) where
(MimeType a) == (MimeType b) = js_eq a b
instance PToJSVal MimeType where
pToJSVal = unMimeType
instance PFromJSVal MimeType where
pFromJSVal = MimeType
instance ToJSVal MimeType where
toJSVal = return . unMimeType
instance FromJSVal MimeType where
fromJSVal = return . fmap MimeType . maybeJSNullOrUndefined
instance IsGObject MimeType where
typeGType _ = gTypeMimeType
foreign import javascript unsafe "window[\"MimeType\"]" gTypeMimeType :: GType
newtype MimeTypeArray = MimeTypeArray { unMimeTypeArray :: JSVal }
instance Eq (MimeTypeArray) where
(MimeTypeArray a) == (MimeTypeArray b) = js_eq a b
instance PToJSVal MimeTypeArray where
pToJSVal = unMimeTypeArray
instance PFromJSVal MimeTypeArray where
pFromJSVal = MimeTypeArray
instance ToJSVal MimeTypeArray where
toJSVal = return . unMimeTypeArray
instance FromJSVal MimeTypeArray where
fromJSVal = return . fmap MimeTypeArray . maybeJSNullOrUndefined
instance IsGObject MimeTypeArray where
typeGType _ = gTypeMimeTypeArray
foreign import javascript unsafe "window[\"MimeTypeArray\"]" gTypeMimeTypeArray :: GType
newtype MouseEvent = MouseEvent { unMouseEvent :: JSVal }
instance Eq (MouseEvent) where
(MouseEvent a) == (MouseEvent b) = js_eq a b
instance PToJSVal MouseEvent where
pToJSVal = unMouseEvent
instance PFromJSVal MouseEvent where
pFromJSVal = MouseEvent
instance ToJSVal MouseEvent where
toJSVal = return . unMouseEvent
instance FromJSVal MouseEvent where
fromJSVal = return . fmap MouseEvent . maybeJSNullOrUndefined
class IsUIEvent o => IsMouseEvent o
toMouseEvent :: IsMouseEvent o => o -> MouseEvent
toMouseEvent = MouseEvent . coerce
instance IsMouseEvent MouseEvent
instance IsUIEvent MouseEvent
instance IsEvent MouseEvent
instance IsGObject MouseEvent where
typeGType _ = gTypeMouseEvent
foreign import javascript unsafe "window[\"MouseEvent\"]" gTypeMouseEvent :: GType
newtype MutationEvent = MutationEvent { unMutationEvent :: JSVal }
instance Eq (MutationEvent) where
(MutationEvent a) == (MutationEvent b) = js_eq a b
instance PToJSVal MutationEvent where
pToJSVal = unMutationEvent
instance PFromJSVal MutationEvent where
pFromJSVal = MutationEvent
instance ToJSVal MutationEvent where
toJSVal = return . unMutationEvent
instance FromJSVal MutationEvent where
fromJSVal = return . fmap MutationEvent . maybeJSNullOrUndefined
instance IsEvent MutationEvent
instance IsGObject MutationEvent where
typeGType _ = gTypeMutationEvent
foreign import javascript unsafe "window[\"MutationEvent\"]" gTypeMutationEvent :: GType
newtype MutationObserver = MutationObserver { unMutationObserver :: JSVal }
instance Eq (MutationObserver) where
(MutationObserver a) == (MutationObserver b) = js_eq a b
instance PToJSVal MutationObserver where
pToJSVal = unMutationObserver
instance PFromJSVal MutationObserver where
pFromJSVal = MutationObserver
instance ToJSVal MutationObserver where
toJSVal = return . unMutationObserver
instance FromJSVal MutationObserver where
fromJSVal = return . fmap MutationObserver . maybeJSNullOrUndefined
instance IsGObject MutationObserver where
typeGType _ = gTypeMutationObserver
foreign import javascript unsafe "window[\"MutationObserver\"]" gTypeMutationObserver :: GType
newtype MutationRecord = MutationRecord { unMutationRecord :: JSVal }
instance Eq (MutationRecord) where
(MutationRecord a) == (MutationRecord b) = js_eq a b
instance PToJSVal MutationRecord where
pToJSVal = unMutationRecord
instance PFromJSVal MutationRecord where
pFromJSVal = MutationRecord
instance ToJSVal MutationRecord where
toJSVal = return . unMutationRecord
instance FromJSVal MutationRecord where
fromJSVal = return . fmap MutationRecord . maybeJSNullOrUndefined
instance IsGObject MutationRecord where
typeGType _ = gTypeMutationRecord
foreign import javascript unsafe "window[\"MutationRecord\"]" gTypeMutationRecord :: GType
newtype NamedNodeMap = NamedNodeMap { unNamedNodeMap :: JSVal }
instance Eq (NamedNodeMap) where
(NamedNodeMap a) == (NamedNodeMap b) = js_eq a b
instance PToJSVal NamedNodeMap where
pToJSVal = unNamedNodeMap
instance PFromJSVal NamedNodeMap where
pFromJSVal = NamedNodeMap
instance ToJSVal NamedNodeMap where
toJSVal = return . unNamedNodeMap
instance FromJSVal NamedNodeMap where
fromJSVal = return . fmap NamedNodeMap . maybeJSNullOrUndefined
instance IsGObject NamedNodeMap where
typeGType _ = gTypeNamedNodeMap
foreign import javascript unsafe "window[\"NamedNodeMap\"]" gTypeNamedNodeMap :: GType
newtype Navigator = Navigator { unNavigator :: JSVal }
instance Eq (Navigator) where
(Navigator a) == (Navigator b) = js_eq a b
instance PToJSVal Navigator where
pToJSVal = unNavigator
instance PFromJSVal Navigator where
pFromJSVal = Navigator
instance ToJSVal Navigator where
toJSVal = return . unNavigator
instance FromJSVal Navigator where
fromJSVal = return . fmap Navigator . maybeJSNullOrUndefined
instance IsGObject Navigator where
typeGType _ = gTypeNavigator
foreign import javascript unsafe "window[\"Navigator\"]" gTypeNavigator :: GType
newtype NavigatorUserMediaError = NavigatorUserMediaError { unNavigatorUserMediaError :: JSVal }
instance Eq (NavigatorUserMediaError) where
(NavigatorUserMediaError a) == (NavigatorUserMediaError b) = js_eq a b
instance PToJSVal NavigatorUserMediaError where
pToJSVal = unNavigatorUserMediaError
instance PFromJSVal NavigatorUserMediaError where
pFromJSVal = NavigatorUserMediaError
instance ToJSVal NavigatorUserMediaError where
toJSVal = return . unNavigatorUserMediaError
instance FromJSVal NavigatorUserMediaError where
fromJSVal = return . fmap NavigatorUserMediaError . maybeJSNullOrUndefined
instance IsDOMError NavigatorUserMediaError
instance IsGObject NavigatorUserMediaError where
typeGType _ = gTypeNavigatorUserMediaError
foreign import javascript unsafe "window[\"NavigatorUserMediaError\"]" gTypeNavigatorUserMediaError :: GType
newtype Node = Node { unNode :: JSVal }
instance Eq (Node) where
(Node a) == (Node b) = js_eq a b
instance PToJSVal Node where
pToJSVal = unNode
instance PFromJSVal Node where
pFromJSVal = Node
instance ToJSVal Node where
toJSVal = return . unNode
instance FromJSVal Node where
fromJSVal = return . fmap Node . maybeJSNullOrUndefined
class IsEventTarget o => IsNode o
toNode :: IsNode o => o -> Node
toNode = Node . coerce
instance IsNode Node
instance IsEventTarget Node
instance IsGObject Node where
typeGType _ = gTypeNode
foreign import javascript unsafe "window[\"Node\"]" gTypeNode :: GType
newtype NodeFilter = NodeFilter { unNodeFilter :: JSVal }
instance Eq (NodeFilter) where
(NodeFilter a) == (NodeFilter b) = js_eq a b
instance PToJSVal NodeFilter where
pToJSVal = unNodeFilter
instance PFromJSVal NodeFilter where
pFromJSVal = NodeFilter
instance ToJSVal NodeFilter where
toJSVal = return . unNodeFilter
instance FromJSVal NodeFilter where
fromJSVal = return . fmap NodeFilter . maybeJSNullOrUndefined
instance IsGObject NodeFilter where
typeGType _ = gTypeNodeFilter
foreign import javascript unsafe "window[\"NodeFilter\"]" gTypeNodeFilter :: GType
newtype NodeIterator = NodeIterator { unNodeIterator :: JSVal }
instance Eq (NodeIterator) where
(NodeIterator a) == (NodeIterator b) = js_eq a b
instance PToJSVal NodeIterator where
pToJSVal = unNodeIterator
instance PFromJSVal NodeIterator where
pFromJSVal = NodeIterator
instance ToJSVal NodeIterator where
toJSVal = return . unNodeIterator
instance FromJSVal NodeIterator where
fromJSVal = return . fmap NodeIterator . maybeJSNullOrUndefined
instance IsGObject NodeIterator where
typeGType _ = gTypeNodeIterator
foreign import javascript unsafe "window[\"NodeIterator\"]" gTypeNodeIterator :: GType
newtype NodeList = NodeList { unNodeList :: JSVal }
instance Eq (NodeList) where
(NodeList a) == (NodeList b) = js_eq a b
instance PToJSVal NodeList where
pToJSVal = unNodeList
instance PFromJSVal NodeList where
pFromJSVal = NodeList
instance ToJSVal NodeList where
toJSVal = return . unNodeList
instance FromJSVal NodeList where
fromJSVal = return . fmap NodeList . maybeJSNullOrUndefined
class IsGObject o => IsNodeList o
toNodeList :: IsNodeList o => o -> NodeList
toNodeList = NodeList . coerce
instance IsNodeList NodeList
instance IsGObject NodeList where
typeGType _ = gTypeNodeList
foreign import javascript unsafe "window[\"NodeList\"]" gTypeNodeList :: GType
newtype Notification = Notification { unNotification :: JSVal }
instance Eq (Notification) where
(Notification a) == (Notification b) = js_eq a b
instance PToJSVal Notification where
pToJSVal = unNotification
instance PFromJSVal Notification where
pFromJSVal = Notification
instance ToJSVal Notification where
toJSVal = return . unNotification
instance FromJSVal Notification where
fromJSVal = return . fmap Notification . maybeJSNullOrUndefined
instance IsEventTarget Notification
instance IsGObject Notification where
typeGType _ = gTypeNotification
foreign import javascript unsafe "window[\"Notification\"]" gTypeNotification :: GType
newtype NotificationCenter = NotificationCenter { unNotificationCenter :: JSVal }
instance Eq (NotificationCenter) where
(NotificationCenter a) == (NotificationCenter b) = js_eq a b
instance PToJSVal NotificationCenter where
pToJSVal = unNotificationCenter
instance PFromJSVal NotificationCenter where
pFromJSVal = NotificationCenter
instance ToJSVal NotificationCenter where
toJSVal = return . unNotificationCenter
instance FromJSVal NotificationCenter where
fromJSVal = return . fmap NotificationCenter . maybeJSNullOrUndefined
instance IsGObject NotificationCenter where
typeGType _ = gTypeNotificationCenter
foreign import javascript unsafe "window[\"NotificationCenter\"]" gTypeNotificationCenter :: GType
newtype OESElementIndexUint = OESElementIndexUint { unOESElementIndexUint :: JSVal }
instance Eq (OESElementIndexUint) where
(OESElementIndexUint a) == (OESElementIndexUint b) = js_eq a b
instance PToJSVal OESElementIndexUint where
pToJSVal = unOESElementIndexUint
instance PFromJSVal OESElementIndexUint where
pFromJSVal = OESElementIndexUint
instance ToJSVal OESElementIndexUint where
toJSVal = return . unOESElementIndexUint
instance FromJSVal OESElementIndexUint where
fromJSVal = return . fmap OESElementIndexUint . maybeJSNullOrUndefined
instance IsGObject OESElementIndexUint where
typeGType _ = gTypeOESElementIndexUint
foreign import javascript unsafe "window[\"OESElementIndexUint\"]" gTypeOESElementIndexUint :: GType
newtype OESStandardDerivatives = OESStandardDerivatives { unOESStandardDerivatives :: JSVal }
instance Eq (OESStandardDerivatives) where
(OESStandardDerivatives a) == (OESStandardDerivatives b) = js_eq a b
instance PToJSVal OESStandardDerivatives where
pToJSVal = unOESStandardDerivatives
instance PFromJSVal OESStandardDerivatives where
pFromJSVal = OESStandardDerivatives
instance ToJSVal OESStandardDerivatives where
toJSVal = return . unOESStandardDerivatives
instance FromJSVal OESStandardDerivatives where
fromJSVal = return . fmap OESStandardDerivatives . maybeJSNullOrUndefined
instance IsGObject OESStandardDerivatives where
typeGType _ = gTypeOESStandardDerivatives
foreign import javascript unsafe "window[\"OESStandardDerivatives\"]" gTypeOESStandardDerivatives :: GType
newtype OESTextureFloat = OESTextureFloat { unOESTextureFloat :: JSVal }
instance Eq (OESTextureFloat) where
(OESTextureFloat a) == (OESTextureFloat b) = js_eq a b
instance PToJSVal OESTextureFloat where
pToJSVal = unOESTextureFloat
instance PFromJSVal OESTextureFloat where
pFromJSVal = OESTextureFloat
instance ToJSVal OESTextureFloat where
toJSVal = return . unOESTextureFloat
instance FromJSVal OESTextureFloat where
fromJSVal = return . fmap OESTextureFloat . maybeJSNullOrUndefined
instance IsGObject OESTextureFloat where
typeGType _ = gTypeOESTextureFloat
foreign import javascript unsafe "window[\"OESTextureFloat\"]" gTypeOESTextureFloat :: GType
newtype OESTextureFloatLinear = OESTextureFloatLinear { unOESTextureFloatLinear :: JSVal }
instance Eq (OESTextureFloatLinear) where
(OESTextureFloatLinear a) == (OESTextureFloatLinear b) = js_eq a b
instance PToJSVal OESTextureFloatLinear where
pToJSVal = unOESTextureFloatLinear
instance PFromJSVal OESTextureFloatLinear where
pFromJSVal = OESTextureFloatLinear
instance ToJSVal OESTextureFloatLinear where
toJSVal = return . unOESTextureFloatLinear
instance FromJSVal OESTextureFloatLinear where
fromJSVal = return . fmap OESTextureFloatLinear . maybeJSNullOrUndefined
instance IsGObject OESTextureFloatLinear where
typeGType _ = gTypeOESTextureFloatLinear
foreign import javascript unsafe "window[\"OESTextureFloatLinear\"]" gTypeOESTextureFloatLinear :: GType
newtype OESTextureHalfFloat = OESTextureHalfFloat { unOESTextureHalfFloat :: JSVal }
instance Eq (OESTextureHalfFloat) where
(OESTextureHalfFloat a) == (OESTextureHalfFloat b) = js_eq a b
instance PToJSVal OESTextureHalfFloat where
pToJSVal = unOESTextureHalfFloat
instance PFromJSVal OESTextureHalfFloat where
pFromJSVal = OESTextureHalfFloat
instance ToJSVal OESTextureHalfFloat where
toJSVal = return . unOESTextureHalfFloat
instance FromJSVal OESTextureHalfFloat where
fromJSVal = return . fmap OESTextureHalfFloat . maybeJSNullOrUndefined
instance IsGObject OESTextureHalfFloat where
typeGType _ = gTypeOESTextureHalfFloat
foreign import javascript unsafe "window[\"OESTextureHalfFloat\"]" gTypeOESTextureHalfFloat :: GType
newtype OESTextureHalfFloatLinear = OESTextureHalfFloatLinear { unOESTextureHalfFloatLinear :: JSVal }
instance Eq (OESTextureHalfFloatLinear) where
(OESTextureHalfFloatLinear a) == (OESTextureHalfFloatLinear b) = js_eq a b
instance PToJSVal OESTextureHalfFloatLinear where
pToJSVal = unOESTextureHalfFloatLinear
instance PFromJSVal OESTextureHalfFloatLinear where
pFromJSVal = OESTextureHalfFloatLinear
instance ToJSVal OESTextureHalfFloatLinear where
toJSVal = return . unOESTextureHalfFloatLinear
instance FromJSVal OESTextureHalfFloatLinear where
fromJSVal = return . fmap OESTextureHalfFloatLinear . maybeJSNullOrUndefined
instance IsGObject OESTextureHalfFloatLinear where
typeGType _ = gTypeOESTextureHalfFloatLinear
foreign import javascript unsafe "window[\"OESTextureHalfFloatLinear\"]" gTypeOESTextureHalfFloatLinear :: GType
newtype OESVertexArrayObject = OESVertexArrayObject { unOESVertexArrayObject :: JSVal }
instance Eq (OESVertexArrayObject) where
(OESVertexArrayObject a) == (OESVertexArrayObject b) = js_eq a b
instance PToJSVal OESVertexArrayObject where
pToJSVal = unOESVertexArrayObject
instance PFromJSVal OESVertexArrayObject where
pFromJSVal = OESVertexArrayObject
instance ToJSVal OESVertexArrayObject where
toJSVal = return . unOESVertexArrayObject
instance FromJSVal OESVertexArrayObject where
fromJSVal = return . fmap OESVertexArrayObject . maybeJSNullOrUndefined
instance IsGObject OESVertexArrayObject where
typeGType _ = gTypeOESVertexArrayObject
foreign import javascript unsafe "window[\"OESVertexArrayObject\"]" gTypeOESVertexArrayObject :: GType
newtype OfflineAudioCompletionEvent = OfflineAudioCompletionEvent { unOfflineAudioCompletionEvent :: JSVal }
instance Eq (OfflineAudioCompletionEvent) where
(OfflineAudioCompletionEvent a) == (OfflineAudioCompletionEvent b) = js_eq a b
instance PToJSVal OfflineAudioCompletionEvent where
pToJSVal = unOfflineAudioCompletionEvent
instance PFromJSVal OfflineAudioCompletionEvent where
pFromJSVal = OfflineAudioCompletionEvent
instance ToJSVal OfflineAudioCompletionEvent where
toJSVal = return . unOfflineAudioCompletionEvent
instance FromJSVal OfflineAudioCompletionEvent where
fromJSVal = return . fmap OfflineAudioCompletionEvent . maybeJSNullOrUndefined
instance IsEvent OfflineAudioCompletionEvent
instance IsGObject OfflineAudioCompletionEvent where
typeGType _ = gTypeOfflineAudioCompletionEvent
foreign import javascript unsafe "window[\"OfflineAudioCompletionEvent\"]" gTypeOfflineAudioCompletionEvent :: GType
newtype OfflineAudioContext = OfflineAudioContext { unOfflineAudioContext :: JSVal }
instance Eq (OfflineAudioContext) where
(OfflineAudioContext a) == (OfflineAudioContext b) = js_eq a b
instance PToJSVal OfflineAudioContext where
pToJSVal = unOfflineAudioContext
instance PFromJSVal OfflineAudioContext where
pFromJSVal = OfflineAudioContext
instance ToJSVal OfflineAudioContext where
toJSVal = return . unOfflineAudioContext
instance FromJSVal OfflineAudioContext where
fromJSVal = return . fmap OfflineAudioContext . maybeJSNullOrUndefined
instance IsAudioContext OfflineAudioContext
instance IsEventTarget OfflineAudioContext
instance IsGObject OfflineAudioContext where
typeGType _ = gTypeOfflineAudioContext
foreign import javascript unsafe "window[\"OfflineAudioContext\"]" gTypeOfflineAudioContext :: GType
newtype OscillatorNode = OscillatorNode { unOscillatorNode :: JSVal }
instance Eq (OscillatorNode) where
(OscillatorNode a) == (OscillatorNode b) = js_eq a b
instance PToJSVal OscillatorNode where
pToJSVal = unOscillatorNode
instance PFromJSVal OscillatorNode where
pFromJSVal = OscillatorNode
instance ToJSVal OscillatorNode where
toJSVal = return . unOscillatorNode
instance FromJSVal OscillatorNode where
fromJSVal = return . fmap OscillatorNode . maybeJSNullOrUndefined
instance IsAudioNode OscillatorNode
instance IsEventTarget OscillatorNode
instance IsGObject OscillatorNode where
typeGType _ = gTypeOscillatorNode
foreign import javascript unsafe "window[\"OscillatorNode\"]" gTypeOscillatorNode :: GType
newtype OverflowEvent = OverflowEvent { unOverflowEvent :: JSVal }
instance Eq (OverflowEvent) where
(OverflowEvent a) == (OverflowEvent b) = js_eq a b
instance PToJSVal OverflowEvent where
pToJSVal = unOverflowEvent
instance PFromJSVal OverflowEvent where
pFromJSVal = OverflowEvent
instance ToJSVal OverflowEvent where
toJSVal = return . unOverflowEvent
instance FromJSVal OverflowEvent where
fromJSVal = return . fmap OverflowEvent . maybeJSNullOrUndefined
instance IsEvent OverflowEvent
instance IsGObject OverflowEvent where
typeGType _ = gTypeOverflowEvent
foreign import javascript unsafe "window[\"OverflowEvent\"]" gTypeOverflowEvent :: GType
newtype PageTransitionEvent = PageTransitionEvent { unPageTransitionEvent :: JSVal }
instance Eq (PageTransitionEvent) where
(PageTransitionEvent a) == (PageTransitionEvent b) = js_eq a b
instance PToJSVal PageTransitionEvent where
pToJSVal = unPageTransitionEvent
instance PFromJSVal PageTransitionEvent where
pFromJSVal = PageTransitionEvent
instance ToJSVal PageTransitionEvent where
toJSVal = return . unPageTransitionEvent
instance FromJSVal PageTransitionEvent where
fromJSVal = return . fmap PageTransitionEvent . maybeJSNullOrUndefined
instance IsEvent PageTransitionEvent
instance IsGObject PageTransitionEvent where
typeGType _ = gTypePageTransitionEvent
foreign import javascript unsafe "window[\"PageTransitionEvent\"]" gTypePageTransitionEvent :: GType
newtype PannerNode = PannerNode { unPannerNode :: JSVal }
instance Eq (PannerNode) where
(PannerNode a) == (PannerNode b) = js_eq a b
instance PToJSVal PannerNode where
pToJSVal = unPannerNode
instance PFromJSVal PannerNode where
pFromJSVal = PannerNode
instance ToJSVal PannerNode where
toJSVal = return . unPannerNode
instance FromJSVal PannerNode where
fromJSVal = return . fmap PannerNode . maybeJSNullOrUndefined
instance IsAudioNode PannerNode
instance IsEventTarget PannerNode
instance IsGObject PannerNode where
typeGType _ = gTypePannerNode
foreign import javascript unsafe "window[\"webkitAudioPannerNode\"]" gTypePannerNode :: GType
newtype Path2D = Path2D { unPath2D :: JSVal }
instance Eq (Path2D) where
(Path2D a) == (Path2D b) = js_eq a b
instance PToJSVal Path2D where
pToJSVal = unPath2D
instance PFromJSVal Path2D where
pFromJSVal = Path2D
instance ToJSVal Path2D where
toJSVal = return . unPath2D
instance FromJSVal Path2D where
fromJSVal = return . fmap Path2D . maybeJSNullOrUndefined
instance IsGObject Path2D where
typeGType _ = gTypePath2D
foreign import javascript unsafe "window[\"Path2D\"]" gTypePath2D :: GType
newtype Performance = Performance { unPerformance :: JSVal }
instance Eq (Performance) where
(Performance a) == (Performance b) = js_eq a b
instance PToJSVal Performance where
pToJSVal = unPerformance
instance PFromJSVal Performance where
pFromJSVal = Performance
instance ToJSVal Performance where
toJSVal = return . unPerformance
instance FromJSVal Performance where
fromJSVal = return . fmap Performance . maybeJSNullOrUndefined
instance IsEventTarget Performance
instance IsGObject Performance where
typeGType _ = gTypePerformance
foreign import javascript unsafe "window[\"Performance\"]" gTypePerformance :: GType
newtype PerformanceEntry = PerformanceEntry { unPerformanceEntry :: JSVal }
instance Eq (PerformanceEntry) where
(PerformanceEntry a) == (PerformanceEntry b) = js_eq a b
instance PToJSVal PerformanceEntry where
pToJSVal = unPerformanceEntry
instance PFromJSVal PerformanceEntry where
pFromJSVal = PerformanceEntry
instance ToJSVal PerformanceEntry where
toJSVal = return . unPerformanceEntry
instance FromJSVal PerformanceEntry where
fromJSVal = return . fmap PerformanceEntry . maybeJSNullOrUndefined
class IsGObject o => IsPerformanceEntry o
toPerformanceEntry :: IsPerformanceEntry o => o -> PerformanceEntry
toPerformanceEntry = PerformanceEntry . coerce
instance IsPerformanceEntry PerformanceEntry
instance IsGObject PerformanceEntry where
typeGType _ = gTypePerformanceEntry
foreign import javascript unsafe "window[\"PerformanceEntry\"]" gTypePerformanceEntry :: GType
newtype PerformanceEntryList = PerformanceEntryList { unPerformanceEntryList :: JSVal }
instance Eq (PerformanceEntryList) where
(PerformanceEntryList a) == (PerformanceEntryList b) = js_eq a b
instance PToJSVal PerformanceEntryList where
pToJSVal = unPerformanceEntryList
instance PFromJSVal PerformanceEntryList where
pFromJSVal = PerformanceEntryList
instance ToJSVal PerformanceEntryList where
toJSVal = return . unPerformanceEntryList
instance FromJSVal PerformanceEntryList where
fromJSVal = return . fmap PerformanceEntryList . maybeJSNullOrUndefined
instance IsGObject PerformanceEntryList where
typeGType _ = gTypePerformanceEntryList
foreign import javascript unsafe "window[\"PerformanceEntryList\"]" gTypePerformanceEntryList :: GType
newtype PerformanceMark = PerformanceMark { unPerformanceMark :: JSVal }
instance Eq (PerformanceMark) where
(PerformanceMark a) == (PerformanceMark b) = js_eq a b
instance PToJSVal PerformanceMark where
pToJSVal = unPerformanceMark
instance PFromJSVal PerformanceMark where
pFromJSVal = PerformanceMark
instance ToJSVal PerformanceMark where
toJSVal = return . unPerformanceMark
instance FromJSVal PerformanceMark where
fromJSVal = return . fmap PerformanceMark . maybeJSNullOrUndefined
instance IsPerformanceEntry PerformanceMark
instance IsGObject PerformanceMark where
typeGType _ = gTypePerformanceMark
foreign import javascript unsafe "window[\"PerformanceMark\"]" gTypePerformanceMark :: GType
newtype PerformanceMeasure = PerformanceMeasure { unPerformanceMeasure :: JSVal }
instance Eq (PerformanceMeasure) where
(PerformanceMeasure a) == (PerformanceMeasure b) = js_eq a b
instance PToJSVal PerformanceMeasure where
pToJSVal = unPerformanceMeasure
instance PFromJSVal PerformanceMeasure where
pFromJSVal = PerformanceMeasure
instance ToJSVal PerformanceMeasure where
toJSVal = return . unPerformanceMeasure
instance FromJSVal PerformanceMeasure where
fromJSVal = return . fmap PerformanceMeasure . maybeJSNullOrUndefined
instance IsPerformanceEntry PerformanceMeasure
instance IsGObject PerformanceMeasure where
typeGType _ = gTypePerformanceMeasure
foreign import javascript unsafe "window[\"PerformanceMeasure\"]" gTypePerformanceMeasure :: GType
newtype PerformanceNavigation = PerformanceNavigation { unPerformanceNavigation :: JSVal }
instance Eq (PerformanceNavigation) where
(PerformanceNavigation a) == (PerformanceNavigation b) = js_eq a b
instance PToJSVal PerformanceNavigation where
pToJSVal = unPerformanceNavigation
instance PFromJSVal PerformanceNavigation where
pFromJSVal = PerformanceNavigation
instance ToJSVal PerformanceNavigation where
toJSVal = return . unPerformanceNavigation
instance FromJSVal PerformanceNavigation where
fromJSVal = return . fmap PerformanceNavigation . maybeJSNullOrUndefined
instance IsGObject PerformanceNavigation where
typeGType _ = gTypePerformanceNavigation
foreign import javascript unsafe "window[\"PerformanceNavigation\"]" gTypePerformanceNavigation :: GType
newtype PerformanceResourceTiming = PerformanceResourceTiming { unPerformanceResourceTiming :: JSVal }
instance Eq (PerformanceResourceTiming) where
(PerformanceResourceTiming a) == (PerformanceResourceTiming b) = js_eq a b
instance PToJSVal PerformanceResourceTiming where
pToJSVal = unPerformanceResourceTiming
instance PFromJSVal PerformanceResourceTiming where
pFromJSVal = PerformanceResourceTiming
instance ToJSVal PerformanceResourceTiming where
toJSVal = return . unPerformanceResourceTiming
instance FromJSVal PerformanceResourceTiming where
fromJSVal = return . fmap PerformanceResourceTiming . maybeJSNullOrUndefined
instance IsPerformanceEntry PerformanceResourceTiming
instance IsGObject PerformanceResourceTiming where
typeGType _ = gTypePerformanceResourceTiming
foreign import javascript unsafe "window[\"PerformanceResourceTiming\"]" gTypePerformanceResourceTiming :: GType
newtype PerformanceTiming = PerformanceTiming { unPerformanceTiming :: JSVal }
instance Eq (PerformanceTiming) where
(PerformanceTiming a) == (PerformanceTiming b) = js_eq a b
instance PToJSVal PerformanceTiming where
pToJSVal = unPerformanceTiming
instance PFromJSVal PerformanceTiming where
pFromJSVal = PerformanceTiming
instance ToJSVal PerformanceTiming where
toJSVal = return . unPerformanceTiming
instance FromJSVal PerformanceTiming where
fromJSVal = return . fmap PerformanceTiming . maybeJSNullOrUndefined
instance IsGObject PerformanceTiming where
typeGType _ = gTypePerformanceTiming
foreign import javascript unsafe "window[\"PerformanceTiming\"]" gTypePerformanceTiming :: GType
newtype PeriodicWave = PeriodicWave { unPeriodicWave :: JSVal }
instance Eq (PeriodicWave) where
(PeriodicWave a) == (PeriodicWave b) = js_eq a b
instance PToJSVal PeriodicWave where
pToJSVal = unPeriodicWave
instance PFromJSVal PeriodicWave where
pFromJSVal = PeriodicWave
instance ToJSVal PeriodicWave where
toJSVal = return . unPeriodicWave
instance FromJSVal PeriodicWave where
fromJSVal = return . fmap PeriodicWave . maybeJSNullOrUndefined
instance IsGObject PeriodicWave where
typeGType _ = gTypePeriodicWave
foreign import javascript unsafe "window[\"PeriodicWave\"]" gTypePeriodicWave :: GType
newtype Plugin = Plugin { unPlugin :: JSVal }
instance Eq (Plugin) where
(Plugin a) == (Plugin b) = js_eq a b
instance PToJSVal Plugin where
pToJSVal = unPlugin
instance PFromJSVal Plugin where
pFromJSVal = Plugin
instance ToJSVal Plugin where
toJSVal = return . unPlugin
instance FromJSVal Plugin where
fromJSVal = return . fmap Plugin . maybeJSNullOrUndefined
instance IsGObject Plugin where
typeGType _ = gTypePlugin
foreign import javascript unsafe "window[\"Plugin\"]" gTypePlugin :: GType
newtype PluginArray = PluginArray { unPluginArray :: JSVal }
instance Eq (PluginArray) where
(PluginArray a) == (PluginArray b) = js_eq a b
instance PToJSVal PluginArray where
pToJSVal = unPluginArray
instance PFromJSVal PluginArray where
pFromJSVal = PluginArray
instance ToJSVal PluginArray where
toJSVal = return . unPluginArray
instance FromJSVal PluginArray where
fromJSVal = return . fmap PluginArray . maybeJSNullOrUndefined
instance IsGObject PluginArray where
typeGType _ = gTypePluginArray
foreign import javascript unsafe "window[\"PluginArray\"]" gTypePluginArray :: GType
newtype PopStateEvent = PopStateEvent { unPopStateEvent :: JSVal }
instance Eq (PopStateEvent) where
(PopStateEvent a) == (PopStateEvent b) = js_eq a b
instance PToJSVal PopStateEvent where
pToJSVal = unPopStateEvent
instance PFromJSVal PopStateEvent where
pFromJSVal = PopStateEvent
instance ToJSVal PopStateEvent where
toJSVal = return . unPopStateEvent
instance FromJSVal PopStateEvent where
fromJSVal = return . fmap PopStateEvent . maybeJSNullOrUndefined
instance IsEvent PopStateEvent
instance IsGObject PopStateEvent where
typeGType _ = gTypePopStateEvent
foreign import javascript unsafe "window[\"PopStateEvent\"]" gTypePopStateEvent :: GType
newtype PositionError = PositionError { unPositionError :: JSVal }
instance Eq (PositionError) where
(PositionError a) == (PositionError b) = js_eq a b
instance PToJSVal PositionError where
pToJSVal = unPositionError
instance PFromJSVal PositionError where
pFromJSVal = PositionError
instance ToJSVal PositionError where
toJSVal = return . unPositionError
instance FromJSVal PositionError where
fromJSVal = return . fmap PositionError . maybeJSNullOrUndefined
instance IsGObject PositionError where
typeGType _ = gTypePositionError
foreign import javascript unsafe "window[\"PositionError\"]" gTypePositionError :: GType
newtype ProcessingInstruction = ProcessingInstruction { unProcessingInstruction :: JSVal }
instance Eq (ProcessingInstruction) where
(ProcessingInstruction a) == (ProcessingInstruction b) = js_eq a b
instance PToJSVal ProcessingInstruction where
pToJSVal = unProcessingInstruction
instance PFromJSVal ProcessingInstruction where
pFromJSVal = ProcessingInstruction
instance ToJSVal ProcessingInstruction where
toJSVal = return . unProcessingInstruction
instance FromJSVal ProcessingInstruction where
fromJSVal = return . fmap ProcessingInstruction . maybeJSNullOrUndefined
instance IsCharacterData ProcessingInstruction
instance IsNode ProcessingInstruction
instance IsEventTarget ProcessingInstruction
instance IsGObject ProcessingInstruction where
typeGType _ = gTypeProcessingInstruction
foreign import javascript unsafe "window[\"ProcessingInstruction\"]" gTypeProcessingInstruction :: GType
newtype ProgressEvent = ProgressEvent { unProgressEvent :: JSVal }
instance Eq (ProgressEvent) where
(ProgressEvent a) == (ProgressEvent b) = js_eq a b
instance PToJSVal ProgressEvent where
pToJSVal = unProgressEvent
instance PFromJSVal ProgressEvent where
pFromJSVal = ProgressEvent
instance ToJSVal ProgressEvent where
toJSVal = return . unProgressEvent
instance FromJSVal ProgressEvent where
fromJSVal = return . fmap ProgressEvent . maybeJSNullOrUndefined
class IsEvent o => IsProgressEvent o
toProgressEvent :: IsProgressEvent o => o -> ProgressEvent
toProgressEvent = ProgressEvent . coerce
instance IsProgressEvent ProgressEvent
instance IsEvent ProgressEvent
instance IsGObject ProgressEvent where
typeGType _ = gTypeProgressEvent
foreign import javascript unsafe "window[\"ProgressEvent\"]" gTypeProgressEvent :: GType
newtype QuickTimePluginReplacement = QuickTimePluginReplacement { unQuickTimePluginReplacement :: JSVal }
instance Eq (QuickTimePluginReplacement) where
(QuickTimePluginReplacement a) == (QuickTimePluginReplacement b) = js_eq a b
instance PToJSVal QuickTimePluginReplacement where
pToJSVal = unQuickTimePluginReplacement
instance PFromJSVal QuickTimePluginReplacement where
pFromJSVal = QuickTimePluginReplacement
instance ToJSVal QuickTimePluginReplacement where
toJSVal = return . unQuickTimePluginReplacement
instance FromJSVal QuickTimePluginReplacement where
fromJSVal = return . fmap QuickTimePluginReplacement . maybeJSNullOrUndefined
instance IsGObject QuickTimePluginReplacement where
typeGType _ = gTypeQuickTimePluginReplacement
foreign import javascript unsafe "window[\"QuickTimePluginReplacement\"]" gTypeQuickTimePluginReplacement :: GType
newtype RGBColor = RGBColor { unRGBColor :: JSVal }
instance Eq (RGBColor) where
(RGBColor a) == (RGBColor b) = js_eq a b
instance PToJSVal RGBColor where
pToJSVal = unRGBColor
instance PFromJSVal RGBColor where
pFromJSVal = RGBColor
instance ToJSVal RGBColor where
toJSVal = return . unRGBColor
instance FromJSVal RGBColor where
fromJSVal = return . fmap RGBColor . maybeJSNullOrUndefined
instance IsGObject RGBColor where
typeGType _ = gTypeRGBColor
foreign import javascript unsafe "window[\"RGBColor\"]" gTypeRGBColor :: GType
newtype RTCConfiguration = RTCConfiguration { unRTCConfiguration :: JSVal }
instance Eq (RTCConfiguration) where
(RTCConfiguration a) == (RTCConfiguration b) = js_eq a b
instance PToJSVal RTCConfiguration where
pToJSVal = unRTCConfiguration
instance PFromJSVal RTCConfiguration where
pFromJSVal = RTCConfiguration
instance ToJSVal RTCConfiguration where
toJSVal = return . unRTCConfiguration
instance FromJSVal RTCConfiguration where
fromJSVal = return . fmap RTCConfiguration . maybeJSNullOrUndefined
instance IsGObject RTCConfiguration where
typeGType _ = gTypeRTCConfiguration
foreign import javascript unsafe "window[\"RTCConfiguration\"]" gTypeRTCConfiguration :: GType
newtype RTCDTMFSender = RTCDTMFSender { unRTCDTMFSender :: JSVal }
instance Eq (RTCDTMFSender) where
(RTCDTMFSender a) == (RTCDTMFSender b) = js_eq a b
instance PToJSVal RTCDTMFSender where
pToJSVal = unRTCDTMFSender
instance PFromJSVal RTCDTMFSender where
pFromJSVal = RTCDTMFSender
instance ToJSVal RTCDTMFSender where
toJSVal = return . unRTCDTMFSender
instance FromJSVal RTCDTMFSender where
fromJSVal = return . fmap RTCDTMFSender . maybeJSNullOrUndefined
instance IsEventTarget RTCDTMFSender
instance IsGObject RTCDTMFSender where
typeGType _ = gTypeRTCDTMFSender
foreign import javascript unsafe "window[\"RTCDTMFSender\"]" gTypeRTCDTMFSender :: GType
newtype RTCDTMFToneChangeEvent = RTCDTMFToneChangeEvent { unRTCDTMFToneChangeEvent :: JSVal }
instance Eq (RTCDTMFToneChangeEvent) where
(RTCDTMFToneChangeEvent a) == (RTCDTMFToneChangeEvent b) = js_eq a b
instance PToJSVal RTCDTMFToneChangeEvent where
pToJSVal = unRTCDTMFToneChangeEvent
instance PFromJSVal RTCDTMFToneChangeEvent where
pFromJSVal = RTCDTMFToneChangeEvent
instance ToJSVal RTCDTMFToneChangeEvent where
toJSVal = return . unRTCDTMFToneChangeEvent
instance FromJSVal RTCDTMFToneChangeEvent where
fromJSVal = return . fmap RTCDTMFToneChangeEvent . maybeJSNullOrUndefined
instance IsEvent RTCDTMFToneChangeEvent
instance IsGObject RTCDTMFToneChangeEvent where
typeGType _ = gTypeRTCDTMFToneChangeEvent
foreign import javascript unsafe "window[\"RTCDTMFToneChangeEvent\"]" gTypeRTCDTMFToneChangeEvent :: GType
newtype RTCDataChannel = RTCDataChannel { unRTCDataChannel :: JSVal }
instance Eq (RTCDataChannel) where
(RTCDataChannel a) == (RTCDataChannel b) = js_eq a b
instance PToJSVal RTCDataChannel where
pToJSVal = unRTCDataChannel
instance PFromJSVal RTCDataChannel where
pFromJSVal = RTCDataChannel
instance ToJSVal RTCDataChannel where
toJSVal = return . unRTCDataChannel
instance FromJSVal RTCDataChannel where
fromJSVal = return . fmap RTCDataChannel . maybeJSNullOrUndefined
instance IsEventTarget RTCDataChannel
instance IsGObject RTCDataChannel where
typeGType _ = gTypeRTCDataChannel
foreign import javascript unsafe "window[\"RTCDataChannel\"]" gTypeRTCDataChannel :: GType
newtype RTCDataChannelEvent = RTCDataChannelEvent { unRTCDataChannelEvent :: JSVal }
instance Eq (RTCDataChannelEvent) where
(RTCDataChannelEvent a) == (RTCDataChannelEvent b) = js_eq a b
instance PToJSVal RTCDataChannelEvent where
pToJSVal = unRTCDataChannelEvent
instance PFromJSVal RTCDataChannelEvent where
pFromJSVal = RTCDataChannelEvent
instance ToJSVal RTCDataChannelEvent where
toJSVal = return . unRTCDataChannelEvent
instance FromJSVal RTCDataChannelEvent where
fromJSVal = return . fmap RTCDataChannelEvent . maybeJSNullOrUndefined
instance IsEvent RTCDataChannelEvent
instance IsGObject RTCDataChannelEvent where
typeGType _ = gTypeRTCDataChannelEvent
foreign import javascript unsafe "window[\"RTCDataChannelEvent\"]" gTypeRTCDataChannelEvent :: GType
newtype RTCIceCandidate = RTCIceCandidate { unRTCIceCandidate :: JSVal }
instance Eq (RTCIceCandidate) where
(RTCIceCandidate a) == (RTCIceCandidate b) = js_eq a b
instance PToJSVal RTCIceCandidate where
pToJSVal = unRTCIceCandidate
instance PFromJSVal RTCIceCandidate where
pFromJSVal = RTCIceCandidate
instance ToJSVal RTCIceCandidate where
toJSVal = return . unRTCIceCandidate
instance FromJSVal RTCIceCandidate where
fromJSVal = return . fmap RTCIceCandidate . maybeJSNullOrUndefined
instance IsGObject RTCIceCandidate where
typeGType _ = gTypeRTCIceCandidate
foreign import javascript unsafe "window[\"RTCIceCandidate\"]" gTypeRTCIceCandidate :: GType
newtype RTCIceCandidateEvent = RTCIceCandidateEvent { unRTCIceCandidateEvent :: JSVal }
instance Eq (RTCIceCandidateEvent) where
(RTCIceCandidateEvent a) == (RTCIceCandidateEvent b) = js_eq a b
instance PToJSVal RTCIceCandidateEvent where
pToJSVal = unRTCIceCandidateEvent
instance PFromJSVal RTCIceCandidateEvent where
pFromJSVal = RTCIceCandidateEvent
instance ToJSVal RTCIceCandidateEvent where
toJSVal = return . unRTCIceCandidateEvent
instance FromJSVal RTCIceCandidateEvent where
fromJSVal = return . fmap RTCIceCandidateEvent . maybeJSNullOrUndefined
instance IsEvent RTCIceCandidateEvent
instance IsGObject RTCIceCandidateEvent where
typeGType _ = gTypeRTCIceCandidateEvent
foreign import javascript unsafe "window[\"RTCIceCandidateEvent\"]" gTypeRTCIceCandidateEvent :: GType
newtype RTCIceServer = RTCIceServer { unRTCIceServer :: JSVal }
instance Eq (RTCIceServer) where
(RTCIceServer a) == (RTCIceServer b) = js_eq a b
instance PToJSVal RTCIceServer where
pToJSVal = unRTCIceServer
instance PFromJSVal RTCIceServer where
pFromJSVal = RTCIceServer
instance ToJSVal RTCIceServer where
toJSVal = return . unRTCIceServer
instance FromJSVal RTCIceServer where
fromJSVal = return . fmap RTCIceServer . maybeJSNullOrUndefined
instance IsGObject RTCIceServer where
typeGType _ = gTypeRTCIceServer
foreign import javascript unsafe "window[\"RTCIceServer\"]" gTypeRTCIceServer :: GType
newtype RTCPeerConnection = RTCPeerConnection { unRTCPeerConnection :: JSVal }
instance Eq (RTCPeerConnection) where
(RTCPeerConnection a) == (RTCPeerConnection b) = js_eq a b
instance PToJSVal RTCPeerConnection where
pToJSVal = unRTCPeerConnection
instance PFromJSVal RTCPeerConnection where
pFromJSVal = RTCPeerConnection
instance ToJSVal RTCPeerConnection where
toJSVal = return . unRTCPeerConnection
instance FromJSVal RTCPeerConnection where
fromJSVal = return . fmap RTCPeerConnection . maybeJSNullOrUndefined
instance IsEventTarget RTCPeerConnection
instance IsGObject RTCPeerConnection where
typeGType _ = gTypeRTCPeerConnection
foreign import javascript unsafe "window[\"webkitRTCPeerConnection\"]" gTypeRTCPeerConnection :: GType
newtype RTCSessionDescription = RTCSessionDescription { unRTCSessionDescription :: JSVal }
instance Eq (RTCSessionDescription) where
(RTCSessionDescription a) == (RTCSessionDescription b) = js_eq a b
instance PToJSVal RTCSessionDescription where
pToJSVal = unRTCSessionDescription
instance PFromJSVal RTCSessionDescription where
pFromJSVal = RTCSessionDescription
instance ToJSVal RTCSessionDescription where
toJSVal = return . unRTCSessionDescription
instance FromJSVal RTCSessionDescription where
fromJSVal = return . fmap RTCSessionDescription . maybeJSNullOrUndefined
instance IsGObject RTCSessionDescription where
typeGType _ = gTypeRTCSessionDescription
foreign import javascript unsafe "window[\"RTCSessionDescription\"]" gTypeRTCSessionDescription :: GType
newtype RTCStatsReport = RTCStatsReport { unRTCStatsReport :: JSVal }
instance Eq (RTCStatsReport) where
(RTCStatsReport a) == (RTCStatsReport b) = js_eq a b
instance PToJSVal RTCStatsReport where
pToJSVal = unRTCStatsReport
instance PFromJSVal RTCStatsReport where
pFromJSVal = RTCStatsReport
instance ToJSVal RTCStatsReport where
toJSVal = return . unRTCStatsReport
instance FromJSVal RTCStatsReport where
fromJSVal = return . fmap RTCStatsReport . maybeJSNullOrUndefined
instance IsGObject RTCStatsReport where
typeGType _ = gTypeRTCStatsReport
foreign import javascript unsafe "window[\"RTCStatsReport\"]" gTypeRTCStatsReport :: GType
newtype RTCStatsResponse = RTCStatsResponse { unRTCStatsResponse :: JSVal }
instance Eq (RTCStatsResponse) where
(RTCStatsResponse a) == (RTCStatsResponse b) = js_eq a b
instance PToJSVal RTCStatsResponse where
pToJSVal = unRTCStatsResponse
instance PFromJSVal RTCStatsResponse where
pFromJSVal = RTCStatsResponse
instance ToJSVal RTCStatsResponse where
toJSVal = return . unRTCStatsResponse
instance FromJSVal RTCStatsResponse where
fromJSVal = return . fmap RTCStatsResponse . maybeJSNullOrUndefined
instance IsGObject RTCStatsResponse where
typeGType _ = gTypeRTCStatsResponse
foreign import javascript unsafe "window[\"RTCStatsResponse\"]" gTypeRTCStatsResponse :: GType
newtype RadioNodeList = RadioNodeList { unRadioNodeList :: JSVal }
instance Eq (RadioNodeList) where
(RadioNodeList a) == (RadioNodeList b) = js_eq a b
instance PToJSVal RadioNodeList where
pToJSVal = unRadioNodeList
instance PFromJSVal RadioNodeList where
pFromJSVal = RadioNodeList
instance ToJSVal RadioNodeList where
toJSVal = return . unRadioNodeList
instance FromJSVal RadioNodeList where
fromJSVal = return . fmap RadioNodeList . maybeJSNullOrUndefined
instance IsNodeList RadioNodeList
instance IsGObject RadioNodeList where
typeGType _ = gTypeRadioNodeList
foreign import javascript unsafe "window[\"RadioNodeList\"]" gTypeRadioNodeList :: GType
newtype Range = Range { unRange :: JSVal }
instance Eq (Range) where
(Range a) == (Range b) = js_eq a b
instance PToJSVal Range where
pToJSVal = unRange
instance PFromJSVal Range where
pFromJSVal = Range
instance ToJSVal Range where
toJSVal = return . unRange
instance FromJSVal Range where
fromJSVal = return . fmap Range . maybeJSNullOrUndefined
instance IsGObject Range where
typeGType _ = gTypeRange
foreign import javascript unsafe "window[\"Range\"]" gTypeRange :: GType
newtype ReadableStream = ReadableStream { unReadableStream :: JSVal }
instance Eq (ReadableStream) where
(ReadableStream a) == (ReadableStream b) = js_eq a b
instance PToJSVal ReadableStream where
pToJSVal = unReadableStream
instance PFromJSVal ReadableStream where
pFromJSVal = ReadableStream
instance ToJSVal ReadableStream where
toJSVal = return . unReadableStream
instance FromJSVal ReadableStream where
fromJSVal = return . fmap ReadableStream . maybeJSNullOrUndefined
instance IsGObject ReadableStream where
typeGType _ = gTypeReadableStream
foreign import javascript unsafe "window[\"ReadableStream\"]" gTypeReadableStream :: GType
newtype Rect = Rect { unRect :: JSVal }
instance Eq (Rect) where
(Rect a) == (Rect b) = js_eq a b
instance PToJSVal Rect where
pToJSVal = unRect
instance PFromJSVal Rect where
pFromJSVal = Rect
instance ToJSVal Rect where
toJSVal = return . unRect
instance FromJSVal Rect where
fromJSVal = return . fmap Rect . maybeJSNullOrUndefined
instance IsGObject Rect where
typeGType _ = gTypeRect
foreign import javascript unsafe "window[\"Rect\"]" gTypeRect :: GType
newtype SQLError = SQLError { unSQLError :: JSVal }
instance Eq (SQLError) where
(SQLError a) == (SQLError b) = js_eq a b
instance PToJSVal SQLError where
pToJSVal = unSQLError
instance PFromJSVal SQLError where
pFromJSVal = SQLError
instance ToJSVal SQLError where
toJSVal = return . unSQLError
instance FromJSVal SQLError where
fromJSVal = return . fmap SQLError . maybeJSNullOrUndefined
instance IsGObject SQLError where
typeGType _ = gTypeSQLError
foreign import javascript unsafe "window[\"SQLError\"]" gTypeSQLError :: GType
newtype SQLResultSet = SQLResultSet { unSQLResultSet :: JSVal }
instance Eq (SQLResultSet) where
(SQLResultSet a) == (SQLResultSet b) = js_eq a b
instance PToJSVal SQLResultSet where
pToJSVal = unSQLResultSet
instance PFromJSVal SQLResultSet where
pFromJSVal = SQLResultSet
instance ToJSVal SQLResultSet where
toJSVal = return . unSQLResultSet
instance FromJSVal SQLResultSet where
fromJSVal = return . fmap SQLResultSet . maybeJSNullOrUndefined
instance IsGObject SQLResultSet where
typeGType _ = gTypeSQLResultSet
foreign import javascript unsafe "window[\"SQLResultSet\"]" gTypeSQLResultSet :: GType
newtype SQLResultSetRowList = SQLResultSetRowList { unSQLResultSetRowList :: JSVal }
instance Eq (SQLResultSetRowList) where
(SQLResultSetRowList a) == (SQLResultSetRowList b) = js_eq a b
instance PToJSVal SQLResultSetRowList where
pToJSVal = unSQLResultSetRowList
instance PFromJSVal SQLResultSetRowList where
pFromJSVal = SQLResultSetRowList
instance ToJSVal SQLResultSetRowList where
toJSVal = return . unSQLResultSetRowList
instance FromJSVal SQLResultSetRowList where
fromJSVal = return . fmap SQLResultSetRowList . maybeJSNullOrUndefined
instance IsGObject SQLResultSetRowList where
typeGType _ = gTypeSQLResultSetRowList
foreign import javascript unsafe "window[\"SQLResultSetRowList\"]" gTypeSQLResultSetRowList :: GType
newtype SQLTransaction = SQLTransaction { unSQLTransaction :: JSVal }
instance Eq (SQLTransaction) where
(SQLTransaction a) == (SQLTransaction b) = js_eq a b
instance PToJSVal SQLTransaction where
pToJSVal = unSQLTransaction
instance PFromJSVal SQLTransaction where
pFromJSVal = SQLTransaction
instance ToJSVal SQLTransaction where
toJSVal = return . unSQLTransaction
instance FromJSVal SQLTransaction where
fromJSVal = return . fmap SQLTransaction . maybeJSNullOrUndefined
instance IsGObject SQLTransaction where
typeGType _ = gTypeSQLTransaction
foreign import javascript unsafe "window[\"SQLTransaction\"]" gTypeSQLTransaction :: GType
newtype SVGAElement = SVGAElement { unSVGAElement :: JSVal }
instance Eq (SVGAElement) where
(SVGAElement a) == (SVGAElement b) = js_eq a b
instance PToJSVal SVGAElement where
pToJSVal = unSVGAElement
instance PFromJSVal SVGAElement where
pFromJSVal = SVGAElement
instance ToJSVal SVGAElement where
toJSVal = return . unSVGAElement
instance FromJSVal SVGAElement where
fromJSVal = return . fmap SVGAElement . maybeJSNullOrUndefined
instance IsSVGGraphicsElement SVGAElement
instance IsSVGElement SVGAElement
instance IsElement SVGAElement
instance IsNode SVGAElement
instance IsEventTarget SVGAElement
instance IsGObject SVGAElement where
typeGType _ = gTypeSVGAElement
foreign import javascript unsafe "window[\"SVGAElement\"]" gTypeSVGAElement :: GType
newtype SVGAltGlyphDefElement = SVGAltGlyphDefElement { unSVGAltGlyphDefElement :: JSVal }
instance Eq (SVGAltGlyphDefElement) where
(SVGAltGlyphDefElement a) == (SVGAltGlyphDefElement b) = js_eq a b
instance PToJSVal SVGAltGlyphDefElement where
pToJSVal = unSVGAltGlyphDefElement
instance PFromJSVal SVGAltGlyphDefElement where
pFromJSVal = SVGAltGlyphDefElement
instance ToJSVal SVGAltGlyphDefElement where
toJSVal = return . unSVGAltGlyphDefElement
instance FromJSVal SVGAltGlyphDefElement where
fromJSVal = return . fmap SVGAltGlyphDefElement . maybeJSNullOrUndefined
instance IsSVGElement SVGAltGlyphDefElement
instance IsElement SVGAltGlyphDefElement
instance IsNode SVGAltGlyphDefElement
instance IsEventTarget SVGAltGlyphDefElement
instance IsGObject SVGAltGlyphDefElement where
typeGType _ = gTypeSVGAltGlyphDefElement
foreign import javascript unsafe "window[\"SVGAltGlyphDefElement\"]" gTypeSVGAltGlyphDefElement :: GType
newtype SVGAltGlyphElement = SVGAltGlyphElement { unSVGAltGlyphElement :: JSVal }
instance Eq (SVGAltGlyphElement) where
(SVGAltGlyphElement a) == (SVGAltGlyphElement b) = js_eq a b
instance PToJSVal SVGAltGlyphElement where
pToJSVal = unSVGAltGlyphElement
instance PFromJSVal SVGAltGlyphElement where
pFromJSVal = SVGAltGlyphElement
instance ToJSVal SVGAltGlyphElement where
toJSVal = return . unSVGAltGlyphElement
instance FromJSVal SVGAltGlyphElement where
fromJSVal = return . fmap SVGAltGlyphElement . maybeJSNullOrUndefined
instance IsSVGTextPositioningElement SVGAltGlyphElement
instance IsSVGTextContentElement SVGAltGlyphElement
instance IsSVGGraphicsElement SVGAltGlyphElement
instance IsSVGElement SVGAltGlyphElement
instance IsElement SVGAltGlyphElement
instance IsNode SVGAltGlyphElement
instance IsEventTarget SVGAltGlyphElement
instance IsGObject SVGAltGlyphElement where
typeGType _ = gTypeSVGAltGlyphElement
foreign import javascript unsafe "window[\"SVGAltGlyphElement\"]" gTypeSVGAltGlyphElement :: GType
newtype SVGAltGlyphItemElement = SVGAltGlyphItemElement { unSVGAltGlyphItemElement :: JSVal }
instance Eq (SVGAltGlyphItemElement) where
(SVGAltGlyphItemElement a) == (SVGAltGlyphItemElement b) = js_eq a b
instance PToJSVal SVGAltGlyphItemElement where
pToJSVal = unSVGAltGlyphItemElement
instance PFromJSVal SVGAltGlyphItemElement where
pFromJSVal = SVGAltGlyphItemElement
instance ToJSVal SVGAltGlyphItemElement where
toJSVal = return . unSVGAltGlyphItemElement
instance FromJSVal SVGAltGlyphItemElement where
fromJSVal = return . fmap SVGAltGlyphItemElement . maybeJSNullOrUndefined
instance IsSVGElement SVGAltGlyphItemElement
instance IsElement SVGAltGlyphItemElement
instance IsNode SVGAltGlyphItemElement
instance IsEventTarget SVGAltGlyphItemElement
instance IsGObject SVGAltGlyphItemElement where
typeGType _ = gTypeSVGAltGlyphItemElement
foreign import javascript unsafe "window[\"SVGAltGlyphItemElement\"]" gTypeSVGAltGlyphItemElement :: GType
newtype SVGAngle = SVGAngle { unSVGAngle :: JSVal }
instance Eq (SVGAngle) where
(SVGAngle a) == (SVGAngle b) = js_eq a b
instance PToJSVal SVGAngle where
pToJSVal = unSVGAngle
instance PFromJSVal SVGAngle where
pFromJSVal = SVGAngle
instance ToJSVal SVGAngle where
toJSVal = return . unSVGAngle
instance FromJSVal SVGAngle where
fromJSVal = return . fmap SVGAngle . maybeJSNullOrUndefined
instance IsGObject SVGAngle where
typeGType _ = gTypeSVGAngle
foreign import javascript unsafe "window[\"SVGAngle\"]" gTypeSVGAngle :: GType
newtype SVGAnimateColorElement = SVGAnimateColorElement { unSVGAnimateColorElement :: JSVal }
instance Eq (SVGAnimateColorElement) where
(SVGAnimateColorElement a) == (SVGAnimateColorElement b) = js_eq a b
instance PToJSVal SVGAnimateColorElement where
pToJSVal = unSVGAnimateColorElement
instance PFromJSVal SVGAnimateColorElement where
pFromJSVal = SVGAnimateColorElement
instance ToJSVal SVGAnimateColorElement where
toJSVal = return . unSVGAnimateColorElement
instance FromJSVal SVGAnimateColorElement where
fromJSVal = return . fmap SVGAnimateColorElement . maybeJSNullOrUndefined
instance IsSVGAnimationElement SVGAnimateColorElement
instance IsSVGElement SVGAnimateColorElement
instance IsElement SVGAnimateColorElement
instance IsNode SVGAnimateColorElement
instance IsEventTarget SVGAnimateColorElement
instance IsGObject SVGAnimateColorElement where
typeGType _ = gTypeSVGAnimateColorElement
foreign import javascript unsafe "window[\"SVGAnimateColorElement\"]" gTypeSVGAnimateColorElement :: GType
newtype SVGAnimateElement = SVGAnimateElement { unSVGAnimateElement :: JSVal }
instance Eq (SVGAnimateElement) where
(SVGAnimateElement a) == (SVGAnimateElement b) = js_eq a b
instance PToJSVal SVGAnimateElement where
pToJSVal = unSVGAnimateElement
instance PFromJSVal SVGAnimateElement where
pFromJSVal = SVGAnimateElement
instance ToJSVal SVGAnimateElement where
toJSVal = return . unSVGAnimateElement
instance FromJSVal SVGAnimateElement where
fromJSVal = return . fmap SVGAnimateElement . maybeJSNullOrUndefined
instance IsSVGAnimationElement SVGAnimateElement
instance IsSVGElement SVGAnimateElement
instance IsElement SVGAnimateElement
instance IsNode SVGAnimateElement
instance IsEventTarget SVGAnimateElement
instance IsGObject SVGAnimateElement where
typeGType _ = gTypeSVGAnimateElement
foreign import javascript unsafe "window[\"SVGAnimateElement\"]" gTypeSVGAnimateElement :: GType
newtype SVGAnimateMotionElement = SVGAnimateMotionElement { unSVGAnimateMotionElement :: JSVal }
instance Eq (SVGAnimateMotionElement) where
(SVGAnimateMotionElement a) == (SVGAnimateMotionElement b) = js_eq a b
instance PToJSVal SVGAnimateMotionElement where
pToJSVal = unSVGAnimateMotionElement
instance PFromJSVal SVGAnimateMotionElement where
pFromJSVal = SVGAnimateMotionElement
instance ToJSVal SVGAnimateMotionElement where
toJSVal = return . unSVGAnimateMotionElement
instance FromJSVal SVGAnimateMotionElement where
fromJSVal = return . fmap SVGAnimateMotionElement . maybeJSNullOrUndefined
instance IsSVGAnimationElement SVGAnimateMotionElement
instance IsSVGElement SVGAnimateMotionElement
instance IsElement SVGAnimateMotionElement
instance IsNode SVGAnimateMotionElement
instance IsEventTarget SVGAnimateMotionElement
instance IsGObject SVGAnimateMotionElement where
typeGType _ = gTypeSVGAnimateMotionElement
foreign import javascript unsafe "window[\"SVGAnimateMotionElement\"]" gTypeSVGAnimateMotionElement :: GType
newtype SVGAnimateTransformElement = SVGAnimateTransformElement { unSVGAnimateTransformElement :: JSVal }
instance Eq (SVGAnimateTransformElement) where
(SVGAnimateTransformElement a) == (SVGAnimateTransformElement b) = js_eq a b
instance PToJSVal SVGAnimateTransformElement where
pToJSVal = unSVGAnimateTransformElement
instance PFromJSVal SVGAnimateTransformElement where
pFromJSVal = SVGAnimateTransformElement
instance ToJSVal SVGAnimateTransformElement where
toJSVal = return . unSVGAnimateTransformElement
instance FromJSVal SVGAnimateTransformElement where
fromJSVal = return . fmap SVGAnimateTransformElement . maybeJSNullOrUndefined
instance IsSVGAnimationElement SVGAnimateTransformElement
instance IsSVGElement SVGAnimateTransformElement
instance IsElement SVGAnimateTransformElement
instance IsNode SVGAnimateTransformElement
instance IsEventTarget SVGAnimateTransformElement
instance IsGObject SVGAnimateTransformElement where
typeGType _ = gTypeSVGAnimateTransformElement
foreign import javascript unsafe "window[\"SVGAnimateTransformElement\"]" gTypeSVGAnimateTransformElement :: GType
newtype SVGAnimatedAngle = SVGAnimatedAngle { unSVGAnimatedAngle :: JSVal }
instance Eq (SVGAnimatedAngle) where
(SVGAnimatedAngle a) == (SVGAnimatedAngle b) = js_eq a b
instance PToJSVal SVGAnimatedAngle where
pToJSVal = unSVGAnimatedAngle
instance PFromJSVal SVGAnimatedAngle where
pFromJSVal = SVGAnimatedAngle
instance ToJSVal SVGAnimatedAngle where
toJSVal = return . unSVGAnimatedAngle
instance FromJSVal SVGAnimatedAngle where
fromJSVal = return . fmap SVGAnimatedAngle . maybeJSNullOrUndefined
instance IsGObject SVGAnimatedAngle where
typeGType _ = gTypeSVGAnimatedAngle
foreign import javascript unsafe "window[\"SVGAnimatedAngle\"]" gTypeSVGAnimatedAngle :: GType
newtype SVGAnimatedBoolean = SVGAnimatedBoolean { unSVGAnimatedBoolean :: JSVal }
instance Eq (SVGAnimatedBoolean) where
(SVGAnimatedBoolean a) == (SVGAnimatedBoolean b) = js_eq a b
instance PToJSVal SVGAnimatedBoolean where
pToJSVal = unSVGAnimatedBoolean
instance PFromJSVal SVGAnimatedBoolean where
pFromJSVal = SVGAnimatedBoolean
instance ToJSVal SVGAnimatedBoolean where
toJSVal = return . unSVGAnimatedBoolean
instance FromJSVal SVGAnimatedBoolean where
fromJSVal = return . fmap SVGAnimatedBoolean . maybeJSNullOrUndefined
instance IsGObject SVGAnimatedBoolean where
typeGType _ = gTypeSVGAnimatedBoolean
foreign import javascript unsafe "window[\"SVGAnimatedBoolean\"]" gTypeSVGAnimatedBoolean :: GType
newtype SVGAnimatedEnumeration = SVGAnimatedEnumeration { unSVGAnimatedEnumeration :: JSVal }
instance Eq (SVGAnimatedEnumeration) where
(SVGAnimatedEnumeration a) == (SVGAnimatedEnumeration b) = js_eq a b
instance PToJSVal SVGAnimatedEnumeration where
pToJSVal = unSVGAnimatedEnumeration
instance PFromJSVal SVGAnimatedEnumeration where
pFromJSVal = SVGAnimatedEnumeration
instance ToJSVal SVGAnimatedEnumeration where
toJSVal = return . unSVGAnimatedEnumeration
instance FromJSVal SVGAnimatedEnumeration where
fromJSVal = return . fmap SVGAnimatedEnumeration . maybeJSNullOrUndefined
instance IsGObject SVGAnimatedEnumeration where
typeGType _ = gTypeSVGAnimatedEnumeration
foreign import javascript unsafe "window[\"SVGAnimatedEnumeration\"]" gTypeSVGAnimatedEnumeration :: GType
newtype SVGAnimatedInteger = SVGAnimatedInteger { unSVGAnimatedInteger :: JSVal }
instance Eq (SVGAnimatedInteger) where
(SVGAnimatedInteger a) == (SVGAnimatedInteger b) = js_eq a b
instance PToJSVal SVGAnimatedInteger where
pToJSVal = unSVGAnimatedInteger
instance PFromJSVal SVGAnimatedInteger where
pFromJSVal = SVGAnimatedInteger
instance ToJSVal SVGAnimatedInteger where
toJSVal = return . unSVGAnimatedInteger
instance FromJSVal SVGAnimatedInteger where
fromJSVal = return . fmap SVGAnimatedInteger . maybeJSNullOrUndefined
instance IsGObject SVGAnimatedInteger where
typeGType _ = gTypeSVGAnimatedInteger
foreign import javascript unsafe "window[\"SVGAnimatedInteger\"]" gTypeSVGAnimatedInteger :: GType
newtype SVGAnimatedLength = SVGAnimatedLength { unSVGAnimatedLength :: JSVal }
instance Eq (SVGAnimatedLength) where
(SVGAnimatedLength a) == (SVGAnimatedLength b) = js_eq a b
instance PToJSVal SVGAnimatedLength where
pToJSVal = unSVGAnimatedLength
instance PFromJSVal SVGAnimatedLength where
pFromJSVal = SVGAnimatedLength
instance ToJSVal SVGAnimatedLength where
toJSVal = return . unSVGAnimatedLength
instance FromJSVal SVGAnimatedLength where
fromJSVal = return . fmap SVGAnimatedLength . maybeJSNullOrUndefined
instance IsGObject SVGAnimatedLength where
typeGType _ = gTypeSVGAnimatedLength
foreign import javascript unsafe "window[\"SVGAnimatedLength\"]" gTypeSVGAnimatedLength :: GType
newtype SVGAnimatedLengthList = SVGAnimatedLengthList { unSVGAnimatedLengthList :: JSVal }
instance Eq (SVGAnimatedLengthList) where
(SVGAnimatedLengthList a) == (SVGAnimatedLengthList b) = js_eq a b
instance PToJSVal SVGAnimatedLengthList where
pToJSVal = unSVGAnimatedLengthList
instance PFromJSVal SVGAnimatedLengthList where
pFromJSVal = SVGAnimatedLengthList
instance ToJSVal SVGAnimatedLengthList where
toJSVal = return . unSVGAnimatedLengthList
instance FromJSVal SVGAnimatedLengthList where
fromJSVal = return . fmap SVGAnimatedLengthList . maybeJSNullOrUndefined
instance IsGObject SVGAnimatedLengthList where
typeGType _ = gTypeSVGAnimatedLengthList
foreign import javascript unsafe "window[\"SVGAnimatedLengthList\"]" gTypeSVGAnimatedLengthList :: GType
newtype SVGAnimatedNumber = SVGAnimatedNumber { unSVGAnimatedNumber :: JSVal }
instance Eq (SVGAnimatedNumber) where
(SVGAnimatedNumber a) == (SVGAnimatedNumber b) = js_eq a b
instance PToJSVal SVGAnimatedNumber where
pToJSVal = unSVGAnimatedNumber
instance PFromJSVal SVGAnimatedNumber where
pFromJSVal = SVGAnimatedNumber
instance ToJSVal SVGAnimatedNumber where
toJSVal = return . unSVGAnimatedNumber
instance FromJSVal SVGAnimatedNumber where
fromJSVal = return . fmap SVGAnimatedNumber . maybeJSNullOrUndefined
instance IsGObject SVGAnimatedNumber where
typeGType _ = gTypeSVGAnimatedNumber
foreign import javascript unsafe "window[\"SVGAnimatedNumber\"]" gTypeSVGAnimatedNumber :: GType
newtype SVGAnimatedNumberList = SVGAnimatedNumberList { unSVGAnimatedNumberList :: JSVal }
instance Eq (SVGAnimatedNumberList) where
(SVGAnimatedNumberList a) == (SVGAnimatedNumberList b) = js_eq a b
instance PToJSVal SVGAnimatedNumberList where
pToJSVal = unSVGAnimatedNumberList
instance PFromJSVal SVGAnimatedNumberList where
pFromJSVal = SVGAnimatedNumberList
instance ToJSVal SVGAnimatedNumberList where
toJSVal = return . unSVGAnimatedNumberList
instance FromJSVal SVGAnimatedNumberList where
fromJSVal = return . fmap SVGAnimatedNumberList . maybeJSNullOrUndefined
instance IsGObject SVGAnimatedNumberList where
typeGType _ = gTypeSVGAnimatedNumberList
foreign import javascript unsafe "window[\"SVGAnimatedNumberList\"]" gTypeSVGAnimatedNumberList :: GType
newtype SVGAnimatedPreserveAspectRatio = SVGAnimatedPreserveAspectRatio { unSVGAnimatedPreserveAspectRatio :: JSVal }
instance Eq (SVGAnimatedPreserveAspectRatio) where
(SVGAnimatedPreserveAspectRatio a) == (SVGAnimatedPreserveAspectRatio b) = js_eq a b
instance PToJSVal SVGAnimatedPreserveAspectRatio where
pToJSVal = unSVGAnimatedPreserveAspectRatio
instance PFromJSVal SVGAnimatedPreserveAspectRatio where
pFromJSVal = SVGAnimatedPreserveAspectRatio
instance ToJSVal SVGAnimatedPreserveAspectRatio where
toJSVal = return . unSVGAnimatedPreserveAspectRatio
instance FromJSVal SVGAnimatedPreserveAspectRatio where
fromJSVal = return . fmap SVGAnimatedPreserveAspectRatio . maybeJSNullOrUndefined
instance IsGObject SVGAnimatedPreserveAspectRatio where
typeGType _ = gTypeSVGAnimatedPreserveAspectRatio
foreign import javascript unsafe "window[\"SVGAnimatedPreserveAspectRatio\"]" gTypeSVGAnimatedPreserveAspectRatio :: GType
newtype SVGAnimatedRect = SVGAnimatedRect { unSVGAnimatedRect :: JSVal }
instance Eq (SVGAnimatedRect) where
(SVGAnimatedRect a) == (SVGAnimatedRect b) = js_eq a b
instance PToJSVal SVGAnimatedRect where
pToJSVal = unSVGAnimatedRect
instance PFromJSVal SVGAnimatedRect where
pFromJSVal = SVGAnimatedRect
instance ToJSVal SVGAnimatedRect where
toJSVal = return . unSVGAnimatedRect
instance FromJSVal SVGAnimatedRect where
fromJSVal = return . fmap SVGAnimatedRect . maybeJSNullOrUndefined
instance IsGObject SVGAnimatedRect where
typeGType _ = gTypeSVGAnimatedRect
foreign import javascript unsafe "window[\"SVGAnimatedRect\"]" gTypeSVGAnimatedRect :: GType
newtype SVGAnimatedString = SVGAnimatedString { unSVGAnimatedString :: JSVal }
instance Eq (SVGAnimatedString) where
(SVGAnimatedString a) == (SVGAnimatedString b) = js_eq a b
instance PToJSVal SVGAnimatedString where
pToJSVal = unSVGAnimatedString
instance PFromJSVal SVGAnimatedString where
pFromJSVal = SVGAnimatedString
instance ToJSVal SVGAnimatedString where
toJSVal = return . unSVGAnimatedString
instance FromJSVal SVGAnimatedString where
fromJSVal = return . fmap SVGAnimatedString . maybeJSNullOrUndefined
instance IsGObject SVGAnimatedString where
typeGType _ = gTypeSVGAnimatedString
foreign import javascript unsafe "window[\"SVGAnimatedString\"]" gTypeSVGAnimatedString :: GType
newtype SVGAnimatedTransformList = SVGAnimatedTransformList { unSVGAnimatedTransformList :: JSVal }
instance Eq (SVGAnimatedTransformList) where
(SVGAnimatedTransformList a) == (SVGAnimatedTransformList b) = js_eq a b
instance PToJSVal SVGAnimatedTransformList where
pToJSVal = unSVGAnimatedTransformList
instance PFromJSVal SVGAnimatedTransformList where
pFromJSVal = SVGAnimatedTransformList
instance ToJSVal SVGAnimatedTransformList where
toJSVal = return . unSVGAnimatedTransformList
instance FromJSVal SVGAnimatedTransformList where
fromJSVal = return . fmap SVGAnimatedTransformList . maybeJSNullOrUndefined
instance IsGObject SVGAnimatedTransformList where
typeGType _ = gTypeSVGAnimatedTransformList
foreign import javascript unsafe "window[\"SVGAnimatedTransformList\"]" gTypeSVGAnimatedTransformList :: GType
newtype SVGAnimationElement = SVGAnimationElement { unSVGAnimationElement :: JSVal }
instance Eq (SVGAnimationElement) where
(SVGAnimationElement a) == (SVGAnimationElement b) = js_eq a b
instance PToJSVal SVGAnimationElement where
pToJSVal = unSVGAnimationElement
instance PFromJSVal SVGAnimationElement where
pFromJSVal = SVGAnimationElement
instance ToJSVal SVGAnimationElement where
toJSVal = return . unSVGAnimationElement
instance FromJSVal SVGAnimationElement where
fromJSVal = return . fmap SVGAnimationElement . maybeJSNullOrUndefined
class IsSVGElement o => IsSVGAnimationElement o
toSVGAnimationElement :: IsSVGAnimationElement o => o -> SVGAnimationElement
toSVGAnimationElement = SVGAnimationElement . coerce
instance IsSVGAnimationElement SVGAnimationElement
instance IsSVGElement SVGAnimationElement
instance IsElement SVGAnimationElement
instance IsNode SVGAnimationElement
instance IsEventTarget SVGAnimationElement
instance IsGObject SVGAnimationElement where
typeGType _ = gTypeSVGAnimationElement
foreign import javascript unsafe "window[\"SVGAnimationElement\"]" gTypeSVGAnimationElement :: GType
newtype SVGCircleElement = SVGCircleElement { unSVGCircleElement :: JSVal }
instance Eq (SVGCircleElement) where
(SVGCircleElement a) == (SVGCircleElement b) = js_eq a b
instance PToJSVal SVGCircleElement where
pToJSVal = unSVGCircleElement
instance PFromJSVal SVGCircleElement where
pFromJSVal = SVGCircleElement
instance ToJSVal SVGCircleElement where
toJSVal = return . unSVGCircleElement
instance FromJSVal SVGCircleElement where
fromJSVal = return . fmap SVGCircleElement . maybeJSNullOrUndefined
instance IsSVGGraphicsElement SVGCircleElement
instance IsSVGElement SVGCircleElement
instance IsElement SVGCircleElement
instance IsNode SVGCircleElement
instance IsEventTarget SVGCircleElement
instance IsGObject SVGCircleElement where
typeGType _ = gTypeSVGCircleElement
foreign import javascript unsafe "window[\"SVGCircleElement\"]" gTypeSVGCircleElement :: GType
newtype SVGClipPathElement = SVGClipPathElement { unSVGClipPathElement :: JSVal }
instance Eq (SVGClipPathElement) where
(SVGClipPathElement a) == (SVGClipPathElement b) = js_eq a b
instance PToJSVal SVGClipPathElement where
pToJSVal = unSVGClipPathElement
instance PFromJSVal SVGClipPathElement where
pFromJSVal = SVGClipPathElement
instance ToJSVal SVGClipPathElement where
toJSVal = return . unSVGClipPathElement
instance FromJSVal SVGClipPathElement where
fromJSVal = return . fmap SVGClipPathElement . maybeJSNullOrUndefined
instance IsSVGGraphicsElement SVGClipPathElement
instance IsSVGElement SVGClipPathElement
instance IsElement SVGClipPathElement
instance IsNode SVGClipPathElement
instance IsEventTarget SVGClipPathElement
instance IsGObject SVGClipPathElement where
typeGType _ = gTypeSVGClipPathElement
foreign import javascript unsafe "window[\"SVGClipPathElement\"]" gTypeSVGClipPathElement :: GType
newtype SVGColor = SVGColor { unSVGColor :: JSVal }
instance Eq (SVGColor) where
(SVGColor a) == (SVGColor b) = js_eq a b
instance PToJSVal SVGColor where
pToJSVal = unSVGColor
instance PFromJSVal SVGColor where
pFromJSVal = SVGColor
instance ToJSVal SVGColor where
toJSVal = return . unSVGColor
instance FromJSVal SVGColor where
fromJSVal = return . fmap SVGColor . maybeJSNullOrUndefined
class IsCSSValue o => IsSVGColor o
toSVGColor :: IsSVGColor o => o -> SVGColor
toSVGColor = SVGColor . coerce
instance IsSVGColor SVGColor
instance IsCSSValue SVGColor
instance IsGObject SVGColor where
typeGType _ = gTypeSVGColor
foreign import javascript unsafe "window[\"SVGColor\"]" gTypeSVGColor :: GType
newtype SVGComponentTransferFunctionElement = SVGComponentTransferFunctionElement { unSVGComponentTransferFunctionElement :: JSVal }
instance Eq (SVGComponentTransferFunctionElement) where
(SVGComponentTransferFunctionElement a) == (SVGComponentTransferFunctionElement b) = js_eq a b
instance PToJSVal SVGComponentTransferFunctionElement where
pToJSVal = unSVGComponentTransferFunctionElement
instance PFromJSVal SVGComponentTransferFunctionElement where
pFromJSVal = SVGComponentTransferFunctionElement
instance ToJSVal SVGComponentTransferFunctionElement where
toJSVal = return . unSVGComponentTransferFunctionElement
instance FromJSVal SVGComponentTransferFunctionElement where
fromJSVal = return . fmap SVGComponentTransferFunctionElement . maybeJSNullOrUndefined
class IsSVGElement o => IsSVGComponentTransferFunctionElement o
toSVGComponentTransferFunctionElement :: IsSVGComponentTransferFunctionElement o => o -> SVGComponentTransferFunctionElement
toSVGComponentTransferFunctionElement = SVGComponentTransferFunctionElement . coerce
instance IsSVGComponentTransferFunctionElement SVGComponentTransferFunctionElement
instance IsSVGElement SVGComponentTransferFunctionElement
instance IsElement SVGComponentTransferFunctionElement
instance IsNode SVGComponentTransferFunctionElement
instance IsEventTarget SVGComponentTransferFunctionElement
instance IsGObject SVGComponentTransferFunctionElement where
typeGType _ = gTypeSVGComponentTransferFunctionElement
foreign import javascript unsafe "window[\"SVGComponentTransferFunctionElement\"]" gTypeSVGComponentTransferFunctionElement :: GType
newtype SVGCursorElement = SVGCursorElement { unSVGCursorElement :: JSVal }
instance Eq (SVGCursorElement) where
(SVGCursorElement a) == (SVGCursorElement b) = js_eq a b
instance PToJSVal SVGCursorElement where
pToJSVal = unSVGCursorElement
instance PFromJSVal SVGCursorElement where
pFromJSVal = SVGCursorElement
instance ToJSVal SVGCursorElement where
toJSVal = return . unSVGCursorElement
instance FromJSVal SVGCursorElement where
fromJSVal = return . fmap SVGCursorElement . maybeJSNullOrUndefined
instance IsSVGElement SVGCursorElement
instance IsElement SVGCursorElement
instance IsNode SVGCursorElement
instance IsEventTarget SVGCursorElement
instance IsGObject SVGCursorElement where
typeGType _ = gTypeSVGCursorElement
foreign import javascript unsafe "window[\"SVGCursorElement\"]" gTypeSVGCursorElement :: GType
newtype SVGDefsElement = SVGDefsElement { unSVGDefsElement :: JSVal }
instance Eq (SVGDefsElement) where
(SVGDefsElement a) == (SVGDefsElement b) = js_eq a b
instance PToJSVal SVGDefsElement where
pToJSVal = unSVGDefsElement
instance PFromJSVal SVGDefsElement where
pFromJSVal = SVGDefsElement
instance ToJSVal SVGDefsElement where
toJSVal = return . unSVGDefsElement
instance FromJSVal SVGDefsElement where
fromJSVal = return . fmap SVGDefsElement . maybeJSNullOrUndefined
instance IsSVGGraphicsElement SVGDefsElement
instance IsSVGElement SVGDefsElement
instance IsElement SVGDefsElement
instance IsNode SVGDefsElement
instance IsEventTarget SVGDefsElement
instance IsGObject SVGDefsElement where
typeGType _ = gTypeSVGDefsElement
foreign import javascript unsafe "window[\"SVGDefsElement\"]" gTypeSVGDefsElement :: GType
newtype SVGDescElement = SVGDescElement { unSVGDescElement :: JSVal }
instance Eq (SVGDescElement) where
(SVGDescElement a) == (SVGDescElement b) = js_eq a b
instance PToJSVal SVGDescElement where
pToJSVal = unSVGDescElement
instance PFromJSVal SVGDescElement where
pFromJSVal = SVGDescElement
instance ToJSVal SVGDescElement where
toJSVal = return . unSVGDescElement
instance FromJSVal SVGDescElement where
fromJSVal = return . fmap SVGDescElement . maybeJSNullOrUndefined
instance IsSVGElement SVGDescElement
instance IsElement SVGDescElement
instance IsNode SVGDescElement
instance IsEventTarget SVGDescElement
instance IsGObject SVGDescElement where
typeGType _ = gTypeSVGDescElement
foreign import javascript unsafe "window[\"SVGDescElement\"]" gTypeSVGDescElement :: GType
newtype SVGDocument = SVGDocument { unSVGDocument :: JSVal }
instance Eq (SVGDocument) where
(SVGDocument a) == (SVGDocument b) = js_eq a b
instance PToJSVal SVGDocument where
pToJSVal = unSVGDocument
instance PFromJSVal SVGDocument where
pFromJSVal = SVGDocument
instance ToJSVal SVGDocument where
toJSVal = return . unSVGDocument
instance FromJSVal SVGDocument where
fromJSVal = return . fmap SVGDocument . maybeJSNullOrUndefined
instance IsDocument SVGDocument
instance IsNode SVGDocument
instance IsEventTarget SVGDocument
instance IsGObject SVGDocument where
typeGType _ = gTypeSVGDocument
foreign import javascript unsafe "window[\"SVGDocument\"]" gTypeSVGDocument :: GType
newtype SVGElement = SVGElement { unSVGElement :: JSVal }
instance Eq (SVGElement) where
(SVGElement a) == (SVGElement b) = js_eq a b
instance PToJSVal SVGElement where
pToJSVal = unSVGElement
instance PFromJSVal SVGElement where
pFromJSVal = SVGElement
instance ToJSVal SVGElement where
toJSVal = return . unSVGElement
instance FromJSVal SVGElement where
fromJSVal = return . fmap SVGElement . maybeJSNullOrUndefined
class IsElement o => IsSVGElement o
toSVGElement :: IsSVGElement o => o -> SVGElement
toSVGElement = SVGElement . coerce
instance IsSVGElement SVGElement
instance IsElement SVGElement
instance IsNode SVGElement
instance IsEventTarget SVGElement
instance IsGObject SVGElement where
typeGType _ = gTypeSVGElement
foreign import javascript unsafe "window[\"SVGElement\"]" gTypeSVGElement :: GType
newtype SVGEllipseElement = SVGEllipseElement { unSVGEllipseElement :: JSVal }
instance Eq (SVGEllipseElement) where
(SVGEllipseElement a) == (SVGEllipseElement b) = js_eq a b
instance PToJSVal SVGEllipseElement where
pToJSVal = unSVGEllipseElement
instance PFromJSVal SVGEllipseElement where
pFromJSVal = SVGEllipseElement
instance ToJSVal SVGEllipseElement where
toJSVal = return . unSVGEllipseElement
instance FromJSVal SVGEllipseElement where
fromJSVal = return . fmap SVGEllipseElement . maybeJSNullOrUndefined
instance IsSVGGraphicsElement SVGEllipseElement
instance IsSVGElement SVGEllipseElement
instance IsElement SVGEllipseElement
instance IsNode SVGEllipseElement
instance IsEventTarget SVGEllipseElement
instance IsGObject SVGEllipseElement where
typeGType _ = gTypeSVGEllipseElement
foreign import javascript unsafe "window[\"SVGEllipseElement\"]" gTypeSVGEllipseElement :: GType
newtype SVGExternalResourcesRequired = SVGExternalResourcesRequired { unSVGExternalResourcesRequired :: JSVal }
instance Eq (SVGExternalResourcesRequired) where
(SVGExternalResourcesRequired a) == (SVGExternalResourcesRequired b) = js_eq a b
instance PToJSVal SVGExternalResourcesRequired where
pToJSVal = unSVGExternalResourcesRequired
instance PFromJSVal SVGExternalResourcesRequired where
pFromJSVal = SVGExternalResourcesRequired
instance ToJSVal SVGExternalResourcesRequired where
toJSVal = return . unSVGExternalResourcesRequired
instance FromJSVal SVGExternalResourcesRequired where
fromJSVal = return . fmap SVGExternalResourcesRequired . maybeJSNullOrUndefined
instance IsGObject SVGExternalResourcesRequired where
typeGType _ = gTypeSVGExternalResourcesRequired
foreign import javascript unsafe "window[\"SVGExternalResourcesRequired\"]" gTypeSVGExternalResourcesRequired :: GType
newtype SVGFEBlendElement = SVGFEBlendElement { unSVGFEBlendElement :: JSVal }
instance Eq (SVGFEBlendElement) where
(SVGFEBlendElement a) == (SVGFEBlendElement b) = js_eq a b
instance PToJSVal SVGFEBlendElement where
pToJSVal = unSVGFEBlendElement
instance PFromJSVal SVGFEBlendElement where
pFromJSVal = SVGFEBlendElement
instance ToJSVal SVGFEBlendElement where
toJSVal = return . unSVGFEBlendElement
instance FromJSVal SVGFEBlendElement where
fromJSVal = return . fmap SVGFEBlendElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFEBlendElement
instance IsElement SVGFEBlendElement
instance IsNode SVGFEBlendElement
instance IsEventTarget SVGFEBlendElement
instance IsGObject SVGFEBlendElement where
typeGType _ = gTypeSVGFEBlendElement
foreign import javascript unsafe "window[\"SVGFEBlendElement\"]" gTypeSVGFEBlendElement :: GType
newtype SVGFEColorMatrixElement = SVGFEColorMatrixElement { unSVGFEColorMatrixElement :: JSVal }
instance Eq (SVGFEColorMatrixElement) where
(SVGFEColorMatrixElement a) == (SVGFEColorMatrixElement b) = js_eq a b
instance PToJSVal SVGFEColorMatrixElement where
pToJSVal = unSVGFEColorMatrixElement
instance PFromJSVal SVGFEColorMatrixElement where
pFromJSVal = SVGFEColorMatrixElement
instance ToJSVal SVGFEColorMatrixElement where
toJSVal = return . unSVGFEColorMatrixElement
instance FromJSVal SVGFEColorMatrixElement where
fromJSVal = return . fmap SVGFEColorMatrixElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFEColorMatrixElement
instance IsElement SVGFEColorMatrixElement
instance IsNode SVGFEColorMatrixElement
instance IsEventTarget SVGFEColorMatrixElement
instance IsGObject SVGFEColorMatrixElement where
typeGType _ = gTypeSVGFEColorMatrixElement
foreign import javascript unsafe "window[\"SVGFEColorMatrixElement\"]" gTypeSVGFEColorMatrixElement :: GType
newtype SVGFEComponentTransferElement = SVGFEComponentTransferElement { unSVGFEComponentTransferElement :: JSVal }
instance Eq (SVGFEComponentTransferElement) where
(SVGFEComponentTransferElement a) == (SVGFEComponentTransferElement b) = js_eq a b
instance PToJSVal SVGFEComponentTransferElement where
pToJSVal = unSVGFEComponentTransferElement
instance PFromJSVal SVGFEComponentTransferElement where
pFromJSVal = SVGFEComponentTransferElement
instance ToJSVal SVGFEComponentTransferElement where
toJSVal = return . unSVGFEComponentTransferElement
instance FromJSVal SVGFEComponentTransferElement where
fromJSVal = return . fmap SVGFEComponentTransferElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFEComponentTransferElement
instance IsElement SVGFEComponentTransferElement
instance IsNode SVGFEComponentTransferElement
instance IsEventTarget SVGFEComponentTransferElement
instance IsGObject SVGFEComponentTransferElement where
typeGType _ = gTypeSVGFEComponentTransferElement
foreign import javascript unsafe "window[\"SVGFEComponentTransferElement\"]" gTypeSVGFEComponentTransferElement :: GType
newtype SVGFECompositeElement = SVGFECompositeElement { unSVGFECompositeElement :: JSVal }
instance Eq (SVGFECompositeElement) where
(SVGFECompositeElement a) == (SVGFECompositeElement b) = js_eq a b
instance PToJSVal SVGFECompositeElement where
pToJSVal = unSVGFECompositeElement
instance PFromJSVal SVGFECompositeElement where
pFromJSVal = SVGFECompositeElement
instance ToJSVal SVGFECompositeElement where
toJSVal = return . unSVGFECompositeElement
instance FromJSVal SVGFECompositeElement where
fromJSVal = return . fmap SVGFECompositeElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFECompositeElement
instance IsElement SVGFECompositeElement
instance IsNode SVGFECompositeElement
instance IsEventTarget SVGFECompositeElement
instance IsGObject SVGFECompositeElement where
typeGType _ = gTypeSVGFECompositeElement
foreign import javascript unsafe "window[\"SVGFECompositeElement\"]" gTypeSVGFECompositeElement :: GType
newtype SVGFEConvolveMatrixElement = SVGFEConvolveMatrixElement { unSVGFEConvolveMatrixElement :: JSVal }
instance Eq (SVGFEConvolveMatrixElement) where
(SVGFEConvolveMatrixElement a) == (SVGFEConvolveMatrixElement b) = js_eq a b
instance PToJSVal SVGFEConvolveMatrixElement where
pToJSVal = unSVGFEConvolveMatrixElement
instance PFromJSVal SVGFEConvolveMatrixElement where
pFromJSVal = SVGFEConvolveMatrixElement
instance ToJSVal SVGFEConvolveMatrixElement where
toJSVal = return . unSVGFEConvolveMatrixElement
instance FromJSVal SVGFEConvolveMatrixElement where
fromJSVal = return . fmap SVGFEConvolveMatrixElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFEConvolveMatrixElement
instance IsElement SVGFEConvolveMatrixElement
instance IsNode SVGFEConvolveMatrixElement
instance IsEventTarget SVGFEConvolveMatrixElement
instance IsGObject SVGFEConvolveMatrixElement where
typeGType _ = gTypeSVGFEConvolveMatrixElement
foreign import javascript unsafe "window[\"SVGFEConvolveMatrixElement\"]" gTypeSVGFEConvolveMatrixElement :: GType
newtype SVGFEDiffuseLightingElement = SVGFEDiffuseLightingElement { unSVGFEDiffuseLightingElement :: JSVal }
instance Eq (SVGFEDiffuseLightingElement) where
(SVGFEDiffuseLightingElement a) == (SVGFEDiffuseLightingElement b) = js_eq a b
instance PToJSVal SVGFEDiffuseLightingElement where
pToJSVal = unSVGFEDiffuseLightingElement
instance PFromJSVal SVGFEDiffuseLightingElement where
pFromJSVal = SVGFEDiffuseLightingElement
instance ToJSVal SVGFEDiffuseLightingElement where
toJSVal = return . unSVGFEDiffuseLightingElement
instance FromJSVal SVGFEDiffuseLightingElement where
fromJSVal = return . fmap SVGFEDiffuseLightingElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFEDiffuseLightingElement
instance IsElement SVGFEDiffuseLightingElement
instance IsNode SVGFEDiffuseLightingElement
instance IsEventTarget SVGFEDiffuseLightingElement
instance IsGObject SVGFEDiffuseLightingElement where
typeGType _ = gTypeSVGFEDiffuseLightingElement
foreign import javascript unsafe "window[\"SVGFEDiffuseLightingElement\"]" gTypeSVGFEDiffuseLightingElement :: GType
newtype SVGFEDisplacementMapElement = SVGFEDisplacementMapElement { unSVGFEDisplacementMapElement :: JSVal }
instance Eq (SVGFEDisplacementMapElement) where
(SVGFEDisplacementMapElement a) == (SVGFEDisplacementMapElement b) = js_eq a b
instance PToJSVal SVGFEDisplacementMapElement where
pToJSVal = unSVGFEDisplacementMapElement
instance PFromJSVal SVGFEDisplacementMapElement where
pFromJSVal = SVGFEDisplacementMapElement
instance ToJSVal SVGFEDisplacementMapElement where
toJSVal = return . unSVGFEDisplacementMapElement
instance FromJSVal SVGFEDisplacementMapElement where
fromJSVal = return . fmap SVGFEDisplacementMapElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFEDisplacementMapElement
instance IsElement SVGFEDisplacementMapElement
instance IsNode SVGFEDisplacementMapElement
instance IsEventTarget SVGFEDisplacementMapElement
instance IsGObject SVGFEDisplacementMapElement where
typeGType _ = gTypeSVGFEDisplacementMapElement
foreign import javascript unsafe "window[\"SVGFEDisplacementMapElement\"]" gTypeSVGFEDisplacementMapElement :: GType
newtype SVGFEDistantLightElement = SVGFEDistantLightElement { unSVGFEDistantLightElement :: JSVal }
instance Eq (SVGFEDistantLightElement) where
(SVGFEDistantLightElement a) == (SVGFEDistantLightElement b) = js_eq a b
instance PToJSVal SVGFEDistantLightElement where
pToJSVal = unSVGFEDistantLightElement
instance PFromJSVal SVGFEDistantLightElement where
pFromJSVal = SVGFEDistantLightElement
instance ToJSVal SVGFEDistantLightElement where
toJSVal = return . unSVGFEDistantLightElement
instance FromJSVal SVGFEDistantLightElement where
fromJSVal = return . fmap SVGFEDistantLightElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFEDistantLightElement
instance IsElement SVGFEDistantLightElement
instance IsNode SVGFEDistantLightElement
instance IsEventTarget SVGFEDistantLightElement
instance IsGObject SVGFEDistantLightElement where
typeGType _ = gTypeSVGFEDistantLightElement
foreign import javascript unsafe "window[\"SVGFEDistantLightElement\"]" gTypeSVGFEDistantLightElement :: GType
newtype SVGFEDropShadowElement = SVGFEDropShadowElement { unSVGFEDropShadowElement :: JSVal }
instance Eq (SVGFEDropShadowElement) where
(SVGFEDropShadowElement a) == (SVGFEDropShadowElement b) = js_eq a b
instance PToJSVal SVGFEDropShadowElement where
pToJSVal = unSVGFEDropShadowElement
instance PFromJSVal SVGFEDropShadowElement where
pFromJSVal = SVGFEDropShadowElement
instance ToJSVal SVGFEDropShadowElement where
toJSVal = return . unSVGFEDropShadowElement
instance FromJSVal SVGFEDropShadowElement where
fromJSVal = return . fmap SVGFEDropShadowElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFEDropShadowElement
instance IsElement SVGFEDropShadowElement
instance IsNode SVGFEDropShadowElement
instance IsEventTarget SVGFEDropShadowElement
instance IsGObject SVGFEDropShadowElement where
typeGType _ = gTypeSVGFEDropShadowElement
foreign import javascript unsafe "window[\"SVGFEDropShadowElement\"]" gTypeSVGFEDropShadowElement :: GType
newtype SVGFEFloodElement = SVGFEFloodElement { unSVGFEFloodElement :: JSVal }
instance Eq (SVGFEFloodElement) where
(SVGFEFloodElement a) == (SVGFEFloodElement b) = js_eq a b
instance PToJSVal SVGFEFloodElement where
pToJSVal = unSVGFEFloodElement
instance PFromJSVal SVGFEFloodElement where
pFromJSVal = SVGFEFloodElement
instance ToJSVal SVGFEFloodElement where
toJSVal = return . unSVGFEFloodElement
instance FromJSVal SVGFEFloodElement where
fromJSVal = return . fmap SVGFEFloodElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFEFloodElement
instance IsElement SVGFEFloodElement
instance IsNode SVGFEFloodElement
instance IsEventTarget SVGFEFloodElement
instance IsGObject SVGFEFloodElement where
typeGType _ = gTypeSVGFEFloodElement
foreign import javascript unsafe "window[\"SVGFEFloodElement\"]" gTypeSVGFEFloodElement :: GType
newtype SVGFEFuncAElement = SVGFEFuncAElement { unSVGFEFuncAElement :: JSVal }
instance Eq (SVGFEFuncAElement) where
(SVGFEFuncAElement a) == (SVGFEFuncAElement b) = js_eq a b
instance PToJSVal SVGFEFuncAElement where
pToJSVal = unSVGFEFuncAElement
instance PFromJSVal SVGFEFuncAElement where
pFromJSVal = SVGFEFuncAElement
instance ToJSVal SVGFEFuncAElement where
toJSVal = return . unSVGFEFuncAElement
instance FromJSVal SVGFEFuncAElement where
fromJSVal = return . fmap SVGFEFuncAElement . maybeJSNullOrUndefined
instance IsSVGComponentTransferFunctionElement SVGFEFuncAElement
instance IsSVGElement SVGFEFuncAElement
instance IsElement SVGFEFuncAElement
instance IsNode SVGFEFuncAElement
instance IsEventTarget SVGFEFuncAElement
instance IsGObject SVGFEFuncAElement where
typeGType _ = gTypeSVGFEFuncAElement
foreign import javascript unsafe "window[\"SVGFEFuncAElement\"]" gTypeSVGFEFuncAElement :: GType
newtype SVGFEFuncBElement = SVGFEFuncBElement { unSVGFEFuncBElement :: JSVal }
instance Eq (SVGFEFuncBElement) where
(SVGFEFuncBElement a) == (SVGFEFuncBElement b) = js_eq a b
instance PToJSVal SVGFEFuncBElement where
pToJSVal = unSVGFEFuncBElement
instance PFromJSVal SVGFEFuncBElement where
pFromJSVal = SVGFEFuncBElement
instance ToJSVal SVGFEFuncBElement where
toJSVal = return . unSVGFEFuncBElement
instance FromJSVal SVGFEFuncBElement where
fromJSVal = return . fmap SVGFEFuncBElement . maybeJSNullOrUndefined
instance IsSVGComponentTransferFunctionElement SVGFEFuncBElement
instance IsSVGElement SVGFEFuncBElement
instance IsElement SVGFEFuncBElement
instance IsNode SVGFEFuncBElement
instance IsEventTarget SVGFEFuncBElement
instance IsGObject SVGFEFuncBElement where
typeGType _ = gTypeSVGFEFuncBElement
foreign import javascript unsafe "window[\"SVGFEFuncBElement\"]" gTypeSVGFEFuncBElement :: GType
newtype SVGFEFuncGElement = SVGFEFuncGElement { unSVGFEFuncGElement :: JSVal }
instance Eq (SVGFEFuncGElement) where
(SVGFEFuncGElement a) == (SVGFEFuncGElement b) = js_eq a b
instance PToJSVal SVGFEFuncGElement where
pToJSVal = unSVGFEFuncGElement
instance PFromJSVal SVGFEFuncGElement where
pFromJSVal = SVGFEFuncGElement
instance ToJSVal SVGFEFuncGElement where
toJSVal = return . unSVGFEFuncGElement
instance FromJSVal SVGFEFuncGElement where
fromJSVal = return . fmap SVGFEFuncGElement . maybeJSNullOrUndefined
instance IsSVGComponentTransferFunctionElement SVGFEFuncGElement
instance IsSVGElement SVGFEFuncGElement
instance IsElement SVGFEFuncGElement
instance IsNode SVGFEFuncGElement
instance IsEventTarget SVGFEFuncGElement
instance IsGObject SVGFEFuncGElement where
typeGType _ = gTypeSVGFEFuncGElement
foreign import javascript unsafe "window[\"SVGFEFuncGElement\"]" gTypeSVGFEFuncGElement :: GType
newtype SVGFEFuncRElement = SVGFEFuncRElement { unSVGFEFuncRElement :: JSVal }
instance Eq (SVGFEFuncRElement) where
(SVGFEFuncRElement a) == (SVGFEFuncRElement b) = js_eq a b
instance PToJSVal SVGFEFuncRElement where
pToJSVal = unSVGFEFuncRElement
instance PFromJSVal SVGFEFuncRElement where
pFromJSVal = SVGFEFuncRElement
instance ToJSVal SVGFEFuncRElement where
toJSVal = return . unSVGFEFuncRElement
instance FromJSVal SVGFEFuncRElement where
fromJSVal = return . fmap SVGFEFuncRElement . maybeJSNullOrUndefined
instance IsSVGComponentTransferFunctionElement SVGFEFuncRElement
instance IsSVGElement SVGFEFuncRElement
instance IsElement SVGFEFuncRElement
instance IsNode SVGFEFuncRElement
instance IsEventTarget SVGFEFuncRElement
instance IsGObject SVGFEFuncRElement where
typeGType _ = gTypeSVGFEFuncRElement
foreign import javascript unsafe "window[\"SVGFEFuncRElement\"]" gTypeSVGFEFuncRElement :: GType
newtype SVGFEGaussianBlurElement = SVGFEGaussianBlurElement { unSVGFEGaussianBlurElement :: JSVal }
instance Eq (SVGFEGaussianBlurElement) where
(SVGFEGaussianBlurElement a) == (SVGFEGaussianBlurElement b) = js_eq a b
instance PToJSVal SVGFEGaussianBlurElement where
pToJSVal = unSVGFEGaussianBlurElement
instance PFromJSVal SVGFEGaussianBlurElement where
pFromJSVal = SVGFEGaussianBlurElement
instance ToJSVal SVGFEGaussianBlurElement where
toJSVal = return . unSVGFEGaussianBlurElement
instance FromJSVal SVGFEGaussianBlurElement where
fromJSVal = return . fmap SVGFEGaussianBlurElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFEGaussianBlurElement
instance IsElement SVGFEGaussianBlurElement
instance IsNode SVGFEGaussianBlurElement
instance IsEventTarget SVGFEGaussianBlurElement
instance IsGObject SVGFEGaussianBlurElement where
typeGType _ = gTypeSVGFEGaussianBlurElement
foreign import javascript unsafe "window[\"SVGFEGaussianBlurElement\"]" gTypeSVGFEGaussianBlurElement :: GType
newtype SVGFEImageElement = SVGFEImageElement { unSVGFEImageElement :: JSVal }
instance Eq (SVGFEImageElement) where
(SVGFEImageElement a) == (SVGFEImageElement b) = js_eq a b
instance PToJSVal SVGFEImageElement where
pToJSVal = unSVGFEImageElement
instance PFromJSVal SVGFEImageElement where
pFromJSVal = SVGFEImageElement
instance ToJSVal SVGFEImageElement where
toJSVal = return . unSVGFEImageElement
instance FromJSVal SVGFEImageElement where
fromJSVal = return . fmap SVGFEImageElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFEImageElement
instance IsElement SVGFEImageElement
instance IsNode SVGFEImageElement
instance IsEventTarget SVGFEImageElement
instance IsGObject SVGFEImageElement where
typeGType _ = gTypeSVGFEImageElement
foreign import javascript unsafe "window[\"SVGFEImageElement\"]" gTypeSVGFEImageElement :: GType
newtype SVGFEMergeElement = SVGFEMergeElement { unSVGFEMergeElement :: JSVal }
instance Eq (SVGFEMergeElement) where
(SVGFEMergeElement a) == (SVGFEMergeElement b) = js_eq a b
instance PToJSVal SVGFEMergeElement where
pToJSVal = unSVGFEMergeElement
instance PFromJSVal SVGFEMergeElement where
pFromJSVal = SVGFEMergeElement
instance ToJSVal SVGFEMergeElement where
toJSVal = return . unSVGFEMergeElement
instance FromJSVal SVGFEMergeElement where
fromJSVal = return . fmap SVGFEMergeElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFEMergeElement
instance IsElement SVGFEMergeElement
instance IsNode SVGFEMergeElement
instance IsEventTarget SVGFEMergeElement
instance IsGObject SVGFEMergeElement where
typeGType _ = gTypeSVGFEMergeElement
foreign import javascript unsafe "window[\"SVGFEMergeElement\"]" gTypeSVGFEMergeElement :: GType
newtype SVGFEMergeNodeElement = SVGFEMergeNodeElement { unSVGFEMergeNodeElement :: JSVal }
instance Eq (SVGFEMergeNodeElement) where
(SVGFEMergeNodeElement a) == (SVGFEMergeNodeElement b) = js_eq a b
instance PToJSVal SVGFEMergeNodeElement where
pToJSVal = unSVGFEMergeNodeElement
instance PFromJSVal SVGFEMergeNodeElement where
pFromJSVal = SVGFEMergeNodeElement
instance ToJSVal SVGFEMergeNodeElement where
toJSVal = return . unSVGFEMergeNodeElement
instance FromJSVal SVGFEMergeNodeElement where
fromJSVal = return . fmap SVGFEMergeNodeElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFEMergeNodeElement
instance IsElement SVGFEMergeNodeElement
instance IsNode SVGFEMergeNodeElement
instance IsEventTarget SVGFEMergeNodeElement
instance IsGObject SVGFEMergeNodeElement where
typeGType _ = gTypeSVGFEMergeNodeElement
foreign import javascript unsafe "window[\"SVGFEMergeNodeElement\"]" gTypeSVGFEMergeNodeElement :: GType
newtype SVGFEMorphologyElement = SVGFEMorphologyElement { unSVGFEMorphologyElement :: JSVal }
instance Eq (SVGFEMorphologyElement) where
(SVGFEMorphologyElement a) == (SVGFEMorphologyElement b) = js_eq a b
instance PToJSVal SVGFEMorphologyElement where
pToJSVal = unSVGFEMorphologyElement
instance PFromJSVal SVGFEMorphologyElement where
pFromJSVal = SVGFEMorphologyElement
instance ToJSVal SVGFEMorphologyElement where
toJSVal = return . unSVGFEMorphologyElement
instance FromJSVal SVGFEMorphologyElement where
fromJSVal = return . fmap SVGFEMorphologyElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFEMorphologyElement
instance IsElement SVGFEMorphologyElement
instance IsNode SVGFEMorphologyElement
instance IsEventTarget SVGFEMorphologyElement
instance IsGObject SVGFEMorphologyElement where
typeGType _ = gTypeSVGFEMorphologyElement
foreign import javascript unsafe "window[\"SVGFEMorphologyElement\"]" gTypeSVGFEMorphologyElement :: GType
newtype SVGFEOffsetElement = SVGFEOffsetElement { unSVGFEOffsetElement :: JSVal }
instance Eq (SVGFEOffsetElement) where
(SVGFEOffsetElement a) == (SVGFEOffsetElement b) = js_eq a b
instance PToJSVal SVGFEOffsetElement where
pToJSVal = unSVGFEOffsetElement
instance PFromJSVal SVGFEOffsetElement where
pFromJSVal = SVGFEOffsetElement
instance ToJSVal SVGFEOffsetElement where
toJSVal = return . unSVGFEOffsetElement
instance FromJSVal SVGFEOffsetElement where
fromJSVal = return . fmap SVGFEOffsetElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFEOffsetElement
instance IsElement SVGFEOffsetElement
instance IsNode SVGFEOffsetElement
instance IsEventTarget SVGFEOffsetElement
instance IsGObject SVGFEOffsetElement where
typeGType _ = gTypeSVGFEOffsetElement
foreign import javascript unsafe "window[\"SVGFEOffsetElement\"]" gTypeSVGFEOffsetElement :: GType
newtype SVGFEPointLightElement = SVGFEPointLightElement { unSVGFEPointLightElement :: JSVal }
instance Eq (SVGFEPointLightElement) where
(SVGFEPointLightElement a) == (SVGFEPointLightElement b) = js_eq a b
instance PToJSVal SVGFEPointLightElement where
pToJSVal = unSVGFEPointLightElement
instance PFromJSVal SVGFEPointLightElement where
pFromJSVal = SVGFEPointLightElement
instance ToJSVal SVGFEPointLightElement where
toJSVal = return . unSVGFEPointLightElement
instance FromJSVal SVGFEPointLightElement where
fromJSVal = return . fmap SVGFEPointLightElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFEPointLightElement
instance IsElement SVGFEPointLightElement
instance IsNode SVGFEPointLightElement
instance IsEventTarget SVGFEPointLightElement
instance IsGObject SVGFEPointLightElement where
typeGType _ = gTypeSVGFEPointLightElement
foreign import javascript unsafe "window[\"SVGFEPointLightElement\"]" gTypeSVGFEPointLightElement :: GType
newtype SVGFESpecularLightingElement = SVGFESpecularLightingElement { unSVGFESpecularLightingElement :: JSVal }
instance Eq (SVGFESpecularLightingElement) where
(SVGFESpecularLightingElement a) == (SVGFESpecularLightingElement b) = js_eq a b
instance PToJSVal SVGFESpecularLightingElement where
pToJSVal = unSVGFESpecularLightingElement
instance PFromJSVal SVGFESpecularLightingElement where
pFromJSVal = SVGFESpecularLightingElement
instance ToJSVal SVGFESpecularLightingElement where
toJSVal = return . unSVGFESpecularLightingElement
instance FromJSVal SVGFESpecularLightingElement where
fromJSVal = return . fmap SVGFESpecularLightingElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFESpecularLightingElement
instance IsElement SVGFESpecularLightingElement
instance IsNode SVGFESpecularLightingElement
instance IsEventTarget SVGFESpecularLightingElement
instance IsGObject SVGFESpecularLightingElement where
typeGType _ = gTypeSVGFESpecularLightingElement
foreign import javascript unsafe "window[\"SVGFESpecularLightingElement\"]" gTypeSVGFESpecularLightingElement :: GType
newtype SVGFESpotLightElement = SVGFESpotLightElement { unSVGFESpotLightElement :: JSVal }
instance Eq (SVGFESpotLightElement) where
(SVGFESpotLightElement a) == (SVGFESpotLightElement b) = js_eq a b
instance PToJSVal SVGFESpotLightElement where
pToJSVal = unSVGFESpotLightElement
instance PFromJSVal SVGFESpotLightElement where
pFromJSVal = SVGFESpotLightElement
instance ToJSVal SVGFESpotLightElement where
toJSVal = return . unSVGFESpotLightElement
instance FromJSVal SVGFESpotLightElement where
fromJSVal = return . fmap SVGFESpotLightElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFESpotLightElement
instance IsElement SVGFESpotLightElement
instance IsNode SVGFESpotLightElement
instance IsEventTarget SVGFESpotLightElement
instance IsGObject SVGFESpotLightElement where
typeGType _ = gTypeSVGFESpotLightElement
foreign import javascript unsafe "window[\"SVGFESpotLightElement\"]" gTypeSVGFESpotLightElement :: GType
newtype SVGFETileElement = SVGFETileElement { unSVGFETileElement :: JSVal }
instance Eq (SVGFETileElement) where
(SVGFETileElement a) == (SVGFETileElement b) = js_eq a b
instance PToJSVal SVGFETileElement where
pToJSVal = unSVGFETileElement
instance PFromJSVal SVGFETileElement where
pFromJSVal = SVGFETileElement
instance ToJSVal SVGFETileElement where
toJSVal = return . unSVGFETileElement
instance FromJSVal SVGFETileElement where
fromJSVal = return . fmap SVGFETileElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFETileElement
instance IsElement SVGFETileElement
instance IsNode SVGFETileElement
instance IsEventTarget SVGFETileElement
instance IsGObject SVGFETileElement where
typeGType _ = gTypeSVGFETileElement
foreign import javascript unsafe "window[\"SVGFETileElement\"]" gTypeSVGFETileElement :: GType
newtype SVGFETurbulenceElement = SVGFETurbulenceElement { unSVGFETurbulenceElement :: JSVal }
instance Eq (SVGFETurbulenceElement) where
(SVGFETurbulenceElement a) == (SVGFETurbulenceElement b) = js_eq a b
instance PToJSVal SVGFETurbulenceElement where
pToJSVal = unSVGFETurbulenceElement
instance PFromJSVal SVGFETurbulenceElement where
pFromJSVal = SVGFETurbulenceElement
instance ToJSVal SVGFETurbulenceElement where
toJSVal = return . unSVGFETurbulenceElement
instance FromJSVal SVGFETurbulenceElement where
fromJSVal = return . fmap SVGFETurbulenceElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFETurbulenceElement
instance IsElement SVGFETurbulenceElement
instance IsNode SVGFETurbulenceElement
instance IsEventTarget SVGFETurbulenceElement
instance IsGObject SVGFETurbulenceElement where
typeGType _ = gTypeSVGFETurbulenceElement
foreign import javascript unsafe "window[\"SVGFETurbulenceElement\"]" gTypeSVGFETurbulenceElement :: GType
newtype SVGFilterElement = SVGFilterElement { unSVGFilterElement :: JSVal }
instance Eq (SVGFilterElement) where
(SVGFilterElement a) == (SVGFilterElement b) = js_eq a b
instance PToJSVal SVGFilterElement where
pToJSVal = unSVGFilterElement
instance PFromJSVal SVGFilterElement where
pFromJSVal = SVGFilterElement
instance ToJSVal SVGFilterElement where
toJSVal = return . unSVGFilterElement
instance FromJSVal SVGFilterElement where
fromJSVal = return . fmap SVGFilterElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFilterElement
instance IsElement SVGFilterElement
instance IsNode SVGFilterElement
instance IsEventTarget SVGFilterElement
instance IsGObject SVGFilterElement where
typeGType _ = gTypeSVGFilterElement
foreign import javascript unsafe "window[\"SVGFilterElement\"]" gTypeSVGFilterElement :: GType
newtype SVGFilterPrimitiveStandardAttributes = SVGFilterPrimitiveStandardAttributes { unSVGFilterPrimitiveStandardAttributes :: JSVal }
instance Eq (SVGFilterPrimitiveStandardAttributes) where
(SVGFilterPrimitiveStandardAttributes a) == (SVGFilterPrimitiveStandardAttributes b) = js_eq a b
instance PToJSVal SVGFilterPrimitiveStandardAttributes where
pToJSVal = unSVGFilterPrimitiveStandardAttributes
instance PFromJSVal SVGFilterPrimitiveStandardAttributes where
pFromJSVal = SVGFilterPrimitiveStandardAttributes
instance ToJSVal SVGFilterPrimitiveStandardAttributes where
toJSVal = return . unSVGFilterPrimitiveStandardAttributes
instance FromJSVal SVGFilterPrimitiveStandardAttributes where
fromJSVal = return . fmap SVGFilterPrimitiveStandardAttributes . maybeJSNullOrUndefined
instance IsGObject SVGFilterPrimitiveStandardAttributes where
typeGType _ = gTypeSVGFilterPrimitiveStandardAttributes
foreign import javascript unsafe "window[\"SVGFilterPrimitiveStandardAttributes\"]" gTypeSVGFilterPrimitiveStandardAttributes :: GType
newtype SVGFitToViewBox = SVGFitToViewBox { unSVGFitToViewBox :: JSVal }
instance Eq (SVGFitToViewBox) where
(SVGFitToViewBox a) == (SVGFitToViewBox b) = js_eq a b
instance PToJSVal SVGFitToViewBox where
pToJSVal = unSVGFitToViewBox
instance PFromJSVal SVGFitToViewBox where
pFromJSVal = SVGFitToViewBox
instance ToJSVal SVGFitToViewBox where
toJSVal = return . unSVGFitToViewBox
instance FromJSVal SVGFitToViewBox where
fromJSVal = return . fmap SVGFitToViewBox . maybeJSNullOrUndefined
instance IsGObject SVGFitToViewBox where
typeGType _ = gTypeSVGFitToViewBox
foreign import javascript unsafe "window[\"SVGFitToViewBox\"]" gTypeSVGFitToViewBox :: GType
newtype SVGFontElement = SVGFontElement { unSVGFontElement :: JSVal }
instance Eq (SVGFontElement) where
(SVGFontElement a) == (SVGFontElement b) = js_eq a b
instance PToJSVal SVGFontElement where
pToJSVal = unSVGFontElement
instance PFromJSVal SVGFontElement where
pFromJSVal = SVGFontElement
instance ToJSVal SVGFontElement where
toJSVal = return . unSVGFontElement
instance FromJSVal SVGFontElement where
fromJSVal = return . fmap SVGFontElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFontElement
instance IsElement SVGFontElement
instance IsNode SVGFontElement
instance IsEventTarget SVGFontElement
instance IsGObject SVGFontElement where
typeGType _ = gTypeSVGFontElement
foreign import javascript unsafe "window[\"SVGFontElement\"]" gTypeSVGFontElement :: GType
newtype SVGFontFaceElement = SVGFontFaceElement { unSVGFontFaceElement :: JSVal }
instance Eq (SVGFontFaceElement) where
(SVGFontFaceElement a) == (SVGFontFaceElement b) = js_eq a b
instance PToJSVal SVGFontFaceElement where
pToJSVal = unSVGFontFaceElement
instance PFromJSVal SVGFontFaceElement where
pFromJSVal = SVGFontFaceElement
instance ToJSVal SVGFontFaceElement where
toJSVal = return . unSVGFontFaceElement
instance FromJSVal SVGFontFaceElement where
fromJSVal = return . fmap SVGFontFaceElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFontFaceElement
instance IsElement SVGFontFaceElement
instance IsNode SVGFontFaceElement
instance IsEventTarget SVGFontFaceElement
instance IsGObject SVGFontFaceElement where
typeGType _ = gTypeSVGFontFaceElement
foreign import javascript unsafe "window[\"SVGFontFaceElement\"]" gTypeSVGFontFaceElement :: GType
newtype SVGFontFaceFormatElement = SVGFontFaceFormatElement { unSVGFontFaceFormatElement :: JSVal }
instance Eq (SVGFontFaceFormatElement) where
(SVGFontFaceFormatElement a) == (SVGFontFaceFormatElement b) = js_eq a b
instance PToJSVal SVGFontFaceFormatElement where
pToJSVal = unSVGFontFaceFormatElement
instance PFromJSVal SVGFontFaceFormatElement where
pFromJSVal = SVGFontFaceFormatElement
instance ToJSVal SVGFontFaceFormatElement where
toJSVal = return . unSVGFontFaceFormatElement
instance FromJSVal SVGFontFaceFormatElement where
fromJSVal = return . fmap SVGFontFaceFormatElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFontFaceFormatElement
instance IsElement SVGFontFaceFormatElement
instance IsNode SVGFontFaceFormatElement
instance IsEventTarget SVGFontFaceFormatElement
instance IsGObject SVGFontFaceFormatElement where
typeGType _ = gTypeSVGFontFaceFormatElement
foreign import javascript unsafe "window[\"SVGFontFaceFormatElement\"]" gTypeSVGFontFaceFormatElement :: GType
newtype SVGFontFaceNameElement = SVGFontFaceNameElement { unSVGFontFaceNameElement :: JSVal }
instance Eq (SVGFontFaceNameElement) where
(SVGFontFaceNameElement a) == (SVGFontFaceNameElement b) = js_eq a b
instance PToJSVal SVGFontFaceNameElement where
pToJSVal = unSVGFontFaceNameElement
instance PFromJSVal SVGFontFaceNameElement where
pFromJSVal = SVGFontFaceNameElement
instance ToJSVal SVGFontFaceNameElement where
toJSVal = return . unSVGFontFaceNameElement
instance FromJSVal SVGFontFaceNameElement where
fromJSVal = return . fmap SVGFontFaceNameElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFontFaceNameElement
instance IsElement SVGFontFaceNameElement
instance IsNode SVGFontFaceNameElement
instance IsEventTarget SVGFontFaceNameElement
instance IsGObject SVGFontFaceNameElement where
typeGType _ = gTypeSVGFontFaceNameElement
foreign import javascript unsafe "window[\"SVGFontFaceNameElement\"]" gTypeSVGFontFaceNameElement :: GType
newtype SVGFontFaceSrcElement = SVGFontFaceSrcElement { unSVGFontFaceSrcElement :: JSVal }
instance Eq (SVGFontFaceSrcElement) where
(SVGFontFaceSrcElement a) == (SVGFontFaceSrcElement b) = js_eq a b
instance PToJSVal SVGFontFaceSrcElement where
pToJSVal = unSVGFontFaceSrcElement
instance PFromJSVal SVGFontFaceSrcElement where
pFromJSVal = SVGFontFaceSrcElement
instance ToJSVal SVGFontFaceSrcElement where
toJSVal = return . unSVGFontFaceSrcElement
instance FromJSVal SVGFontFaceSrcElement where
fromJSVal = return . fmap SVGFontFaceSrcElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFontFaceSrcElement
instance IsElement SVGFontFaceSrcElement
instance IsNode SVGFontFaceSrcElement
instance IsEventTarget SVGFontFaceSrcElement
instance IsGObject SVGFontFaceSrcElement where
typeGType _ = gTypeSVGFontFaceSrcElement
foreign import javascript unsafe "window[\"SVGFontFaceSrcElement\"]" gTypeSVGFontFaceSrcElement :: GType
newtype SVGFontFaceUriElement = SVGFontFaceUriElement { unSVGFontFaceUriElement :: JSVal }
instance Eq (SVGFontFaceUriElement) where
(SVGFontFaceUriElement a) == (SVGFontFaceUriElement b) = js_eq a b
instance PToJSVal SVGFontFaceUriElement where
pToJSVal = unSVGFontFaceUriElement
instance PFromJSVal SVGFontFaceUriElement where
pFromJSVal = SVGFontFaceUriElement
instance ToJSVal SVGFontFaceUriElement where
toJSVal = return . unSVGFontFaceUriElement
instance FromJSVal SVGFontFaceUriElement where
fromJSVal = return . fmap SVGFontFaceUriElement . maybeJSNullOrUndefined
instance IsSVGElement SVGFontFaceUriElement
instance IsElement SVGFontFaceUriElement
instance IsNode SVGFontFaceUriElement
instance IsEventTarget SVGFontFaceUriElement
instance IsGObject SVGFontFaceUriElement where
typeGType _ = gTypeSVGFontFaceUriElement
foreign import javascript unsafe "window[\"SVGFontFaceUriElement\"]" gTypeSVGFontFaceUriElement :: GType
newtype SVGForeignObjectElement = SVGForeignObjectElement { unSVGForeignObjectElement :: JSVal }
instance Eq (SVGForeignObjectElement) where
(SVGForeignObjectElement a) == (SVGForeignObjectElement b) = js_eq a b
instance PToJSVal SVGForeignObjectElement where
pToJSVal = unSVGForeignObjectElement
instance PFromJSVal SVGForeignObjectElement where
pFromJSVal = SVGForeignObjectElement
instance ToJSVal SVGForeignObjectElement where
toJSVal = return . unSVGForeignObjectElement
instance FromJSVal SVGForeignObjectElement where
fromJSVal = return . fmap SVGForeignObjectElement . maybeJSNullOrUndefined
instance IsSVGGraphicsElement SVGForeignObjectElement
instance IsSVGElement SVGForeignObjectElement
instance IsElement SVGForeignObjectElement
instance IsNode SVGForeignObjectElement
instance IsEventTarget SVGForeignObjectElement
instance IsGObject SVGForeignObjectElement where
typeGType _ = gTypeSVGForeignObjectElement
foreign import javascript unsafe "window[\"SVGForeignObjectElement\"]" gTypeSVGForeignObjectElement :: GType
newtype SVGGElement = SVGGElement { unSVGGElement :: JSVal }
instance Eq (SVGGElement) where
(SVGGElement a) == (SVGGElement b) = js_eq a b
instance PToJSVal SVGGElement where
pToJSVal = unSVGGElement
instance PFromJSVal SVGGElement where
pFromJSVal = SVGGElement
instance ToJSVal SVGGElement where
toJSVal = return . unSVGGElement
instance FromJSVal SVGGElement where
fromJSVal = return . fmap SVGGElement . maybeJSNullOrUndefined
instance IsSVGGraphicsElement SVGGElement
instance IsSVGElement SVGGElement
instance IsElement SVGGElement
instance IsNode SVGGElement
instance IsEventTarget SVGGElement
instance IsGObject SVGGElement where
typeGType _ = gTypeSVGGElement
foreign import javascript unsafe "window[\"SVGGElement\"]" gTypeSVGGElement :: GType
newtype SVGGlyphElement = SVGGlyphElement { unSVGGlyphElement :: JSVal }
instance Eq (SVGGlyphElement) where
(SVGGlyphElement a) == (SVGGlyphElement b) = js_eq a b
instance PToJSVal SVGGlyphElement where
pToJSVal = unSVGGlyphElement
instance PFromJSVal SVGGlyphElement where
pFromJSVal = SVGGlyphElement
instance ToJSVal SVGGlyphElement where
toJSVal = return . unSVGGlyphElement
instance FromJSVal SVGGlyphElement where
fromJSVal = return . fmap SVGGlyphElement . maybeJSNullOrUndefined
instance IsSVGElement SVGGlyphElement
instance IsElement SVGGlyphElement
instance IsNode SVGGlyphElement
instance IsEventTarget SVGGlyphElement
instance IsGObject SVGGlyphElement where
typeGType _ = gTypeSVGGlyphElement
foreign import javascript unsafe "window[\"SVGGlyphElement\"]" gTypeSVGGlyphElement :: GType
newtype SVGGlyphRefElement = SVGGlyphRefElement { unSVGGlyphRefElement :: JSVal }
instance Eq (SVGGlyphRefElement) where
(SVGGlyphRefElement a) == (SVGGlyphRefElement b) = js_eq a b
instance PToJSVal SVGGlyphRefElement where
pToJSVal = unSVGGlyphRefElement
instance PFromJSVal SVGGlyphRefElement where
pFromJSVal = SVGGlyphRefElement
instance ToJSVal SVGGlyphRefElement where
toJSVal = return . unSVGGlyphRefElement
instance FromJSVal SVGGlyphRefElement where
fromJSVal = return . fmap SVGGlyphRefElement . maybeJSNullOrUndefined
instance IsSVGElement SVGGlyphRefElement
instance IsElement SVGGlyphRefElement
instance IsNode SVGGlyphRefElement
instance IsEventTarget SVGGlyphRefElement
instance IsGObject SVGGlyphRefElement where
typeGType _ = gTypeSVGGlyphRefElement
foreign import javascript unsafe "window[\"SVGGlyphRefElement\"]" gTypeSVGGlyphRefElement :: GType
newtype SVGGradientElement = SVGGradientElement { unSVGGradientElement :: JSVal }
instance Eq (SVGGradientElement) where
(SVGGradientElement a) == (SVGGradientElement b) = js_eq a b
instance PToJSVal SVGGradientElement where
pToJSVal = unSVGGradientElement
instance PFromJSVal SVGGradientElement where
pFromJSVal = SVGGradientElement
instance ToJSVal SVGGradientElement where
toJSVal = return . unSVGGradientElement
instance FromJSVal SVGGradientElement where
fromJSVal = return . fmap SVGGradientElement . maybeJSNullOrUndefined
class IsSVGElement o => IsSVGGradientElement o
toSVGGradientElement :: IsSVGGradientElement o => o -> SVGGradientElement
toSVGGradientElement = SVGGradientElement . coerce
instance IsSVGGradientElement SVGGradientElement
instance IsSVGElement SVGGradientElement
instance IsElement SVGGradientElement
instance IsNode SVGGradientElement
instance IsEventTarget SVGGradientElement
instance IsGObject SVGGradientElement where
typeGType _ = gTypeSVGGradientElement
foreign import javascript unsafe "window[\"SVGGradientElement\"]" gTypeSVGGradientElement :: GType
newtype SVGGraphicsElement = SVGGraphicsElement { unSVGGraphicsElement :: JSVal }
instance Eq (SVGGraphicsElement) where
(SVGGraphicsElement a) == (SVGGraphicsElement b) = js_eq a b
instance PToJSVal SVGGraphicsElement where
pToJSVal = unSVGGraphicsElement
instance PFromJSVal SVGGraphicsElement where
pFromJSVal = SVGGraphicsElement
instance ToJSVal SVGGraphicsElement where
toJSVal = return . unSVGGraphicsElement
instance FromJSVal SVGGraphicsElement where
fromJSVal = return . fmap SVGGraphicsElement . maybeJSNullOrUndefined
class IsSVGElement o => IsSVGGraphicsElement o
toSVGGraphicsElement :: IsSVGGraphicsElement o => o -> SVGGraphicsElement
toSVGGraphicsElement = SVGGraphicsElement . coerce
instance IsSVGGraphicsElement SVGGraphicsElement
instance IsSVGElement SVGGraphicsElement
instance IsElement SVGGraphicsElement
instance IsNode SVGGraphicsElement
instance IsEventTarget SVGGraphicsElement
instance IsGObject SVGGraphicsElement where
typeGType _ = gTypeSVGGraphicsElement
foreign import javascript unsafe "window[\"SVGGraphicsElement\"]" gTypeSVGGraphicsElement :: GType
newtype SVGHKernElement = SVGHKernElement { unSVGHKernElement :: JSVal }
instance Eq (SVGHKernElement) where
(SVGHKernElement a) == (SVGHKernElement b) = js_eq a b
instance PToJSVal SVGHKernElement where
pToJSVal = unSVGHKernElement
instance PFromJSVal SVGHKernElement where
pFromJSVal = SVGHKernElement
instance ToJSVal SVGHKernElement where
toJSVal = return . unSVGHKernElement
instance FromJSVal SVGHKernElement where
fromJSVal = return . fmap SVGHKernElement . maybeJSNullOrUndefined
instance IsSVGElement SVGHKernElement
instance IsElement SVGHKernElement
instance IsNode SVGHKernElement
instance IsEventTarget SVGHKernElement
instance IsGObject SVGHKernElement where
typeGType _ = gTypeSVGHKernElement
foreign import javascript unsafe "window[\"SVGHKernElement\"]" gTypeSVGHKernElement :: GType
newtype SVGImageElement = SVGImageElement { unSVGImageElement :: JSVal }
instance Eq (SVGImageElement) where
(SVGImageElement a) == (SVGImageElement b) = js_eq a b
instance PToJSVal SVGImageElement where
pToJSVal = unSVGImageElement
instance PFromJSVal SVGImageElement where
pFromJSVal = SVGImageElement
instance ToJSVal SVGImageElement where
toJSVal = return . unSVGImageElement
instance FromJSVal SVGImageElement where
fromJSVal = return . fmap SVGImageElement . maybeJSNullOrUndefined
instance IsSVGGraphicsElement SVGImageElement
instance IsSVGElement SVGImageElement
instance IsElement SVGImageElement
instance IsNode SVGImageElement
instance IsEventTarget SVGImageElement
instance IsGObject SVGImageElement where
typeGType _ = gTypeSVGImageElement
foreign import javascript unsafe "window[\"SVGImageElement\"]" gTypeSVGImageElement :: GType
newtype SVGLength = SVGLength { unSVGLength :: JSVal }
instance Eq (SVGLength) where
(SVGLength a) == (SVGLength b) = js_eq a b
instance PToJSVal SVGLength where
pToJSVal = unSVGLength
instance PFromJSVal SVGLength where
pFromJSVal = SVGLength
instance ToJSVal SVGLength where
toJSVal = return . unSVGLength
instance FromJSVal SVGLength where
fromJSVal = return . fmap SVGLength . maybeJSNullOrUndefined
instance IsGObject SVGLength where
typeGType _ = gTypeSVGLength
foreign import javascript unsafe "window[\"SVGLength\"]" gTypeSVGLength :: GType
newtype SVGLengthList = SVGLengthList { unSVGLengthList :: JSVal }
instance Eq (SVGLengthList) where
(SVGLengthList a) == (SVGLengthList b) = js_eq a b
instance PToJSVal SVGLengthList where
pToJSVal = unSVGLengthList
instance PFromJSVal SVGLengthList where
pFromJSVal = SVGLengthList
instance ToJSVal SVGLengthList where
toJSVal = return . unSVGLengthList
instance FromJSVal SVGLengthList where
fromJSVal = return . fmap SVGLengthList . maybeJSNullOrUndefined
instance IsGObject SVGLengthList where
typeGType _ = gTypeSVGLengthList
foreign import javascript unsafe "window[\"SVGLengthList\"]" gTypeSVGLengthList :: GType
newtype SVGLineElement = SVGLineElement { unSVGLineElement :: JSVal }
instance Eq (SVGLineElement) where
(SVGLineElement a) == (SVGLineElement b) = js_eq a b
instance PToJSVal SVGLineElement where
pToJSVal = unSVGLineElement
instance PFromJSVal SVGLineElement where
pFromJSVal = SVGLineElement
instance ToJSVal SVGLineElement where
toJSVal = return . unSVGLineElement
instance FromJSVal SVGLineElement where
fromJSVal = return . fmap SVGLineElement . maybeJSNullOrUndefined
instance IsSVGGraphicsElement SVGLineElement
instance IsSVGElement SVGLineElement
instance IsElement SVGLineElement
instance IsNode SVGLineElement
instance IsEventTarget SVGLineElement
instance IsGObject SVGLineElement where
typeGType _ = gTypeSVGLineElement
foreign import javascript unsafe "window[\"SVGLineElement\"]" gTypeSVGLineElement :: GType
newtype SVGLinearGradientElement = SVGLinearGradientElement { unSVGLinearGradientElement :: JSVal }
instance Eq (SVGLinearGradientElement) where
(SVGLinearGradientElement a) == (SVGLinearGradientElement b) = js_eq a b
instance PToJSVal SVGLinearGradientElement where
pToJSVal = unSVGLinearGradientElement
instance PFromJSVal SVGLinearGradientElement where
pFromJSVal = SVGLinearGradientElement
instance ToJSVal SVGLinearGradientElement where
toJSVal = return . unSVGLinearGradientElement
instance FromJSVal SVGLinearGradientElement where
fromJSVal = return . fmap SVGLinearGradientElement . maybeJSNullOrUndefined
instance IsSVGGradientElement SVGLinearGradientElement
instance IsSVGElement SVGLinearGradientElement
instance IsElement SVGLinearGradientElement
instance IsNode SVGLinearGradientElement
instance IsEventTarget SVGLinearGradientElement
instance IsGObject SVGLinearGradientElement where
typeGType _ = gTypeSVGLinearGradientElement
foreign import javascript unsafe "window[\"SVGLinearGradientElement\"]" gTypeSVGLinearGradientElement :: GType
newtype SVGMPathElement = SVGMPathElement { unSVGMPathElement :: JSVal }
instance Eq (SVGMPathElement) where
(SVGMPathElement a) == (SVGMPathElement b) = js_eq a b
instance PToJSVal SVGMPathElement where
pToJSVal = unSVGMPathElement
instance PFromJSVal SVGMPathElement where
pFromJSVal = SVGMPathElement
instance ToJSVal SVGMPathElement where
toJSVal = return . unSVGMPathElement
instance FromJSVal SVGMPathElement where
fromJSVal = return . fmap SVGMPathElement . maybeJSNullOrUndefined
instance IsSVGElement SVGMPathElement
instance IsElement SVGMPathElement
instance IsNode SVGMPathElement
instance IsEventTarget SVGMPathElement
instance IsGObject SVGMPathElement where
typeGType _ = gTypeSVGMPathElement
foreign import javascript unsafe "window[\"SVGMPathElement\"]" gTypeSVGMPathElement :: GType
newtype SVGMarkerElement = SVGMarkerElement { unSVGMarkerElement :: JSVal }
instance Eq (SVGMarkerElement) where
(SVGMarkerElement a) == (SVGMarkerElement b) = js_eq a b
instance PToJSVal SVGMarkerElement where
pToJSVal = unSVGMarkerElement
instance PFromJSVal SVGMarkerElement where
pFromJSVal = SVGMarkerElement
instance ToJSVal SVGMarkerElement where
toJSVal = return . unSVGMarkerElement
instance FromJSVal SVGMarkerElement where
fromJSVal = return . fmap SVGMarkerElement . maybeJSNullOrUndefined
instance IsSVGElement SVGMarkerElement
instance IsElement SVGMarkerElement
instance IsNode SVGMarkerElement
instance IsEventTarget SVGMarkerElement
instance IsGObject SVGMarkerElement where
typeGType _ = gTypeSVGMarkerElement
foreign import javascript unsafe "window[\"SVGMarkerElement\"]" gTypeSVGMarkerElement :: GType
newtype SVGMaskElement = SVGMaskElement { unSVGMaskElement :: JSVal }
instance Eq (SVGMaskElement) where
(SVGMaskElement a) == (SVGMaskElement b) = js_eq a b
instance PToJSVal SVGMaskElement where
pToJSVal = unSVGMaskElement
instance PFromJSVal SVGMaskElement where
pFromJSVal = SVGMaskElement
instance ToJSVal SVGMaskElement where
toJSVal = return . unSVGMaskElement
instance FromJSVal SVGMaskElement where
fromJSVal = return . fmap SVGMaskElement . maybeJSNullOrUndefined
instance IsSVGElement SVGMaskElement
instance IsElement SVGMaskElement
instance IsNode SVGMaskElement
instance IsEventTarget SVGMaskElement
instance IsGObject SVGMaskElement where
typeGType _ = gTypeSVGMaskElement
foreign import javascript unsafe "window[\"SVGMaskElement\"]" gTypeSVGMaskElement :: GType
newtype SVGMatrix = SVGMatrix { unSVGMatrix :: JSVal }
instance Eq (SVGMatrix) where
(SVGMatrix a) == (SVGMatrix b) = js_eq a b
instance PToJSVal SVGMatrix where
pToJSVal = unSVGMatrix
instance PFromJSVal SVGMatrix where
pFromJSVal = SVGMatrix
instance ToJSVal SVGMatrix where
toJSVal = return . unSVGMatrix
instance FromJSVal SVGMatrix where
fromJSVal = return . fmap SVGMatrix . maybeJSNullOrUndefined
instance IsGObject SVGMatrix where
typeGType _ = gTypeSVGMatrix
foreign import javascript unsafe "window[\"SVGMatrix\"]" gTypeSVGMatrix :: GType
newtype SVGMetadataElement = SVGMetadataElement { unSVGMetadataElement :: JSVal }
instance Eq (SVGMetadataElement) where
(SVGMetadataElement a) == (SVGMetadataElement b) = js_eq a b
instance PToJSVal SVGMetadataElement where
pToJSVal = unSVGMetadataElement
instance PFromJSVal SVGMetadataElement where
pFromJSVal = SVGMetadataElement
instance ToJSVal SVGMetadataElement where
toJSVal = return . unSVGMetadataElement
instance FromJSVal SVGMetadataElement where
fromJSVal = return . fmap SVGMetadataElement . maybeJSNullOrUndefined
instance IsSVGElement SVGMetadataElement
instance IsElement SVGMetadataElement
instance IsNode SVGMetadataElement
instance IsEventTarget SVGMetadataElement
instance IsGObject SVGMetadataElement where
typeGType _ = gTypeSVGMetadataElement
foreign import javascript unsafe "window[\"SVGMetadataElement\"]" gTypeSVGMetadataElement :: GType
newtype SVGMissingGlyphElement = SVGMissingGlyphElement { unSVGMissingGlyphElement :: JSVal }
instance Eq (SVGMissingGlyphElement) where
(SVGMissingGlyphElement a) == (SVGMissingGlyphElement b) = js_eq a b
instance PToJSVal SVGMissingGlyphElement where
pToJSVal = unSVGMissingGlyphElement
instance PFromJSVal SVGMissingGlyphElement where
pFromJSVal = SVGMissingGlyphElement
instance ToJSVal SVGMissingGlyphElement where
toJSVal = return . unSVGMissingGlyphElement
instance FromJSVal SVGMissingGlyphElement where
fromJSVal = return . fmap SVGMissingGlyphElement . maybeJSNullOrUndefined
instance IsSVGElement SVGMissingGlyphElement
instance IsElement SVGMissingGlyphElement
instance IsNode SVGMissingGlyphElement
instance IsEventTarget SVGMissingGlyphElement
instance IsGObject SVGMissingGlyphElement where
typeGType _ = gTypeSVGMissingGlyphElement
foreign import javascript unsafe "window[\"SVGMissingGlyphElement\"]" gTypeSVGMissingGlyphElement :: GType
newtype SVGNumber = SVGNumber { unSVGNumber :: JSVal }
instance Eq (SVGNumber) where
(SVGNumber a) == (SVGNumber b) = js_eq a b
instance PToJSVal SVGNumber where
pToJSVal = unSVGNumber
instance PFromJSVal SVGNumber where
pFromJSVal = SVGNumber
instance ToJSVal SVGNumber where
toJSVal = return . unSVGNumber
instance FromJSVal SVGNumber where
fromJSVal = return . fmap SVGNumber . maybeJSNullOrUndefined
instance IsGObject SVGNumber where
typeGType _ = gTypeSVGNumber
foreign import javascript unsafe "window[\"SVGNumber\"]" gTypeSVGNumber :: GType
newtype SVGNumberList = SVGNumberList { unSVGNumberList :: JSVal }
instance Eq (SVGNumberList) where
(SVGNumberList a) == (SVGNumberList b) = js_eq a b
instance PToJSVal SVGNumberList where
pToJSVal = unSVGNumberList
instance PFromJSVal SVGNumberList where
pFromJSVal = SVGNumberList
instance ToJSVal SVGNumberList where
toJSVal = return . unSVGNumberList
instance FromJSVal SVGNumberList where
fromJSVal = return . fmap SVGNumberList . maybeJSNullOrUndefined
instance IsGObject SVGNumberList where
typeGType _ = gTypeSVGNumberList
foreign import javascript unsafe "window[\"SVGNumberList\"]" gTypeSVGNumberList :: GType
newtype SVGPaint = SVGPaint { unSVGPaint :: JSVal }
instance Eq (SVGPaint) where
(SVGPaint a) == (SVGPaint b) = js_eq a b
instance PToJSVal SVGPaint where
pToJSVal = unSVGPaint
instance PFromJSVal SVGPaint where
pFromJSVal = SVGPaint
instance ToJSVal SVGPaint where
toJSVal = return . unSVGPaint
instance FromJSVal SVGPaint where
fromJSVal = return . fmap SVGPaint . maybeJSNullOrUndefined
instance IsSVGColor SVGPaint
instance IsCSSValue SVGPaint
instance IsGObject SVGPaint where
typeGType _ = gTypeSVGPaint
foreign import javascript unsafe "window[\"SVGPaint\"]" gTypeSVGPaint :: GType
newtype SVGPathElement = SVGPathElement { unSVGPathElement :: JSVal }
instance Eq (SVGPathElement) where
(SVGPathElement a) == (SVGPathElement b) = js_eq a b
instance PToJSVal SVGPathElement where
pToJSVal = unSVGPathElement
instance PFromJSVal SVGPathElement where
pFromJSVal = SVGPathElement
instance ToJSVal SVGPathElement where
toJSVal = return . unSVGPathElement
instance FromJSVal SVGPathElement where
fromJSVal = return . fmap SVGPathElement . maybeJSNullOrUndefined
instance IsSVGGraphicsElement SVGPathElement
instance IsSVGElement SVGPathElement
instance IsElement SVGPathElement
instance IsNode SVGPathElement
instance IsEventTarget SVGPathElement
instance IsGObject SVGPathElement where
typeGType _ = gTypeSVGPathElement
foreign import javascript unsafe "window[\"SVGPathElement\"]" gTypeSVGPathElement :: GType
newtype SVGPathSeg = SVGPathSeg { unSVGPathSeg :: JSVal }
instance Eq (SVGPathSeg) where
(SVGPathSeg a) == (SVGPathSeg b) = js_eq a b
instance PToJSVal SVGPathSeg where
pToJSVal = unSVGPathSeg
instance PFromJSVal SVGPathSeg where
pFromJSVal = SVGPathSeg
instance ToJSVal SVGPathSeg where
toJSVal = return . unSVGPathSeg
instance FromJSVal SVGPathSeg where
fromJSVal = return . fmap SVGPathSeg . maybeJSNullOrUndefined
class IsGObject o => IsSVGPathSeg o
toSVGPathSeg :: IsSVGPathSeg o => o -> SVGPathSeg
toSVGPathSeg = SVGPathSeg . coerce
instance IsSVGPathSeg SVGPathSeg
instance IsGObject SVGPathSeg where
typeGType _ = gTypeSVGPathSeg
foreign import javascript unsafe "window[\"SVGPathSeg\"]" gTypeSVGPathSeg :: GType
newtype SVGPathSegArcAbs = SVGPathSegArcAbs { unSVGPathSegArcAbs :: JSVal }
instance Eq (SVGPathSegArcAbs) where
(SVGPathSegArcAbs a) == (SVGPathSegArcAbs b) = js_eq a b
instance PToJSVal SVGPathSegArcAbs where
pToJSVal = unSVGPathSegArcAbs
instance PFromJSVal SVGPathSegArcAbs where
pFromJSVal = SVGPathSegArcAbs
instance ToJSVal SVGPathSegArcAbs where
toJSVal = return . unSVGPathSegArcAbs
instance FromJSVal SVGPathSegArcAbs where
fromJSVal = return . fmap SVGPathSegArcAbs . maybeJSNullOrUndefined
instance IsSVGPathSeg SVGPathSegArcAbs
instance IsGObject SVGPathSegArcAbs where
typeGType _ = gTypeSVGPathSegArcAbs
foreign import javascript unsafe "window[\"SVGPathSegArcAbs\"]" gTypeSVGPathSegArcAbs :: GType
newtype SVGPathSegArcRel = SVGPathSegArcRel { unSVGPathSegArcRel :: JSVal }
instance Eq (SVGPathSegArcRel) where
(SVGPathSegArcRel a) == (SVGPathSegArcRel b) = js_eq a b
instance PToJSVal SVGPathSegArcRel where
pToJSVal = unSVGPathSegArcRel
instance PFromJSVal SVGPathSegArcRel where
pFromJSVal = SVGPathSegArcRel
instance ToJSVal SVGPathSegArcRel where
toJSVal = return . unSVGPathSegArcRel
instance FromJSVal SVGPathSegArcRel where
fromJSVal = return . fmap SVGPathSegArcRel . maybeJSNullOrUndefined
instance IsSVGPathSeg SVGPathSegArcRel
instance IsGObject SVGPathSegArcRel where
typeGType _ = gTypeSVGPathSegArcRel
foreign import javascript unsafe "window[\"SVGPathSegArcRel\"]" gTypeSVGPathSegArcRel :: GType
newtype SVGPathSegClosePath = SVGPathSegClosePath { unSVGPathSegClosePath :: JSVal }
instance Eq (SVGPathSegClosePath) where
(SVGPathSegClosePath a) == (SVGPathSegClosePath b) = js_eq a b
instance PToJSVal SVGPathSegClosePath where
pToJSVal = unSVGPathSegClosePath
instance PFromJSVal SVGPathSegClosePath where
pFromJSVal = SVGPathSegClosePath
instance ToJSVal SVGPathSegClosePath where
toJSVal = return . unSVGPathSegClosePath
instance FromJSVal SVGPathSegClosePath where
fromJSVal = return . fmap SVGPathSegClosePath . maybeJSNullOrUndefined
instance IsSVGPathSeg SVGPathSegClosePath
instance IsGObject SVGPathSegClosePath where
typeGType _ = gTypeSVGPathSegClosePath
foreign import javascript unsafe "window[\"SVGPathSegClosePath\"]" gTypeSVGPathSegClosePath :: GType
newtype SVGPathSegCurvetoCubicAbs = SVGPathSegCurvetoCubicAbs { unSVGPathSegCurvetoCubicAbs :: JSVal }
instance Eq (SVGPathSegCurvetoCubicAbs) where
(SVGPathSegCurvetoCubicAbs a) == (SVGPathSegCurvetoCubicAbs b) = js_eq a b
instance PToJSVal SVGPathSegCurvetoCubicAbs where
pToJSVal = unSVGPathSegCurvetoCubicAbs
instance PFromJSVal SVGPathSegCurvetoCubicAbs where
pFromJSVal = SVGPathSegCurvetoCubicAbs
instance ToJSVal SVGPathSegCurvetoCubicAbs where
toJSVal = return . unSVGPathSegCurvetoCubicAbs
instance FromJSVal SVGPathSegCurvetoCubicAbs where
fromJSVal = return . fmap SVGPathSegCurvetoCubicAbs . maybeJSNullOrUndefined
instance IsSVGPathSeg SVGPathSegCurvetoCubicAbs
instance IsGObject SVGPathSegCurvetoCubicAbs where
typeGType _ = gTypeSVGPathSegCurvetoCubicAbs
foreign import javascript unsafe "window[\"SVGPathSegCurvetoCubicAbs\"]" gTypeSVGPathSegCurvetoCubicAbs :: GType
newtype SVGPathSegCurvetoCubicRel = SVGPathSegCurvetoCubicRel { unSVGPathSegCurvetoCubicRel :: JSVal }
instance Eq (SVGPathSegCurvetoCubicRel) where
(SVGPathSegCurvetoCubicRel a) == (SVGPathSegCurvetoCubicRel b) = js_eq a b
instance PToJSVal SVGPathSegCurvetoCubicRel where
pToJSVal = unSVGPathSegCurvetoCubicRel
instance PFromJSVal SVGPathSegCurvetoCubicRel where
pFromJSVal = SVGPathSegCurvetoCubicRel
instance ToJSVal SVGPathSegCurvetoCubicRel where
toJSVal = return . unSVGPathSegCurvetoCubicRel
instance FromJSVal SVGPathSegCurvetoCubicRel where
fromJSVal = return . fmap SVGPathSegCurvetoCubicRel . maybeJSNullOrUndefined
instance IsSVGPathSeg SVGPathSegCurvetoCubicRel
instance IsGObject SVGPathSegCurvetoCubicRel where
typeGType _ = gTypeSVGPathSegCurvetoCubicRel
foreign import javascript unsafe "window[\"SVGPathSegCurvetoCubicRel\"]" gTypeSVGPathSegCurvetoCubicRel :: GType
newtype SVGPathSegCurvetoCubicSmoothAbs = SVGPathSegCurvetoCubicSmoothAbs { unSVGPathSegCurvetoCubicSmoothAbs :: JSVal }
instance Eq (SVGPathSegCurvetoCubicSmoothAbs) where
(SVGPathSegCurvetoCubicSmoothAbs a) == (SVGPathSegCurvetoCubicSmoothAbs b) = js_eq a b
instance PToJSVal SVGPathSegCurvetoCubicSmoothAbs where
pToJSVal = unSVGPathSegCurvetoCubicSmoothAbs
instance PFromJSVal SVGPathSegCurvetoCubicSmoothAbs where
pFromJSVal = SVGPathSegCurvetoCubicSmoothAbs
instance ToJSVal SVGPathSegCurvetoCubicSmoothAbs where
toJSVal = return . unSVGPathSegCurvetoCubicSmoothAbs
instance FromJSVal SVGPathSegCurvetoCubicSmoothAbs where
fromJSVal = return . fmap SVGPathSegCurvetoCubicSmoothAbs . maybeJSNullOrUndefined
instance IsSVGPathSeg SVGPathSegCurvetoCubicSmoothAbs
instance IsGObject SVGPathSegCurvetoCubicSmoothAbs where
typeGType _ = gTypeSVGPathSegCurvetoCubicSmoothAbs
foreign import javascript unsafe "window[\"SVGPathSegCurvetoCubicSmoothAbs\"]" gTypeSVGPathSegCurvetoCubicSmoothAbs :: GType
newtype SVGPathSegCurvetoCubicSmoothRel = SVGPathSegCurvetoCubicSmoothRel { unSVGPathSegCurvetoCubicSmoothRel :: JSVal }
instance Eq (SVGPathSegCurvetoCubicSmoothRel) where
(SVGPathSegCurvetoCubicSmoothRel a) == (SVGPathSegCurvetoCubicSmoothRel b) = js_eq a b
instance PToJSVal SVGPathSegCurvetoCubicSmoothRel where
pToJSVal = unSVGPathSegCurvetoCubicSmoothRel
instance PFromJSVal SVGPathSegCurvetoCubicSmoothRel where
pFromJSVal = SVGPathSegCurvetoCubicSmoothRel
instance ToJSVal SVGPathSegCurvetoCubicSmoothRel where
toJSVal = return . unSVGPathSegCurvetoCubicSmoothRel
instance FromJSVal SVGPathSegCurvetoCubicSmoothRel where
fromJSVal = return . fmap SVGPathSegCurvetoCubicSmoothRel . maybeJSNullOrUndefined
instance IsSVGPathSeg SVGPathSegCurvetoCubicSmoothRel
instance IsGObject SVGPathSegCurvetoCubicSmoothRel where
typeGType _ = gTypeSVGPathSegCurvetoCubicSmoothRel
foreign import javascript unsafe "window[\"SVGPathSegCurvetoCubicSmoothRel\"]" gTypeSVGPathSegCurvetoCubicSmoothRel :: GType
newtype SVGPathSegCurvetoQuadraticAbs = SVGPathSegCurvetoQuadraticAbs { unSVGPathSegCurvetoQuadraticAbs :: JSVal }
instance Eq (SVGPathSegCurvetoQuadraticAbs) where
(SVGPathSegCurvetoQuadraticAbs a) == (SVGPathSegCurvetoQuadraticAbs b) = js_eq a b
instance PToJSVal SVGPathSegCurvetoQuadraticAbs where
pToJSVal = unSVGPathSegCurvetoQuadraticAbs
instance PFromJSVal SVGPathSegCurvetoQuadraticAbs where
pFromJSVal = SVGPathSegCurvetoQuadraticAbs
instance ToJSVal SVGPathSegCurvetoQuadraticAbs where
toJSVal = return . unSVGPathSegCurvetoQuadraticAbs
instance FromJSVal SVGPathSegCurvetoQuadraticAbs where
fromJSVal = return . fmap SVGPathSegCurvetoQuadraticAbs . maybeJSNullOrUndefined
instance IsSVGPathSeg SVGPathSegCurvetoQuadraticAbs
instance IsGObject SVGPathSegCurvetoQuadraticAbs where
typeGType _ = gTypeSVGPathSegCurvetoQuadraticAbs
foreign import javascript unsafe "window[\"SVGPathSegCurvetoQuadraticAbs\"]" gTypeSVGPathSegCurvetoQuadraticAbs :: GType
newtype SVGPathSegCurvetoQuadraticRel = SVGPathSegCurvetoQuadraticRel { unSVGPathSegCurvetoQuadraticRel :: JSVal }
instance Eq (SVGPathSegCurvetoQuadraticRel) where
(SVGPathSegCurvetoQuadraticRel a) == (SVGPathSegCurvetoQuadraticRel b) = js_eq a b
instance PToJSVal SVGPathSegCurvetoQuadraticRel where
pToJSVal = unSVGPathSegCurvetoQuadraticRel
instance PFromJSVal SVGPathSegCurvetoQuadraticRel where
pFromJSVal = SVGPathSegCurvetoQuadraticRel
instance ToJSVal SVGPathSegCurvetoQuadraticRel where
toJSVal = return . unSVGPathSegCurvetoQuadraticRel
instance FromJSVal SVGPathSegCurvetoQuadraticRel where
fromJSVal = return . fmap SVGPathSegCurvetoQuadraticRel . maybeJSNullOrUndefined
instance IsSVGPathSeg SVGPathSegCurvetoQuadraticRel
instance IsGObject SVGPathSegCurvetoQuadraticRel where
typeGType _ = gTypeSVGPathSegCurvetoQuadraticRel
foreign import javascript unsafe "window[\"SVGPathSegCurvetoQuadraticRel\"]" gTypeSVGPathSegCurvetoQuadraticRel :: GType
newtype SVGPathSegCurvetoQuadraticSmoothAbs = SVGPathSegCurvetoQuadraticSmoothAbs { unSVGPathSegCurvetoQuadraticSmoothAbs :: JSVal }
instance Eq (SVGPathSegCurvetoQuadraticSmoothAbs) where
(SVGPathSegCurvetoQuadraticSmoothAbs a) == (SVGPathSegCurvetoQuadraticSmoothAbs b) = js_eq a b
instance PToJSVal SVGPathSegCurvetoQuadraticSmoothAbs where
pToJSVal = unSVGPathSegCurvetoQuadraticSmoothAbs
instance PFromJSVal SVGPathSegCurvetoQuadraticSmoothAbs where
pFromJSVal = SVGPathSegCurvetoQuadraticSmoothAbs
instance ToJSVal SVGPathSegCurvetoQuadraticSmoothAbs where
toJSVal = return . unSVGPathSegCurvetoQuadraticSmoothAbs
instance FromJSVal SVGPathSegCurvetoQuadraticSmoothAbs where
fromJSVal = return . fmap SVGPathSegCurvetoQuadraticSmoothAbs . maybeJSNullOrUndefined
instance IsSVGPathSeg SVGPathSegCurvetoQuadraticSmoothAbs
instance IsGObject SVGPathSegCurvetoQuadraticSmoothAbs where
typeGType _ = gTypeSVGPathSegCurvetoQuadraticSmoothAbs
foreign import javascript unsafe "window[\"SVGPathSegCurvetoQuadraticSmoothAbs\"]" gTypeSVGPathSegCurvetoQuadraticSmoothAbs :: GType
newtype SVGPathSegCurvetoQuadraticSmoothRel = SVGPathSegCurvetoQuadraticSmoothRel { unSVGPathSegCurvetoQuadraticSmoothRel :: JSVal }
instance Eq (SVGPathSegCurvetoQuadraticSmoothRel) where
(SVGPathSegCurvetoQuadraticSmoothRel a) == (SVGPathSegCurvetoQuadraticSmoothRel b) = js_eq a b
instance PToJSVal SVGPathSegCurvetoQuadraticSmoothRel where
pToJSVal = unSVGPathSegCurvetoQuadraticSmoothRel
instance PFromJSVal SVGPathSegCurvetoQuadraticSmoothRel where
pFromJSVal = SVGPathSegCurvetoQuadraticSmoothRel
instance ToJSVal SVGPathSegCurvetoQuadraticSmoothRel where
toJSVal = return . unSVGPathSegCurvetoQuadraticSmoothRel
instance FromJSVal SVGPathSegCurvetoQuadraticSmoothRel where
fromJSVal = return . fmap SVGPathSegCurvetoQuadraticSmoothRel . maybeJSNullOrUndefined
instance IsSVGPathSeg SVGPathSegCurvetoQuadraticSmoothRel
instance IsGObject SVGPathSegCurvetoQuadraticSmoothRel where
typeGType _ = gTypeSVGPathSegCurvetoQuadraticSmoothRel
foreign import javascript unsafe "window[\"SVGPathSegCurvetoQuadraticSmoothRel\"]" gTypeSVGPathSegCurvetoQuadraticSmoothRel :: GType
newtype SVGPathSegLinetoAbs = SVGPathSegLinetoAbs { unSVGPathSegLinetoAbs :: JSVal }
instance Eq (SVGPathSegLinetoAbs) where
(SVGPathSegLinetoAbs a) == (SVGPathSegLinetoAbs b) = js_eq a b
instance PToJSVal SVGPathSegLinetoAbs where
pToJSVal = unSVGPathSegLinetoAbs
instance PFromJSVal SVGPathSegLinetoAbs where
pFromJSVal = SVGPathSegLinetoAbs
instance ToJSVal SVGPathSegLinetoAbs where
toJSVal = return . unSVGPathSegLinetoAbs
instance FromJSVal SVGPathSegLinetoAbs where
fromJSVal = return . fmap SVGPathSegLinetoAbs . maybeJSNullOrUndefined
instance IsSVGPathSeg SVGPathSegLinetoAbs
instance IsGObject SVGPathSegLinetoAbs where
typeGType _ = gTypeSVGPathSegLinetoAbs
foreign import javascript unsafe "window[\"SVGPathSegLinetoAbs\"]" gTypeSVGPathSegLinetoAbs :: GType
newtype SVGPathSegLinetoHorizontalAbs = SVGPathSegLinetoHorizontalAbs { unSVGPathSegLinetoHorizontalAbs :: JSVal }
instance Eq (SVGPathSegLinetoHorizontalAbs) where
(SVGPathSegLinetoHorizontalAbs a) == (SVGPathSegLinetoHorizontalAbs b) = js_eq a b
instance PToJSVal SVGPathSegLinetoHorizontalAbs where
pToJSVal = unSVGPathSegLinetoHorizontalAbs
instance PFromJSVal SVGPathSegLinetoHorizontalAbs where
pFromJSVal = SVGPathSegLinetoHorizontalAbs
instance ToJSVal SVGPathSegLinetoHorizontalAbs where
toJSVal = return . unSVGPathSegLinetoHorizontalAbs
instance FromJSVal SVGPathSegLinetoHorizontalAbs where
fromJSVal = return . fmap SVGPathSegLinetoHorizontalAbs . maybeJSNullOrUndefined
instance IsSVGPathSeg SVGPathSegLinetoHorizontalAbs
instance IsGObject SVGPathSegLinetoHorizontalAbs where
typeGType _ = gTypeSVGPathSegLinetoHorizontalAbs
foreign import javascript unsafe "window[\"SVGPathSegLinetoHorizontalAbs\"]" gTypeSVGPathSegLinetoHorizontalAbs :: GType
newtype SVGPathSegLinetoHorizontalRel = SVGPathSegLinetoHorizontalRel { unSVGPathSegLinetoHorizontalRel :: JSVal }
instance Eq (SVGPathSegLinetoHorizontalRel) where
(SVGPathSegLinetoHorizontalRel a) == (SVGPathSegLinetoHorizontalRel b) = js_eq a b
instance PToJSVal SVGPathSegLinetoHorizontalRel where
pToJSVal = unSVGPathSegLinetoHorizontalRel
instance PFromJSVal SVGPathSegLinetoHorizontalRel where
pFromJSVal = SVGPathSegLinetoHorizontalRel
instance ToJSVal SVGPathSegLinetoHorizontalRel where
toJSVal = return . unSVGPathSegLinetoHorizontalRel
instance FromJSVal SVGPathSegLinetoHorizontalRel where
fromJSVal = return . fmap SVGPathSegLinetoHorizontalRel . maybeJSNullOrUndefined
instance IsSVGPathSeg SVGPathSegLinetoHorizontalRel
instance IsGObject SVGPathSegLinetoHorizontalRel where
typeGType _ = gTypeSVGPathSegLinetoHorizontalRel
foreign import javascript unsafe "window[\"SVGPathSegLinetoHorizontalRel\"]" gTypeSVGPathSegLinetoHorizontalRel :: GType
newtype SVGPathSegLinetoRel = SVGPathSegLinetoRel { unSVGPathSegLinetoRel :: JSVal }
instance Eq (SVGPathSegLinetoRel) where
(SVGPathSegLinetoRel a) == (SVGPathSegLinetoRel b) = js_eq a b
instance PToJSVal SVGPathSegLinetoRel where
pToJSVal = unSVGPathSegLinetoRel
instance PFromJSVal SVGPathSegLinetoRel where
pFromJSVal = SVGPathSegLinetoRel
instance ToJSVal SVGPathSegLinetoRel where
toJSVal = return . unSVGPathSegLinetoRel
instance FromJSVal SVGPathSegLinetoRel where
fromJSVal = return . fmap SVGPathSegLinetoRel . maybeJSNullOrUndefined
instance IsSVGPathSeg SVGPathSegLinetoRel
instance IsGObject SVGPathSegLinetoRel where
typeGType _ = gTypeSVGPathSegLinetoRel
foreign import javascript unsafe "window[\"SVGPathSegLinetoRel\"]" gTypeSVGPathSegLinetoRel :: GType
newtype SVGPathSegLinetoVerticalAbs = SVGPathSegLinetoVerticalAbs { unSVGPathSegLinetoVerticalAbs :: JSVal }
instance Eq (SVGPathSegLinetoVerticalAbs) where
(SVGPathSegLinetoVerticalAbs a) == (SVGPathSegLinetoVerticalAbs b) = js_eq a b
instance PToJSVal SVGPathSegLinetoVerticalAbs where
pToJSVal = unSVGPathSegLinetoVerticalAbs
instance PFromJSVal SVGPathSegLinetoVerticalAbs where
pFromJSVal = SVGPathSegLinetoVerticalAbs
instance ToJSVal SVGPathSegLinetoVerticalAbs where
toJSVal = return . unSVGPathSegLinetoVerticalAbs
instance FromJSVal SVGPathSegLinetoVerticalAbs where
fromJSVal = return . fmap SVGPathSegLinetoVerticalAbs . maybeJSNullOrUndefined
instance IsSVGPathSeg SVGPathSegLinetoVerticalAbs
instance IsGObject SVGPathSegLinetoVerticalAbs where
typeGType _ = gTypeSVGPathSegLinetoVerticalAbs
foreign import javascript unsafe "window[\"SVGPathSegLinetoVerticalAbs\"]" gTypeSVGPathSegLinetoVerticalAbs :: GType
newtype SVGPathSegLinetoVerticalRel = SVGPathSegLinetoVerticalRel { unSVGPathSegLinetoVerticalRel :: JSVal }
instance Eq (SVGPathSegLinetoVerticalRel) where
(SVGPathSegLinetoVerticalRel a) == (SVGPathSegLinetoVerticalRel b) = js_eq a b
instance PToJSVal SVGPathSegLinetoVerticalRel where
pToJSVal = unSVGPathSegLinetoVerticalRel
instance PFromJSVal SVGPathSegLinetoVerticalRel where
pFromJSVal = SVGPathSegLinetoVerticalRel
instance ToJSVal SVGPathSegLinetoVerticalRel where
toJSVal = return . unSVGPathSegLinetoVerticalRel
instance FromJSVal SVGPathSegLinetoVerticalRel where
fromJSVal = return . fmap SVGPathSegLinetoVerticalRel . maybeJSNullOrUndefined
instance IsSVGPathSeg SVGPathSegLinetoVerticalRel
instance IsGObject SVGPathSegLinetoVerticalRel where
typeGType _ = gTypeSVGPathSegLinetoVerticalRel
foreign import javascript unsafe "window[\"SVGPathSegLinetoVerticalRel\"]" gTypeSVGPathSegLinetoVerticalRel :: GType
newtype SVGPathSegList = SVGPathSegList { unSVGPathSegList :: JSVal }
instance Eq (SVGPathSegList) where
(SVGPathSegList a) == (SVGPathSegList b) = js_eq a b
instance PToJSVal SVGPathSegList where
pToJSVal = unSVGPathSegList
instance PFromJSVal SVGPathSegList where
pFromJSVal = SVGPathSegList
instance ToJSVal SVGPathSegList where
toJSVal = return . unSVGPathSegList
instance FromJSVal SVGPathSegList where
fromJSVal = return . fmap SVGPathSegList . maybeJSNullOrUndefined
instance IsGObject SVGPathSegList where
typeGType _ = gTypeSVGPathSegList
foreign import javascript unsafe "window[\"SVGPathSegList\"]" gTypeSVGPathSegList :: GType
newtype SVGPathSegMovetoAbs = SVGPathSegMovetoAbs { unSVGPathSegMovetoAbs :: JSVal }
instance Eq (SVGPathSegMovetoAbs) where
(SVGPathSegMovetoAbs a) == (SVGPathSegMovetoAbs b) = js_eq a b
instance PToJSVal SVGPathSegMovetoAbs where
pToJSVal = unSVGPathSegMovetoAbs
instance PFromJSVal SVGPathSegMovetoAbs where
pFromJSVal = SVGPathSegMovetoAbs
instance ToJSVal SVGPathSegMovetoAbs where
toJSVal = return . unSVGPathSegMovetoAbs
instance FromJSVal SVGPathSegMovetoAbs where
fromJSVal = return . fmap SVGPathSegMovetoAbs . maybeJSNullOrUndefined
instance IsSVGPathSeg SVGPathSegMovetoAbs
instance IsGObject SVGPathSegMovetoAbs where
typeGType _ = gTypeSVGPathSegMovetoAbs
foreign import javascript unsafe "window[\"SVGPathSegMovetoAbs\"]" gTypeSVGPathSegMovetoAbs :: GType
newtype SVGPathSegMovetoRel = SVGPathSegMovetoRel { unSVGPathSegMovetoRel :: JSVal }
instance Eq (SVGPathSegMovetoRel) where
(SVGPathSegMovetoRel a) == (SVGPathSegMovetoRel b) = js_eq a b
instance PToJSVal SVGPathSegMovetoRel where
pToJSVal = unSVGPathSegMovetoRel
instance PFromJSVal SVGPathSegMovetoRel where
pFromJSVal = SVGPathSegMovetoRel
instance ToJSVal SVGPathSegMovetoRel where
toJSVal = return . unSVGPathSegMovetoRel
instance FromJSVal SVGPathSegMovetoRel where
fromJSVal = return . fmap SVGPathSegMovetoRel . maybeJSNullOrUndefined
instance IsSVGPathSeg SVGPathSegMovetoRel
instance IsGObject SVGPathSegMovetoRel where
typeGType _ = gTypeSVGPathSegMovetoRel
foreign import javascript unsafe "window[\"SVGPathSegMovetoRel\"]" gTypeSVGPathSegMovetoRel :: GType
newtype SVGPatternElement = SVGPatternElement { unSVGPatternElement :: JSVal }
instance Eq (SVGPatternElement) where
(SVGPatternElement a) == (SVGPatternElement b) = js_eq a b
instance PToJSVal SVGPatternElement where
pToJSVal = unSVGPatternElement
instance PFromJSVal SVGPatternElement where
pFromJSVal = SVGPatternElement
instance ToJSVal SVGPatternElement where
toJSVal = return . unSVGPatternElement
instance FromJSVal SVGPatternElement where
fromJSVal = return . fmap SVGPatternElement . maybeJSNullOrUndefined
instance IsSVGElement SVGPatternElement
instance IsElement SVGPatternElement
instance IsNode SVGPatternElement
instance IsEventTarget SVGPatternElement
instance IsGObject SVGPatternElement where
typeGType _ = gTypeSVGPatternElement
foreign import javascript unsafe "window[\"SVGPatternElement\"]" gTypeSVGPatternElement :: GType
newtype SVGPoint = SVGPoint { unSVGPoint :: JSVal }
instance Eq (SVGPoint) where
(SVGPoint a) == (SVGPoint b) = js_eq a b
instance PToJSVal SVGPoint where
pToJSVal = unSVGPoint
instance PFromJSVal SVGPoint where
pFromJSVal = SVGPoint
instance ToJSVal SVGPoint where
toJSVal = return . unSVGPoint
instance FromJSVal SVGPoint where
fromJSVal = return . fmap SVGPoint . maybeJSNullOrUndefined
instance IsGObject SVGPoint where
typeGType _ = gTypeSVGPoint
foreign import javascript unsafe "window[\"SVGPoint\"]" gTypeSVGPoint :: GType
newtype SVGPointList = SVGPointList { unSVGPointList :: JSVal }
instance Eq (SVGPointList) where
(SVGPointList a) == (SVGPointList b) = js_eq a b
instance PToJSVal SVGPointList where
pToJSVal = unSVGPointList
instance PFromJSVal SVGPointList where
pFromJSVal = SVGPointList
instance ToJSVal SVGPointList where
toJSVal = return . unSVGPointList
instance FromJSVal SVGPointList where
fromJSVal = return . fmap SVGPointList . maybeJSNullOrUndefined
instance IsGObject SVGPointList where
typeGType _ = gTypeSVGPointList
foreign import javascript unsafe "window[\"SVGPointList\"]" gTypeSVGPointList :: GType
newtype SVGPolygonElement = SVGPolygonElement { unSVGPolygonElement :: JSVal }
instance Eq (SVGPolygonElement) where
(SVGPolygonElement a) == (SVGPolygonElement b) = js_eq a b
instance PToJSVal SVGPolygonElement where
pToJSVal = unSVGPolygonElement
instance PFromJSVal SVGPolygonElement where
pFromJSVal = SVGPolygonElement
instance ToJSVal SVGPolygonElement where
toJSVal = return . unSVGPolygonElement
instance FromJSVal SVGPolygonElement where
fromJSVal = return . fmap SVGPolygonElement . maybeJSNullOrUndefined
instance IsSVGGraphicsElement SVGPolygonElement
instance IsSVGElement SVGPolygonElement
instance IsElement SVGPolygonElement
instance IsNode SVGPolygonElement
instance IsEventTarget SVGPolygonElement
instance IsGObject SVGPolygonElement where
typeGType _ = gTypeSVGPolygonElement
foreign import javascript unsafe "window[\"SVGPolygonElement\"]" gTypeSVGPolygonElement :: GType
newtype SVGPolylineElement = SVGPolylineElement { unSVGPolylineElement :: JSVal }
instance Eq (SVGPolylineElement) where
(SVGPolylineElement a) == (SVGPolylineElement b) = js_eq a b
instance PToJSVal SVGPolylineElement where
pToJSVal = unSVGPolylineElement
instance PFromJSVal SVGPolylineElement where
pFromJSVal = SVGPolylineElement
instance ToJSVal SVGPolylineElement where
toJSVal = return . unSVGPolylineElement
instance FromJSVal SVGPolylineElement where
fromJSVal = return . fmap SVGPolylineElement . maybeJSNullOrUndefined
instance IsSVGGraphicsElement SVGPolylineElement
instance IsSVGElement SVGPolylineElement
instance IsElement SVGPolylineElement
instance IsNode SVGPolylineElement
instance IsEventTarget SVGPolylineElement
instance IsGObject SVGPolylineElement where
typeGType _ = gTypeSVGPolylineElement
foreign import javascript unsafe "window[\"SVGPolylineElement\"]" gTypeSVGPolylineElement :: GType
newtype SVGPreserveAspectRatio = SVGPreserveAspectRatio { unSVGPreserveAspectRatio :: JSVal }
instance Eq (SVGPreserveAspectRatio) where
(SVGPreserveAspectRatio a) == (SVGPreserveAspectRatio b) = js_eq a b
instance PToJSVal SVGPreserveAspectRatio where
pToJSVal = unSVGPreserveAspectRatio
instance PFromJSVal SVGPreserveAspectRatio where
pFromJSVal = SVGPreserveAspectRatio
instance ToJSVal SVGPreserveAspectRatio where
toJSVal = return . unSVGPreserveAspectRatio
instance FromJSVal SVGPreserveAspectRatio where
fromJSVal = return . fmap SVGPreserveAspectRatio . maybeJSNullOrUndefined
instance IsGObject SVGPreserveAspectRatio where
typeGType _ = gTypeSVGPreserveAspectRatio
foreign import javascript unsafe "window[\"SVGPreserveAspectRatio\"]" gTypeSVGPreserveAspectRatio :: GType
newtype SVGRadialGradientElement = SVGRadialGradientElement { unSVGRadialGradientElement :: JSVal }
instance Eq (SVGRadialGradientElement) where
(SVGRadialGradientElement a) == (SVGRadialGradientElement b) = js_eq a b
instance PToJSVal SVGRadialGradientElement where
pToJSVal = unSVGRadialGradientElement
instance PFromJSVal SVGRadialGradientElement where
pFromJSVal = SVGRadialGradientElement
instance ToJSVal SVGRadialGradientElement where
toJSVal = return . unSVGRadialGradientElement
instance FromJSVal SVGRadialGradientElement where
fromJSVal = return . fmap SVGRadialGradientElement . maybeJSNullOrUndefined
instance IsSVGGradientElement SVGRadialGradientElement
instance IsSVGElement SVGRadialGradientElement
instance IsElement SVGRadialGradientElement
instance IsNode SVGRadialGradientElement
instance IsEventTarget SVGRadialGradientElement
instance IsGObject SVGRadialGradientElement where
typeGType _ = gTypeSVGRadialGradientElement
foreign import javascript unsafe "window[\"SVGRadialGradientElement\"]" gTypeSVGRadialGradientElement :: GType
newtype SVGRect = SVGRect { unSVGRect :: JSVal }
instance Eq (SVGRect) where
(SVGRect a) == (SVGRect b) = js_eq a b
instance PToJSVal SVGRect where
pToJSVal = unSVGRect
instance PFromJSVal SVGRect where
pFromJSVal = SVGRect
instance ToJSVal SVGRect where
toJSVal = return . unSVGRect
instance FromJSVal SVGRect where
fromJSVal = return . fmap SVGRect . maybeJSNullOrUndefined
instance IsGObject SVGRect where
typeGType _ = gTypeSVGRect
foreign import javascript unsafe "window[\"SVGRect\"]" gTypeSVGRect :: GType
newtype SVGRectElement = SVGRectElement { unSVGRectElement :: JSVal }
instance Eq (SVGRectElement) where
(SVGRectElement a) == (SVGRectElement b) = js_eq a b
instance PToJSVal SVGRectElement where
pToJSVal = unSVGRectElement
instance PFromJSVal SVGRectElement where
pFromJSVal = SVGRectElement
instance ToJSVal SVGRectElement where
toJSVal = return . unSVGRectElement
instance FromJSVal SVGRectElement where
fromJSVal = return . fmap SVGRectElement . maybeJSNullOrUndefined
instance IsSVGGraphicsElement SVGRectElement
instance IsSVGElement SVGRectElement
instance IsElement SVGRectElement
instance IsNode SVGRectElement
instance IsEventTarget SVGRectElement
instance IsGObject SVGRectElement where
typeGType _ = gTypeSVGRectElement
foreign import javascript unsafe "window[\"SVGRectElement\"]" gTypeSVGRectElement :: GType
newtype SVGRenderingIntent = SVGRenderingIntent { unSVGRenderingIntent :: JSVal }
instance Eq (SVGRenderingIntent) where
(SVGRenderingIntent a) == (SVGRenderingIntent b) = js_eq a b
instance PToJSVal SVGRenderingIntent where
pToJSVal = unSVGRenderingIntent
instance PFromJSVal SVGRenderingIntent where
pFromJSVal = SVGRenderingIntent
instance ToJSVal SVGRenderingIntent where
toJSVal = return . unSVGRenderingIntent
instance FromJSVal SVGRenderingIntent where
fromJSVal = return . fmap SVGRenderingIntent . maybeJSNullOrUndefined
instance IsGObject SVGRenderingIntent where
typeGType _ = gTypeSVGRenderingIntent
foreign import javascript unsafe "window[\"SVGRenderingIntent\"]" gTypeSVGRenderingIntent :: GType
newtype SVGSVGElement = SVGSVGElement { unSVGSVGElement :: JSVal }
instance Eq (SVGSVGElement) where
(SVGSVGElement a) == (SVGSVGElement b) = js_eq a b
instance PToJSVal SVGSVGElement where
pToJSVal = unSVGSVGElement
instance PFromJSVal SVGSVGElement where
pFromJSVal = SVGSVGElement
instance ToJSVal SVGSVGElement where
toJSVal = return . unSVGSVGElement
instance FromJSVal SVGSVGElement where
fromJSVal = return . fmap SVGSVGElement . maybeJSNullOrUndefined
instance IsSVGGraphicsElement SVGSVGElement
instance IsSVGElement SVGSVGElement
instance IsElement SVGSVGElement
instance IsNode SVGSVGElement
instance IsEventTarget SVGSVGElement
instance IsGObject SVGSVGElement where
typeGType _ = gTypeSVGSVGElement
foreign import javascript unsafe "window[\"SVGSVGElement\"]" gTypeSVGSVGElement :: GType
newtype SVGScriptElement = SVGScriptElement { unSVGScriptElement :: JSVal }
instance Eq (SVGScriptElement) where
(SVGScriptElement a) == (SVGScriptElement b) = js_eq a b
instance PToJSVal SVGScriptElement where
pToJSVal = unSVGScriptElement
instance PFromJSVal SVGScriptElement where
pFromJSVal = SVGScriptElement
instance ToJSVal SVGScriptElement where
toJSVal = return . unSVGScriptElement
instance FromJSVal SVGScriptElement where
fromJSVal = return . fmap SVGScriptElement . maybeJSNullOrUndefined
instance IsSVGElement SVGScriptElement
instance IsElement SVGScriptElement
instance IsNode SVGScriptElement
instance IsEventTarget SVGScriptElement
instance IsGObject SVGScriptElement where
typeGType _ = gTypeSVGScriptElement
foreign import javascript unsafe "window[\"SVGScriptElement\"]" gTypeSVGScriptElement :: GType
newtype SVGSetElement = SVGSetElement { unSVGSetElement :: JSVal }
instance Eq (SVGSetElement) where
(SVGSetElement a) == (SVGSetElement b) = js_eq a b
instance PToJSVal SVGSetElement where
pToJSVal = unSVGSetElement
instance PFromJSVal SVGSetElement where
pFromJSVal = SVGSetElement
instance ToJSVal SVGSetElement where
toJSVal = return . unSVGSetElement
instance FromJSVal SVGSetElement where
fromJSVal = return . fmap SVGSetElement . maybeJSNullOrUndefined
instance IsSVGAnimationElement SVGSetElement
instance IsSVGElement SVGSetElement
instance IsElement SVGSetElement
instance IsNode SVGSetElement
instance IsEventTarget SVGSetElement
instance IsGObject SVGSetElement where
typeGType _ = gTypeSVGSetElement
foreign import javascript unsafe "window[\"SVGSetElement\"]" gTypeSVGSetElement :: GType
newtype SVGStopElement = SVGStopElement { unSVGStopElement :: JSVal }
instance Eq (SVGStopElement) where
(SVGStopElement a) == (SVGStopElement b) = js_eq a b
instance PToJSVal SVGStopElement where
pToJSVal = unSVGStopElement
instance PFromJSVal SVGStopElement where
pFromJSVal = SVGStopElement
instance ToJSVal SVGStopElement where
toJSVal = return . unSVGStopElement
instance FromJSVal SVGStopElement where
fromJSVal = return . fmap SVGStopElement . maybeJSNullOrUndefined
instance IsSVGElement SVGStopElement
instance IsElement SVGStopElement
instance IsNode SVGStopElement
instance IsEventTarget SVGStopElement
instance IsGObject SVGStopElement where
typeGType _ = gTypeSVGStopElement
foreign import javascript unsafe "window[\"SVGStopElement\"]" gTypeSVGStopElement :: GType
newtype SVGStringList = SVGStringList { unSVGStringList :: JSVal }
instance Eq (SVGStringList) where
(SVGStringList a) == (SVGStringList b) = js_eq a b
instance PToJSVal SVGStringList where
pToJSVal = unSVGStringList
instance PFromJSVal SVGStringList where
pFromJSVal = SVGStringList
instance ToJSVal SVGStringList where
toJSVal = return . unSVGStringList
instance FromJSVal SVGStringList where
fromJSVal = return . fmap SVGStringList . maybeJSNullOrUndefined
instance IsGObject SVGStringList where
typeGType _ = gTypeSVGStringList
foreign import javascript unsafe "window[\"SVGStringList\"]" gTypeSVGStringList :: GType
newtype SVGStyleElement = SVGStyleElement { unSVGStyleElement :: JSVal }
instance Eq (SVGStyleElement) where
(SVGStyleElement a) == (SVGStyleElement b) = js_eq a b
instance PToJSVal SVGStyleElement where
pToJSVal = unSVGStyleElement
instance PFromJSVal SVGStyleElement where
pFromJSVal = SVGStyleElement
instance ToJSVal SVGStyleElement where
toJSVal = return . unSVGStyleElement
instance FromJSVal SVGStyleElement where
fromJSVal = return . fmap SVGStyleElement . maybeJSNullOrUndefined
instance IsSVGElement SVGStyleElement
instance IsElement SVGStyleElement
instance IsNode SVGStyleElement
instance IsEventTarget SVGStyleElement
instance IsGObject SVGStyleElement where
typeGType _ = gTypeSVGStyleElement
foreign import javascript unsafe "window[\"SVGStyleElement\"]" gTypeSVGStyleElement :: GType
newtype SVGSwitchElement = SVGSwitchElement { unSVGSwitchElement :: JSVal }
instance Eq (SVGSwitchElement) where
(SVGSwitchElement a) == (SVGSwitchElement b) = js_eq a b
instance PToJSVal SVGSwitchElement where
pToJSVal = unSVGSwitchElement
instance PFromJSVal SVGSwitchElement where
pFromJSVal = SVGSwitchElement
instance ToJSVal SVGSwitchElement where
toJSVal = return . unSVGSwitchElement
instance FromJSVal SVGSwitchElement where
fromJSVal = return . fmap SVGSwitchElement . maybeJSNullOrUndefined
instance IsSVGGraphicsElement SVGSwitchElement
instance IsSVGElement SVGSwitchElement
instance IsElement SVGSwitchElement
instance IsNode SVGSwitchElement
instance IsEventTarget SVGSwitchElement
instance IsGObject SVGSwitchElement where
typeGType _ = gTypeSVGSwitchElement
foreign import javascript unsafe "window[\"SVGSwitchElement\"]" gTypeSVGSwitchElement :: GType
newtype SVGSymbolElement = SVGSymbolElement { unSVGSymbolElement :: JSVal }
instance Eq (SVGSymbolElement) where
(SVGSymbolElement a) == (SVGSymbolElement b) = js_eq a b
instance PToJSVal SVGSymbolElement where
pToJSVal = unSVGSymbolElement
instance PFromJSVal SVGSymbolElement where
pFromJSVal = SVGSymbolElement
instance ToJSVal SVGSymbolElement where
toJSVal = return . unSVGSymbolElement
instance FromJSVal SVGSymbolElement where
fromJSVal = return . fmap SVGSymbolElement . maybeJSNullOrUndefined
instance IsSVGElement SVGSymbolElement
instance IsElement SVGSymbolElement
instance IsNode SVGSymbolElement
instance IsEventTarget SVGSymbolElement
instance IsGObject SVGSymbolElement where
typeGType _ = gTypeSVGSymbolElement
foreign import javascript unsafe "window[\"SVGSymbolElement\"]" gTypeSVGSymbolElement :: GType
newtype SVGTRefElement = SVGTRefElement { unSVGTRefElement :: JSVal }
instance Eq (SVGTRefElement) where
(SVGTRefElement a) == (SVGTRefElement b) = js_eq a b
instance PToJSVal SVGTRefElement where
pToJSVal = unSVGTRefElement
instance PFromJSVal SVGTRefElement where
pFromJSVal = SVGTRefElement
instance ToJSVal SVGTRefElement where
toJSVal = return . unSVGTRefElement
instance FromJSVal SVGTRefElement where
fromJSVal = return . fmap SVGTRefElement . maybeJSNullOrUndefined
instance IsSVGTextPositioningElement SVGTRefElement
instance IsSVGTextContentElement SVGTRefElement
instance IsSVGGraphicsElement SVGTRefElement
instance IsSVGElement SVGTRefElement
instance IsElement SVGTRefElement
instance IsNode SVGTRefElement
instance IsEventTarget SVGTRefElement
instance IsGObject SVGTRefElement where
typeGType _ = gTypeSVGTRefElement
foreign import javascript unsafe "window[\"SVGTRefElement\"]" gTypeSVGTRefElement :: GType
newtype SVGTSpanElement = SVGTSpanElement { unSVGTSpanElement :: JSVal }
instance Eq (SVGTSpanElement) where
(SVGTSpanElement a) == (SVGTSpanElement b) = js_eq a b
instance PToJSVal SVGTSpanElement where
pToJSVal = unSVGTSpanElement
instance PFromJSVal SVGTSpanElement where
pFromJSVal = SVGTSpanElement
instance ToJSVal SVGTSpanElement where
toJSVal = return . unSVGTSpanElement
instance FromJSVal SVGTSpanElement where
fromJSVal = return . fmap SVGTSpanElement . maybeJSNullOrUndefined
instance IsSVGTextPositioningElement SVGTSpanElement
instance IsSVGTextContentElement SVGTSpanElement
instance IsSVGGraphicsElement SVGTSpanElement
instance IsSVGElement SVGTSpanElement
instance IsElement SVGTSpanElement
instance IsNode SVGTSpanElement
instance IsEventTarget SVGTSpanElement
instance IsGObject SVGTSpanElement where
typeGType _ = gTypeSVGTSpanElement
foreign import javascript unsafe "window[\"SVGTSpanElement\"]" gTypeSVGTSpanElement :: GType
newtype SVGTests = SVGTests { unSVGTests :: JSVal }
instance Eq (SVGTests) where
(SVGTests a) == (SVGTests b) = js_eq a b
instance PToJSVal SVGTests where
pToJSVal = unSVGTests
instance PFromJSVal SVGTests where
pFromJSVal = SVGTests
instance ToJSVal SVGTests where
toJSVal = return . unSVGTests
instance FromJSVal SVGTests where
fromJSVal = return . fmap SVGTests . maybeJSNullOrUndefined
instance IsGObject SVGTests where
typeGType _ = gTypeSVGTests
foreign import javascript unsafe "window[\"SVGTests\"]" gTypeSVGTests :: GType
newtype SVGTextContentElement = SVGTextContentElement { unSVGTextContentElement :: JSVal }
instance Eq (SVGTextContentElement) where
(SVGTextContentElement a) == (SVGTextContentElement b) = js_eq a b
instance PToJSVal SVGTextContentElement where
pToJSVal = unSVGTextContentElement
instance PFromJSVal SVGTextContentElement where
pFromJSVal = SVGTextContentElement
instance ToJSVal SVGTextContentElement where
toJSVal = return . unSVGTextContentElement
instance FromJSVal SVGTextContentElement where
fromJSVal = return . fmap SVGTextContentElement . maybeJSNullOrUndefined
class IsSVGGraphicsElement o => IsSVGTextContentElement o
toSVGTextContentElement :: IsSVGTextContentElement o => o -> SVGTextContentElement
toSVGTextContentElement = SVGTextContentElement . coerce
instance IsSVGTextContentElement SVGTextContentElement
instance IsSVGGraphicsElement SVGTextContentElement
instance IsSVGElement SVGTextContentElement
instance IsElement SVGTextContentElement
instance IsNode SVGTextContentElement
instance IsEventTarget SVGTextContentElement
instance IsGObject SVGTextContentElement where
typeGType _ = gTypeSVGTextContentElement
foreign import javascript unsafe "window[\"SVGTextContentElement\"]" gTypeSVGTextContentElement :: GType
newtype SVGTextElement = SVGTextElement { unSVGTextElement :: JSVal }
instance Eq (SVGTextElement) where
(SVGTextElement a) == (SVGTextElement b) = js_eq a b
instance PToJSVal SVGTextElement where
pToJSVal = unSVGTextElement
instance PFromJSVal SVGTextElement where
pFromJSVal = SVGTextElement
instance ToJSVal SVGTextElement where
toJSVal = return . unSVGTextElement
instance FromJSVal SVGTextElement where
fromJSVal = return . fmap SVGTextElement . maybeJSNullOrUndefined
instance IsSVGTextPositioningElement SVGTextElement
instance IsSVGTextContentElement SVGTextElement
instance IsSVGGraphicsElement SVGTextElement
instance IsSVGElement SVGTextElement
instance IsElement SVGTextElement
instance IsNode SVGTextElement
instance IsEventTarget SVGTextElement
instance IsGObject SVGTextElement where
typeGType _ = gTypeSVGTextElement
foreign import javascript unsafe "window[\"SVGTextElement\"]" gTypeSVGTextElement :: GType
newtype SVGTextPathElement = SVGTextPathElement { unSVGTextPathElement :: JSVal }
instance Eq (SVGTextPathElement) where
(SVGTextPathElement a) == (SVGTextPathElement b) = js_eq a b
instance PToJSVal SVGTextPathElement where
pToJSVal = unSVGTextPathElement
instance PFromJSVal SVGTextPathElement where
pFromJSVal = SVGTextPathElement
instance ToJSVal SVGTextPathElement where
toJSVal = return . unSVGTextPathElement
instance FromJSVal SVGTextPathElement where
fromJSVal = return . fmap SVGTextPathElement . maybeJSNullOrUndefined
instance IsSVGTextContentElement SVGTextPathElement
instance IsSVGGraphicsElement SVGTextPathElement
instance IsSVGElement SVGTextPathElement
instance IsElement SVGTextPathElement
instance IsNode SVGTextPathElement
instance IsEventTarget SVGTextPathElement
instance IsGObject SVGTextPathElement where
typeGType _ = gTypeSVGTextPathElement
foreign import javascript unsafe "window[\"SVGTextPathElement\"]" gTypeSVGTextPathElement :: GType
newtype SVGTextPositioningElement = SVGTextPositioningElement { unSVGTextPositioningElement :: JSVal }
instance Eq (SVGTextPositioningElement) where
(SVGTextPositioningElement a) == (SVGTextPositioningElement b) = js_eq a b
instance PToJSVal SVGTextPositioningElement where
pToJSVal = unSVGTextPositioningElement
instance PFromJSVal SVGTextPositioningElement where
pFromJSVal = SVGTextPositioningElement
instance ToJSVal SVGTextPositioningElement where
toJSVal = return . unSVGTextPositioningElement
instance FromJSVal SVGTextPositioningElement where
fromJSVal = return . fmap SVGTextPositioningElement . maybeJSNullOrUndefined
class IsSVGTextContentElement o => IsSVGTextPositioningElement o
toSVGTextPositioningElement :: IsSVGTextPositioningElement o => o -> SVGTextPositioningElement
toSVGTextPositioningElement = SVGTextPositioningElement . coerce
instance IsSVGTextPositioningElement SVGTextPositioningElement
instance IsSVGTextContentElement SVGTextPositioningElement
instance IsSVGGraphicsElement SVGTextPositioningElement
instance IsSVGElement SVGTextPositioningElement
instance IsElement SVGTextPositioningElement
instance IsNode SVGTextPositioningElement
instance IsEventTarget SVGTextPositioningElement
instance IsGObject SVGTextPositioningElement where
typeGType _ = gTypeSVGTextPositioningElement
foreign import javascript unsafe "window[\"SVGTextPositioningElement\"]" gTypeSVGTextPositioningElement :: GType
newtype SVGTitleElement = SVGTitleElement { unSVGTitleElement :: JSVal }
instance Eq (SVGTitleElement) where
(SVGTitleElement a) == (SVGTitleElement b) = js_eq a b
instance PToJSVal SVGTitleElement where
pToJSVal = unSVGTitleElement
instance PFromJSVal SVGTitleElement where
pFromJSVal = SVGTitleElement
instance ToJSVal SVGTitleElement where
toJSVal = return . unSVGTitleElement
instance FromJSVal SVGTitleElement where
fromJSVal = return . fmap SVGTitleElement . maybeJSNullOrUndefined
instance IsSVGElement SVGTitleElement
instance IsElement SVGTitleElement
instance IsNode SVGTitleElement
instance IsEventTarget SVGTitleElement
instance IsGObject SVGTitleElement where
typeGType _ = gTypeSVGTitleElement
foreign import javascript unsafe "window[\"SVGTitleElement\"]" gTypeSVGTitleElement :: GType
newtype SVGTransform = SVGTransform { unSVGTransform :: JSVal }
instance Eq (SVGTransform) where
(SVGTransform a) == (SVGTransform b) = js_eq a b
instance PToJSVal SVGTransform where
pToJSVal = unSVGTransform
instance PFromJSVal SVGTransform where
pFromJSVal = SVGTransform
instance ToJSVal SVGTransform where
toJSVal = return . unSVGTransform
instance FromJSVal SVGTransform where
fromJSVal = return . fmap SVGTransform . maybeJSNullOrUndefined
instance IsGObject SVGTransform where
typeGType _ = gTypeSVGTransform
foreign import javascript unsafe "window[\"SVGTransform\"]" gTypeSVGTransform :: GType
newtype SVGTransformList = SVGTransformList { unSVGTransformList :: JSVal }
instance Eq (SVGTransformList) where
(SVGTransformList a) == (SVGTransformList b) = js_eq a b
instance PToJSVal SVGTransformList where
pToJSVal = unSVGTransformList
instance PFromJSVal SVGTransformList where
pFromJSVal = SVGTransformList
instance ToJSVal SVGTransformList where
toJSVal = return . unSVGTransformList
instance FromJSVal SVGTransformList where
fromJSVal = return . fmap SVGTransformList . maybeJSNullOrUndefined
instance IsGObject SVGTransformList where
typeGType _ = gTypeSVGTransformList
foreign import javascript unsafe "window[\"SVGTransformList\"]" gTypeSVGTransformList :: GType
newtype SVGURIReference = SVGURIReference { unSVGURIReference :: JSVal }
instance Eq (SVGURIReference) where
(SVGURIReference a) == (SVGURIReference b) = js_eq a b
instance PToJSVal SVGURIReference where
pToJSVal = unSVGURIReference
instance PFromJSVal SVGURIReference where
pFromJSVal = SVGURIReference
instance ToJSVal SVGURIReference where
toJSVal = return . unSVGURIReference
instance FromJSVal SVGURIReference where
fromJSVal = return . fmap SVGURIReference . maybeJSNullOrUndefined
instance IsGObject SVGURIReference where
typeGType _ = gTypeSVGURIReference
foreign import javascript unsafe "window[\"SVGURIReference\"]" gTypeSVGURIReference :: GType
newtype SVGUnitTypes = SVGUnitTypes { unSVGUnitTypes :: JSVal }
instance Eq (SVGUnitTypes) where
(SVGUnitTypes a) == (SVGUnitTypes b) = js_eq a b
instance PToJSVal SVGUnitTypes where
pToJSVal = unSVGUnitTypes
instance PFromJSVal SVGUnitTypes where
pFromJSVal = SVGUnitTypes
instance ToJSVal SVGUnitTypes where
toJSVal = return . unSVGUnitTypes
instance FromJSVal SVGUnitTypes where
fromJSVal = return . fmap SVGUnitTypes . maybeJSNullOrUndefined
instance IsGObject SVGUnitTypes where
typeGType _ = gTypeSVGUnitTypes
foreign import javascript unsafe "window[\"SVGUnitTypes\"]" gTypeSVGUnitTypes :: GType
newtype SVGUseElement = SVGUseElement { unSVGUseElement :: JSVal }
instance Eq (SVGUseElement) where
(SVGUseElement a) == (SVGUseElement b) = js_eq a b
instance PToJSVal SVGUseElement where
pToJSVal = unSVGUseElement
instance PFromJSVal SVGUseElement where
pFromJSVal = SVGUseElement
instance ToJSVal SVGUseElement where
toJSVal = return . unSVGUseElement
instance FromJSVal SVGUseElement where
fromJSVal = return . fmap SVGUseElement . maybeJSNullOrUndefined
instance IsSVGGraphicsElement SVGUseElement
instance IsSVGElement SVGUseElement
instance IsElement SVGUseElement
instance IsNode SVGUseElement
instance IsEventTarget SVGUseElement
instance IsGObject SVGUseElement where
typeGType _ = gTypeSVGUseElement
foreign import javascript unsafe "window[\"SVGUseElement\"]" gTypeSVGUseElement :: GType
newtype SVGVKernElement = SVGVKernElement { unSVGVKernElement :: JSVal }
instance Eq (SVGVKernElement) where
(SVGVKernElement a) == (SVGVKernElement b) = js_eq a b
instance PToJSVal SVGVKernElement where
pToJSVal = unSVGVKernElement
instance PFromJSVal SVGVKernElement where
pFromJSVal = SVGVKernElement
instance ToJSVal SVGVKernElement where
toJSVal = return . unSVGVKernElement
instance FromJSVal SVGVKernElement where
fromJSVal = return . fmap SVGVKernElement . maybeJSNullOrUndefined
instance IsSVGElement SVGVKernElement
instance IsElement SVGVKernElement
instance IsNode SVGVKernElement
instance IsEventTarget SVGVKernElement
instance IsGObject SVGVKernElement where
typeGType _ = gTypeSVGVKernElement
foreign import javascript unsafe "window[\"SVGVKernElement\"]" gTypeSVGVKernElement :: GType
newtype SVGViewElement = SVGViewElement { unSVGViewElement :: JSVal }
instance Eq (SVGViewElement) where
(SVGViewElement a) == (SVGViewElement b) = js_eq a b
instance PToJSVal SVGViewElement where
pToJSVal = unSVGViewElement
instance PFromJSVal SVGViewElement where
pFromJSVal = SVGViewElement
instance ToJSVal SVGViewElement where
toJSVal = return . unSVGViewElement
instance FromJSVal SVGViewElement where
fromJSVal = return . fmap SVGViewElement . maybeJSNullOrUndefined
instance IsSVGElement SVGViewElement
instance IsElement SVGViewElement
instance IsNode SVGViewElement
instance IsEventTarget SVGViewElement
instance IsGObject SVGViewElement where
typeGType _ = gTypeSVGViewElement
foreign import javascript unsafe "window[\"SVGViewElement\"]" gTypeSVGViewElement :: GType
newtype SVGViewSpec = SVGViewSpec { unSVGViewSpec :: JSVal }
instance Eq (SVGViewSpec) where
(SVGViewSpec a) == (SVGViewSpec b) = js_eq a b
instance PToJSVal SVGViewSpec where
pToJSVal = unSVGViewSpec
instance PFromJSVal SVGViewSpec where
pFromJSVal = SVGViewSpec
instance ToJSVal SVGViewSpec where
toJSVal = return . unSVGViewSpec
instance FromJSVal SVGViewSpec where
fromJSVal = return . fmap SVGViewSpec . maybeJSNullOrUndefined
instance IsGObject SVGViewSpec where
typeGType _ = gTypeSVGViewSpec
foreign import javascript unsafe "window[\"SVGViewSpec\"]" gTypeSVGViewSpec :: GType
newtype SVGZoomAndPan = SVGZoomAndPan { unSVGZoomAndPan :: JSVal }
instance Eq (SVGZoomAndPan) where
(SVGZoomAndPan a) == (SVGZoomAndPan b) = js_eq a b
instance PToJSVal SVGZoomAndPan where
pToJSVal = unSVGZoomAndPan
instance PFromJSVal SVGZoomAndPan where
pFromJSVal = SVGZoomAndPan
instance ToJSVal SVGZoomAndPan where
toJSVal = return . unSVGZoomAndPan
instance FromJSVal SVGZoomAndPan where
fromJSVal = return . fmap SVGZoomAndPan . maybeJSNullOrUndefined
instance IsGObject SVGZoomAndPan where
typeGType _ = gTypeSVGZoomAndPan
foreign import javascript unsafe "window[\"SVGZoomAndPan\"]" gTypeSVGZoomAndPan :: GType
newtype SVGZoomEvent = SVGZoomEvent { unSVGZoomEvent :: JSVal }
instance Eq (SVGZoomEvent) where
(SVGZoomEvent a) == (SVGZoomEvent b) = js_eq a b
instance PToJSVal SVGZoomEvent where
pToJSVal = unSVGZoomEvent
instance PFromJSVal SVGZoomEvent where
pFromJSVal = SVGZoomEvent
instance ToJSVal SVGZoomEvent where
toJSVal = return . unSVGZoomEvent
instance FromJSVal SVGZoomEvent where
fromJSVal = return . fmap SVGZoomEvent . maybeJSNullOrUndefined
instance IsUIEvent SVGZoomEvent
instance IsEvent SVGZoomEvent
instance IsGObject SVGZoomEvent where
typeGType _ = gTypeSVGZoomEvent
foreign import javascript unsafe "window[\"SVGZoomEvent\"]" gTypeSVGZoomEvent :: GType
newtype Screen = Screen { unScreen :: JSVal }
instance Eq (Screen) where
(Screen a) == (Screen b) = js_eq a b
instance PToJSVal Screen where
pToJSVal = unScreen
instance PFromJSVal Screen where
pFromJSVal = Screen
instance ToJSVal Screen where
toJSVal = return . unScreen
instance FromJSVal Screen where
fromJSVal = return . fmap Screen . maybeJSNullOrUndefined
instance IsGObject Screen where
typeGType _ = gTypeScreen
foreign import javascript unsafe "window[\"Screen\"]" gTypeScreen :: GType
newtype ScriptProcessorNode = ScriptProcessorNode { unScriptProcessorNode :: JSVal }
instance Eq (ScriptProcessorNode) where
(ScriptProcessorNode a) == (ScriptProcessorNode b) = js_eq a b
instance PToJSVal ScriptProcessorNode where
pToJSVal = unScriptProcessorNode
instance PFromJSVal ScriptProcessorNode where
pFromJSVal = ScriptProcessorNode
instance ToJSVal ScriptProcessorNode where
toJSVal = return . unScriptProcessorNode
instance FromJSVal ScriptProcessorNode where
fromJSVal = return . fmap ScriptProcessorNode . maybeJSNullOrUndefined
instance IsAudioNode ScriptProcessorNode
instance IsEventTarget ScriptProcessorNode
instance IsGObject ScriptProcessorNode where
typeGType _ = gTypeScriptProcessorNode
foreign import javascript unsafe "window[\"ScriptProcessorNode\"]" gTypeScriptProcessorNode :: GType
newtype ScriptProfile = ScriptProfile { unScriptProfile :: JSVal }
instance Eq (ScriptProfile) where
(ScriptProfile a) == (ScriptProfile b) = js_eq a b
instance PToJSVal ScriptProfile where
pToJSVal = unScriptProfile
instance PFromJSVal ScriptProfile where
pFromJSVal = ScriptProfile
instance ToJSVal ScriptProfile where
toJSVal = return . unScriptProfile
instance FromJSVal ScriptProfile where
fromJSVal = return . fmap ScriptProfile . maybeJSNullOrUndefined
instance IsGObject ScriptProfile where
typeGType _ = gTypeScriptProfile
foreign import javascript unsafe "window[\"ScriptProfile\"]" gTypeScriptProfile :: GType
newtype ScriptProfileNode = ScriptProfileNode { unScriptProfileNode :: JSVal }
instance Eq (ScriptProfileNode) where
(ScriptProfileNode a) == (ScriptProfileNode b) = js_eq a b
instance PToJSVal ScriptProfileNode where
pToJSVal = unScriptProfileNode
instance PFromJSVal ScriptProfileNode where
pFromJSVal = ScriptProfileNode
instance ToJSVal ScriptProfileNode where
toJSVal = return . unScriptProfileNode
instance FromJSVal ScriptProfileNode where
fromJSVal = return . fmap ScriptProfileNode . maybeJSNullOrUndefined
instance IsGObject ScriptProfileNode where
typeGType _ = gTypeScriptProfileNode
foreign import javascript unsafe "window[\"ScriptProfileNode\"]" gTypeScriptProfileNode :: GType
newtype SecurityPolicy = SecurityPolicy { unSecurityPolicy :: JSVal }
instance Eq (SecurityPolicy) where
(SecurityPolicy a) == (SecurityPolicy b) = js_eq a b
instance PToJSVal SecurityPolicy where
pToJSVal = unSecurityPolicy
instance PFromJSVal SecurityPolicy where
pFromJSVal = SecurityPolicy
instance ToJSVal SecurityPolicy where
toJSVal = return . unSecurityPolicy
instance FromJSVal SecurityPolicy where
fromJSVal = return . fmap SecurityPolicy . maybeJSNullOrUndefined
instance IsGObject SecurityPolicy where
typeGType _ = gTypeSecurityPolicy
foreign import javascript unsafe "window[\"SecurityPolicy\"]" gTypeSecurityPolicy :: GType
newtype SecurityPolicyViolationEvent = SecurityPolicyViolationEvent { unSecurityPolicyViolationEvent :: JSVal }
instance Eq (SecurityPolicyViolationEvent) where
(SecurityPolicyViolationEvent a) == (SecurityPolicyViolationEvent b) = js_eq a b
instance PToJSVal SecurityPolicyViolationEvent where
pToJSVal = unSecurityPolicyViolationEvent
instance PFromJSVal SecurityPolicyViolationEvent where
pFromJSVal = SecurityPolicyViolationEvent
instance ToJSVal SecurityPolicyViolationEvent where
toJSVal = return . unSecurityPolicyViolationEvent
instance FromJSVal SecurityPolicyViolationEvent where
fromJSVal = return . fmap SecurityPolicyViolationEvent . maybeJSNullOrUndefined
instance IsEvent SecurityPolicyViolationEvent
instance IsGObject SecurityPolicyViolationEvent where
typeGType _ = gTypeSecurityPolicyViolationEvent
foreign import javascript unsafe "window[\"SecurityPolicyViolationEvent\"]" gTypeSecurityPolicyViolationEvent :: GType
newtype Selection = Selection { unSelection :: JSVal }
instance Eq (Selection) where
(Selection a) == (Selection b) = js_eq a b
instance PToJSVal Selection where
pToJSVal = unSelection
instance PFromJSVal Selection where
pFromJSVal = Selection
instance ToJSVal Selection where
toJSVal = return . unSelection
instance FromJSVal Selection where
fromJSVal = return . fmap Selection . maybeJSNullOrUndefined
instance IsGObject Selection where
typeGType _ = gTypeSelection
foreign import javascript unsafe "window[\"Selection\"]" gTypeSelection :: GType
newtype SourceBuffer = SourceBuffer { unSourceBuffer :: JSVal }
instance Eq (SourceBuffer) where
(SourceBuffer a) == (SourceBuffer b) = js_eq a b
instance PToJSVal SourceBuffer where
pToJSVal = unSourceBuffer
instance PFromJSVal SourceBuffer where
pFromJSVal = SourceBuffer
instance ToJSVal SourceBuffer where
toJSVal = return . unSourceBuffer
instance FromJSVal SourceBuffer where
fromJSVal = return . fmap SourceBuffer . maybeJSNullOrUndefined
instance IsEventTarget SourceBuffer
instance IsGObject SourceBuffer where
typeGType _ = gTypeSourceBuffer
foreign import javascript unsafe "window[\"SourceBuffer\"]" gTypeSourceBuffer :: GType
newtype SourceBufferList = SourceBufferList { unSourceBufferList :: JSVal }
instance Eq (SourceBufferList) where
(SourceBufferList a) == (SourceBufferList b) = js_eq a b
instance PToJSVal SourceBufferList where
pToJSVal = unSourceBufferList
instance PFromJSVal SourceBufferList where
pFromJSVal = SourceBufferList
instance ToJSVal SourceBufferList where
toJSVal = return . unSourceBufferList
instance FromJSVal SourceBufferList where
fromJSVal = return . fmap SourceBufferList . maybeJSNullOrUndefined
instance IsEventTarget SourceBufferList
instance IsGObject SourceBufferList where
typeGType _ = gTypeSourceBufferList
foreign import javascript unsafe "window[\"SourceBufferList\"]" gTypeSourceBufferList :: GType
newtype SourceInfo = SourceInfo { unSourceInfo :: JSVal }
instance Eq (SourceInfo) where
(SourceInfo a) == (SourceInfo b) = js_eq a b
instance PToJSVal SourceInfo where
pToJSVal = unSourceInfo
instance PFromJSVal SourceInfo where
pFromJSVal = SourceInfo
instance ToJSVal SourceInfo where
toJSVal = return . unSourceInfo
instance FromJSVal SourceInfo where
fromJSVal = return . fmap SourceInfo . maybeJSNullOrUndefined
instance IsGObject SourceInfo where
typeGType _ = gTypeSourceInfo
foreign import javascript unsafe "window[\"SourceInfo\"]" gTypeSourceInfo :: GType
newtype SpeechSynthesis = SpeechSynthesis { unSpeechSynthesis :: JSVal }
instance Eq (SpeechSynthesis) where
(SpeechSynthesis a) == (SpeechSynthesis b) = js_eq a b
instance PToJSVal SpeechSynthesis where
pToJSVal = unSpeechSynthesis
instance PFromJSVal SpeechSynthesis where
pFromJSVal = SpeechSynthesis
instance ToJSVal SpeechSynthesis where
toJSVal = return . unSpeechSynthesis
instance FromJSVal SpeechSynthesis where
fromJSVal = return . fmap SpeechSynthesis . maybeJSNullOrUndefined
instance IsGObject SpeechSynthesis where
typeGType _ = gTypeSpeechSynthesis
foreign import javascript unsafe "window[\"SpeechSynthesis\"]" gTypeSpeechSynthesis :: GType
newtype SpeechSynthesisEvent = SpeechSynthesisEvent { unSpeechSynthesisEvent :: JSVal }
instance Eq (SpeechSynthesisEvent) where
(SpeechSynthesisEvent a) == (SpeechSynthesisEvent b) = js_eq a b
instance PToJSVal SpeechSynthesisEvent where
pToJSVal = unSpeechSynthesisEvent
instance PFromJSVal SpeechSynthesisEvent where
pFromJSVal = SpeechSynthesisEvent
instance ToJSVal SpeechSynthesisEvent where
toJSVal = return . unSpeechSynthesisEvent
instance FromJSVal SpeechSynthesisEvent where
fromJSVal = return . fmap SpeechSynthesisEvent . maybeJSNullOrUndefined
instance IsEvent SpeechSynthesisEvent
instance IsGObject SpeechSynthesisEvent where
typeGType _ = gTypeSpeechSynthesisEvent
foreign import javascript unsafe "window[\"SpeechSynthesisEvent\"]" gTypeSpeechSynthesisEvent :: GType
newtype SpeechSynthesisUtterance = SpeechSynthesisUtterance { unSpeechSynthesisUtterance :: JSVal }
instance Eq (SpeechSynthesisUtterance) where
(SpeechSynthesisUtterance a) == (SpeechSynthesisUtterance b) = js_eq a b
instance PToJSVal SpeechSynthesisUtterance where
pToJSVal = unSpeechSynthesisUtterance
instance PFromJSVal SpeechSynthesisUtterance where
pFromJSVal = SpeechSynthesisUtterance
instance ToJSVal SpeechSynthesisUtterance where
toJSVal = return . unSpeechSynthesisUtterance
instance FromJSVal SpeechSynthesisUtterance where
fromJSVal = return . fmap SpeechSynthesisUtterance . maybeJSNullOrUndefined
instance IsEventTarget SpeechSynthesisUtterance
instance IsGObject SpeechSynthesisUtterance where
typeGType _ = gTypeSpeechSynthesisUtterance
foreign import javascript unsafe "window[\"SpeechSynthesisUtterance\"]" gTypeSpeechSynthesisUtterance :: GType
newtype SpeechSynthesisVoice = SpeechSynthesisVoice { unSpeechSynthesisVoice :: JSVal }
instance Eq (SpeechSynthesisVoice) where
(SpeechSynthesisVoice a) == (SpeechSynthesisVoice b) = js_eq a b
instance PToJSVal SpeechSynthesisVoice where
pToJSVal = unSpeechSynthesisVoice
instance PFromJSVal SpeechSynthesisVoice where
pFromJSVal = SpeechSynthesisVoice
instance ToJSVal SpeechSynthesisVoice where
toJSVal = return . unSpeechSynthesisVoice
instance FromJSVal SpeechSynthesisVoice where
fromJSVal = return . fmap SpeechSynthesisVoice . maybeJSNullOrUndefined
instance IsGObject SpeechSynthesisVoice where
typeGType _ = gTypeSpeechSynthesisVoice
foreign import javascript unsafe "window[\"SpeechSynthesisVoice\"]" gTypeSpeechSynthesisVoice :: GType
newtype Storage = Storage { unStorage :: JSVal }
instance Eq (Storage) where
(Storage a) == (Storage b) = js_eq a b
instance PToJSVal Storage where
pToJSVal = unStorage
instance PFromJSVal Storage where
pFromJSVal = Storage
instance ToJSVal Storage where
toJSVal = return . unStorage
instance FromJSVal Storage where
fromJSVal = return . fmap Storage . maybeJSNullOrUndefined
instance IsGObject Storage where
typeGType _ = gTypeStorage
foreign import javascript unsafe "window[\"Storage\"]" gTypeStorage :: GType
newtype StorageEvent = StorageEvent { unStorageEvent :: JSVal }
instance Eq (StorageEvent) where
(StorageEvent a) == (StorageEvent b) = js_eq a b
instance PToJSVal StorageEvent where
pToJSVal = unStorageEvent
instance PFromJSVal StorageEvent where
pFromJSVal = StorageEvent
instance ToJSVal StorageEvent where
toJSVal = return . unStorageEvent
instance FromJSVal StorageEvent where
fromJSVal = return . fmap StorageEvent . maybeJSNullOrUndefined
instance IsEvent StorageEvent
instance IsGObject StorageEvent where
typeGType _ = gTypeStorageEvent
foreign import javascript unsafe "window[\"StorageEvent\"]" gTypeStorageEvent :: GType
newtype StorageInfo = StorageInfo { unStorageInfo :: JSVal }
instance Eq (StorageInfo) where
(StorageInfo a) == (StorageInfo b) = js_eq a b
instance PToJSVal StorageInfo where
pToJSVal = unStorageInfo
instance PFromJSVal StorageInfo where
pFromJSVal = StorageInfo
instance ToJSVal StorageInfo where
toJSVal = return . unStorageInfo
instance FromJSVal StorageInfo where
fromJSVal = return . fmap StorageInfo . maybeJSNullOrUndefined
instance IsGObject StorageInfo where
typeGType _ = gTypeStorageInfo
foreign import javascript unsafe "window[\"StorageInfo\"]" gTypeStorageInfo :: GType
newtype StorageQuota = StorageQuota { unStorageQuota :: JSVal }
instance Eq (StorageQuota) where
(StorageQuota a) == (StorageQuota b) = js_eq a b
instance PToJSVal StorageQuota where
pToJSVal = unStorageQuota
instance PFromJSVal StorageQuota where
pFromJSVal = StorageQuota
instance ToJSVal StorageQuota where
toJSVal = return . unStorageQuota
instance FromJSVal StorageQuota where
fromJSVal = return . fmap StorageQuota . maybeJSNullOrUndefined
instance IsGObject StorageQuota where
typeGType _ = gTypeStorageQuota
foreign import javascript unsafe "window[\"StorageQuota\"]" gTypeStorageQuota :: GType
newtype StyleMedia = StyleMedia { unStyleMedia :: JSVal }
instance Eq (StyleMedia) where
(StyleMedia a) == (StyleMedia b) = js_eq a b
instance PToJSVal StyleMedia where
pToJSVal = unStyleMedia
instance PFromJSVal StyleMedia where
pFromJSVal = StyleMedia
instance ToJSVal StyleMedia where
toJSVal = return . unStyleMedia
instance FromJSVal StyleMedia where
fromJSVal = return . fmap StyleMedia . maybeJSNullOrUndefined
instance IsGObject StyleMedia where
typeGType _ = gTypeStyleMedia
foreign import javascript unsafe "window[\"StyleMedia\"]" gTypeStyleMedia :: GType
newtype StyleSheet = StyleSheet { unStyleSheet :: JSVal }
instance Eq (StyleSheet) where
(StyleSheet a) == (StyleSheet b) = js_eq a b
instance PToJSVal StyleSheet where
pToJSVal = unStyleSheet
instance PFromJSVal StyleSheet where
pFromJSVal = StyleSheet
instance ToJSVal StyleSheet where
toJSVal = return . unStyleSheet
instance FromJSVal StyleSheet where
fromJSVal = return . fmap StyleSheet . maybeJSNullOrUndefined
class IsGObject o => IsStyleSheet o
toStyleSheet :: IsStyleSheet o => o -> StyleSheet
toStyleSheet = StyleSheet . coerce
instance IsStyleSheet StyleSheet
instance IsGObject StyleSheet where
typeGType _ = gTypeStyleSheet
foreign import javascript unsafe "window[\"StyleSheet\"]" gTypeStyleSheet :: GType
newtype StyleSheetList = StyleSheetList { unStyleSheetList :: JSVal }
instance Eq (StyleSheetList) where
(StyleSheetList a) == (StyleSheetList b) = js_eq a b
instance PToJSVal StyleSheetList where
pToJSVal = unStyleSheetList
instance PFromJSVal StyleSheetList where
pFromJSVal = StyleSheetList
instance ToJSVal StyleSheetList where
toJSVal = return . unStyleSheetList
instance FromJSVal StyleSheetList where
fromJSVal = return . fmap StyleSheetList . maybeJSNullOrUndefined
instance IsGObject StyleSheetList where
typeGType _ = gTypeStyleSheetList
foreign import javascript unsafe "window[\"StyleSheetList\"]" gTypeStyleSheetList :: GType
newtype SubtleCrypto = SubtleCrypto { unSubtleCrypto :: JSVal }
instance Eq (SubtleCrypto) where
(SubtleCrypto a) == (SubtleCrypto b) = js_eq a b
instance PToJSVal SubtleCrypto where
pToJSVal = unSubtleCrypto
instance PFromJSVal SubtleCrypto where
pFromJSVal = SubtleCrypto
instance ToJSVal SubtleCrypto where
toJSVal = return . unSubtleCrypto
instance FromJSVal SubtleCrypto where
fromJSVal = return . fmap SubtleCrypto . maybeJSNullOrUndefined
instance IsGObject SubtleCrypto where
typeGType _ = gTypeSubtleCrypto
foreign import javascript unsafe "window[\"WebKitSubtleCrypto\"]" gTypeSubtleCrypto :: GType
newtype Text = Text { unText :: JSVal }
instance Eq (Text) where
(Text a) == (Text b) = js_eq a b
instance PToJSVal Text where
pToJSVal = unText
instance PFromJSVal Text where
pFromJSVal = Text
instance ToJSVal Text where
toJSVal = return . unText
instance FromJSVal Text where
fromJSVal = return . fmap Text . maybeJSNullOrUndefined
class IsCharacterData o => IsText o
toText :: IsText o => o -> Text
toText = Text . coerce
instance IsText Text
instance IsCharacterData Text
instance IsNode Text
instance IsEventTarget Text
instance IsGObject Text where
typeGType _ = gTypeText
foreign import javascript unsafe "window[\"Text\"]" gTypeText :: GType
newtype TextEvent = TextEvent { unTextEvent :: JSVal }
instance Eq (TextEvent) where
(TextEvent a) == (TextEvent b) = js_eq a b
instance PToJSVal TextEvent where
pToJSVal = unTextEvent
instance PFromJSVal TextEvent where
pFromJSVal = TextEvent
instance ToJSVal TextEvent where
toJSVal = return . unTextEvent
instance FromJSVal TextEvent where
fromJSVal = return . fmap TextEvent . maybeJSNullOrUndefined
instance IsUIEvent TextEvent
instance IsEvent TextEvent
instance IsGObject TextEvent where
typeGType _ = gTypeTextEvent
foreign import javascript unsafe "window[\"TextEvent\"]" gTypeTextEvent :: GType
newtype TextMetrics = TextMetrics { unTextMetrics :: JSVal }
instance Eq (TextMetrics) where
(TextMetrics a) == (TextMetrics b) = js_eq a b
instance PToJSVal TextMetrics where
pToJSVal = unTextMetrics
instance PFromJSVal TextMetrics where
pFromJSVal = TextMetrics
instance ToJSVal TextMetrics where
toJSVal = return . unTextMetrics
instance FromJSVal TextMetrics where
fromJSVal = return . fmap TextMetrics . maybeJSNullOrUndefined
instance IsGObject TextMetrics where
typeGType _ = gTypeTextMetrics
foreign import javascript unsafe "window[\"TextMetrics\"]" gTypeTextMetrics :: GType
newtype TextTrack = TextTrack { unTextTrack :: JSVal }
instance Eq (TextTrack) where
(TextTrack a) == (TextTrack b) = js_eq a b
instance PToJSVal TextTrack where
pToJSVal = unTextTrack
instance PFromJSVal TextTrack where
pFromJSVal = TextTrack
instance ToJSVal TextTrack where
toJSVal = return . unTextTrack
instance FromJSVal TextTrack where
fromJSVal = return . fmap TextTrack . maybeJSNullOrUndefined
instance IsEventTarget TextTrack
instance IsGObject TextTrack where
typeGType _ = gTypeTextTrack
foreign import javascript unsafe "window[\"TextTrack\"]" gTypeTextTrack :: GType
newtype TextTrackCue = TextTrackCue { unTextTrackCue :: JSVal }
instance Eq (TextTrackCue) where
(TextTrackCue a) == (TextTrackCue b) = js_eq a b
instance PToJSVal TextTrackCue where
pToJSVal = unTextTrackCue
instance PFromJSVal TextTrackCue where
pFromJSVal = TextTrackCue
instance ToJSVal TextTrackCue where
toJSVal = return . unTextTrackCue
instance FromJSVal TextTrackCue where
fromJSVal = return . fmap TextTrackCue . maybeJSNullOrUndefined
class IsEventTarget o => IsTextTrackCue o
toTextTrackCue :: IsTextTrackCue o => o -> TextTrackCue
toTextTrackCue = TextTrackCue . coerce
instance IsTextTrackCue TextTrackCue
instance IsEventTarget TextTrackCue
instance IsGObject TextTrackCue where
typeGType _ = gTypeTextTrackCue
foreign import javascript unsafe "window[\"TextTrackCue\"]" gTypeTextTrackCue :: GType
newtype TextTrackCueList = TextTrackCueList { unTextTrackCueList :: JSVal }
instance Eq (TextTrackCueList) where
(TextTrackCueList a) == (TextTrackCueList b) = js_eq a b
instance PToJSVal TextTrackCueList where
pToJSVal = unTextTrackCueList
instance PFromJSVal TextTrackCueList where
pFromJSVal = TextTrackCueList
instance ToJSVal TextTrackCueList where
toJSVal = return . unTextTrackCueList
instance FromJSVal TextTrackCueList where
fromJSVal = return . fmap TextTrackCueList . maybeJSNullOrUndefined
instance IsGObject TextTrackCueList where
typeGType _ = gTypeTextTrackCueList
foreign import javascript unsafe "window[\"TextTrackCueList\"]" gTypeTextTrackCueList :: GType
newtype TextTrackList = TextTrackList { unTextTrackList :: JSVal }
instance Eq (TextTrackList) where
(TextTrackList a) == (TextTrackList b) = js_eq a b
instance PToJSVal TextTrackList where
pToJSVal = unTextTrackList
instance PFromJSVal TextTrackList where
pFromJSVal = TextTrackList
instance ToJSVal TextTrackList where
toJSVal = return . unTextTrackList
instance FromJSVal TextTrackList where
fromJSVal = return . fmap TextTrackList . maybeJSNullOrUndefined
instance IsEventTarget TextTrackList
instance IsGObject TextTrackList where
typeGType _ = gTypeTextTrackList
foreign import javascript unsafe "window[\"TextTrackList\"]" gTypeTextTrackList :: GType
newtype TimeRanges = TimeRanges { unTimeRanges :: JSVal }
instance Eq (TimeRanges) where
(TimeRanges a) == (TimeRanges b) = js_eq a b
instance PToJSVal TimeRanges where
pToJSVal = unTimeRanges
instance PFromJSVal TimeRanges where
pFromJSVal = TimeRanges
instance ToJSVal TimeRanges where
toJSVal = return . unTimeRanges
instance FromJSVal TimeRanges where
fromJSVal = return . fmap TimeRanges . maybeJSNullOrUndefined
instance IsGObject TimeRanges where
typeGType _ = gTypeTimeRanges
foreign import javascript unsafe "window[\"TimeRanges\"]" gTypeTimeRanges :: GType
newtype Touch = Touch { unTouch :: JSVal }
instance Eq (Touch) where
(Touch a) == (Touch b) = js_eq a b
instance PToJSVal Touch where
pToJSVal = unTouch
instance PFromJSVal Touch where
pFromJSVal = Touch
instance ToJSVal Touch where
toJSVal = return . unTouch
instance FromJSVal Touch where
fromJSVal = return . fmap Touch . maybeJSNullOrUndefined
instance IsGObject Touch where
typeGType _ = gTypeTouch
foreign import javascript unsafe "window[\"Touch\"]" gTypeTouch :: GType
newtype TouchEvent = TouchEvent { unTouchEvent :: JSVal }
instance Eq (TouchEvent) where
(TouchEvent a) == (TouchEvent b) = js_eq a b
instance PToJSVal TouchEvent where
pToJSVal = unTouchEvent
instance PFromJSVal TouchEvent where
pFromJSVal = TouchEvent
instance ToJSVal TouchEvent where
toJSVal = return . unTouchEvent
instance FromJSVal TouchEvent where
fromJSVal = return . fmap TouchEvent . maybeJSNullOrUndefined
instance IsUIEvent TouchEvent
instance IsEvent TouchEvent
instance IsGObject TouchEvent where
typeGType _ = gTypeTouchEvent
foreign import javascript unsafe "window[\"TouchEvent\"]" gTypeTouchEvent :: GType
newtype TouchList = TouchList { unTouchList :: JSVal }
instance Eq (TouchList) where
(TouchList a) == (TouchList b) = js_eq a b
instance PToJSVal TouchList where
pToJSVal = unTouchList
instance PFromJSVal TouchList where
pFromJSVal = TouchList
instance ToJSVal TouchList where
toJSVal = return . unTouchList
instance FromJSVal TouchList where
fromJSVal = return . fmap TouchList . maybeJSNullOrUndefined
instance IsGObject TouchList where
typeGType _ = gTypeTouchList
foreign import javascript unsafe "window[\"TouchList\"]" gTypeTouchList :: GType
newtype TrackEvent = TrackEvent { unTrackEvent :: JSVal }
instance Eq (TrackEvent) where
(TrackEvent a) == (TrackEvent b) = js_eq a b
instance PToJSVal TrackEvent where
pToJSVal = unTrackEvent
instance PFromJSVal TrackEvent where
pFromJSVal = TrackEvent
instance ToJSVal TrackEvent where
toJSVal = return . unTrackEvent
instance FromJSVal TrackEvent where
fromJSVal = return . fmap TrackEvent . maybeJSNullOrUndefined
instance IsEvent TrackEvent
instance IsGObject TrackEvent where
typeGType _ = gTypeTrackEvent
foreign import javascript unsafe "window[\"TrackEvent\"]" gTypeTrackEvent :: GType
newtype TransitionEvent = TransitionEvent { unTransitionEvent :: JSVal }
instance Eq (TransitionEvent) where
(TransitionEvent a) == (TransitionEvent b) = js_eq a b
instance PToJSVal TransitionEvent where
pToJSVal = unTransitionEvent
instance PFromJSVal TransitionEvent where
pFromJSVal = TransitionEvent
instance ToJSVal TransitionEvent where
toJSVal = return . unTransitionEvent
instance FromJSVal TransitionEvent where
fromJSVal = return . fmap TransitionEvent . maybeJSNullOrUndefined
instance IsEvent TransitionEvent
instance IsGObject TransitionEvent where
typeGType _ = gTypeTransitionEvent
foreign import javascript unsafe "window[\"TransitionEvent\"]" gTypeTransitionEvent :: GType
newtype TreeWalker = TreeWalker { unTreeWalker :: JSVal }
instance Eq (TreeWalker) where
(TreeWalker a) == (TreeWalker b) = js_eq a b
instance PToJSVal TreeWalker where
pToJSVal = unTreeWalker
instance PFromJSVal TreeWalker where
pFromJSVal = TreeWalker
instance ToJSVal TreeWalker where
toJSVal = return . unTreeWalker
instance FromJSVal TreeWalker where
fromJSVal = return . fmap TreeWalker . maybeJSNullOrUndefined
instance IsGObject TreeWalker where
typeGType _ = gTypeTreeWalker
foreign import javascript unsafe "window[\"TreeWalker\"]" gTypeTreeWalker :: GType
newtype TypeConversions = TypeConversions { unTypeConversions :: JSVal }
instance Eq (TypeConversions) where
(TypeConversions a) == (TypeConversions b) = js_eq a b
instance PToJSVal TypeConversions where
pToJSVal = unTypeConversions
instance PFromJSVal TypeConversions where
pFromJSVal = TypeConversions
instance ToJSVal TypeConversions where
toJSVal = return . unTypeConversions
instance FromJSVal TypeConversions where
fromJSVal = return . fmap TypeConversions . maybeJSNullOrUndefined
instance IsGObject TypeConversions where
typeGType _ = gTypeTypeConversions
foreign import javascript unsafe "window[\"TypeConversions\"]" gTypeTypeConversions :: GType
newtype UIEvent = UIEvent { unUIEvent :: JSVal }
instance Eq (UIEvent) where
(UIEvent a) == (UIEvent b) = js_eq a b
instance PToJSVal UIEvent where
pToJSVal = unUIEvent
instance PFromJSVal UIEvent where
pFromJSVal = UIEvent
instance ToJSVal UIEvent where
toJSVal = return . unUIEvent
instance FromJSVal UIEvent where
fromJSVal = return . fmap UIEvent . maybeJSNullOrUndefined
class IsEvent o => IsUIEvent o
toUIEvent :: IsUIEvent o => o -> UIEvent
toUIEvent = UIEvent . coerce
instance IsUIEvent UIEvent
instance IsEvent UIEvent
instance IsGObject UIEvent where
typeGType _ = gTypeUIEvent
foreign import javascript unsafe "window[\"UIEvent\"]" gTypeUIEvent :: GType
newtype UIRequestEvent = UIRequestEvent { unUIRequestEvent :: JSVal }
instance Eq (UIRequestEvent) where
(UIRequestEvent a) == (UIRequestEvent b) = js_eq a b
instance PToJSVal UIRequestEvent where
pToJSVal = unUIRequestEvent
instance PFromJSVal UIRequestEvent where
pFromJSVal = UIRequestEvent
instance ToJSVal UIRequestEvent where
toJSVal = return . unUIRequestEvent
instance FromJSVal UIRequestEvent where
fromJSVal = return . fmap UIRequestEvent . maybeJSNullOrUndefined
instance IsUIEvent UIRequestEvent
instance IsEvent UIRequestEvent
instance IsGObject UIRequestEvent where
typeGType _ = gTypeUIRequestEvent
foreign import javascript unsafe "window[\"UIRequestEvent\"]" gTypeUIRequestEvent :: GType
newtype URL = URL { unURL :: JSVal }
instance Eq (URL) where
(URL a) == (URL b) = js_eq a b
instance PToJSVal URL where
pToJSVal = unURL
instance PFromJSVal URL where
pFromJSVal = URL
instance ToJSVal URL where
toJSVal = return . unURL
instance FromJSVal URL where
fromJSVal = return . fmap URL . maybeJSNullOrUndefined
instance IsGObject URL where
typeGType _ = gTypeURL
foreign import javascript unsafe "window[\"URL\"]" gTypeURL :: GType
newtype URLUtils = URLUtils { unURLUtils :: JSVal }
instance Eq (URLUtils) where
(URLUtils a) == (URLUtils b) = js_eq a b
instance PToJSVal URLUtils where
pToJSVal = unURLUtils
instance PFromJSVal URLUtils where
pFromJSVal = URLUtils
instance ToJSVal URLUtils where
toJSVal = return . unURLUtils
instance FromJSVal URLUtils where
fromJSVal = return . fmap URLUtils . maybeJSNullOrUndefined
instance IsGObject URLUtils where
typeGType _ = gTypeURLUtils
foreign import javascript unsafe "window[\"URLUtils\"]" gTypeURLUtils :: GType
newtype UserMessageHandler = UserMessageHandler { unUserMessageHandler :: JSVal }
instance Eq (UserMessageHandler) where
(UserMessageHandler a) == (UserMessageHandler b) = js_eq a b
instance PToJSVal UserMessageHandler where
pToJSVal = unUserMessageHandler
instance PFromJSVal UserMessageHandler where
pFromJSVal = UserMessageHandler
instance ToJSVal UserMessageHandler where
toJSVal = return . unUserMessageHandler
instance FromJSVal UserMessageHandler where
fromJSVal = return . fmap UserMessageHandler . maybeJSNullOrUndefined
instance IsGObject UserMessageHandler where
typeGType _ = gTypeUserMessageHandler
foreign import javascript unsafe "window[\"UserMessageHandler\"]" gTypeUserMessageHandler :: GType
newtype UserMessageHandlersNamespace = UserMessageHandlersNamespace { unUserMessageHandlersNamespace :: JSVal }
instance Eq (UserMessageHandlersNamespace) where
(UserMessageHandlersNamespace a) == (UserMessageHandlersNamespace b) = js_eq a b
instance PToJSVal UserMessageHandlersNamespace where
pToJSVal = unUserMessageHandlersNamespace
instance PFromJSVal UserMessageHandlersNamespace where
pFromJSVal = UserMessageHandlersNamespace
instance ToJSVal UserMessageHandlersNamespace where
toJSVal = return . unUserMessageHandlersNamespace
instance FromJSVal UserMessageHandlersNamespace where
fromJSVal = return . fmap UserMessageHandlersNamespace . maybeJSNullOrUndefined
instance IsGObject UserMessageHandlersNamespace where
typeGType _ = gTypeUserMessageHandlersNamespace
foreign import javascript unsafe "window[\"UserMessageHandlersNamespace\"]" gTypeUserMessageHandlersNamespace :: GType
newtype VTTCue = VTTCue { unVTTCue :: JSVal }
instance Eq (VTTCue) where
(VTTCue a) == (VTTCue b) = js_eq a b
instance PToJSVal VTTCue where
pToJSVal = unVTTCue
instance PFromJSVal VTTCue where
pFromJSVal = VTTCue
instance ToJSVal VTTCue where
toJSVal = return . unVTTCue
instance FromJSVal VTTCue where
fromJSVal = return . fmap VTTCue . maybeJSNullOrUndefined
instance IsTextTrackCue VTTCue
instance IsEventTarget VTTCue
instance IsGObject VTTCue where
typeGType _ = gTypeVTTCue
foreign import javascript unsafe "window[\"VTTCue\"]" gTypeVTTCue :: GType
newtype VTTRegion = VTTRegion { unVTTRegion :: JSVal }
instance Eq (VTTRegion) where
(VTTRegion a) == (VTTRegion b) = js_eq a b
instance PToJSVal VTTRegion where
pToJSVal = unVTTRegion
instance PFromJSVal VTTRegion where
pFromJSVal = VTTRegion
instance ToJSVal VTTRegion where
toJSVal = return . unVTTRegion
instance FromJSVal VTTRegion where
fromJSVal = return . fmap VTTRegion . maybeJSNullOrUndefined
instance IsGObject VTTRegion where
typeGType _ = gTypeVTTRegion
foreign import javascript unsafe "window[\"VTTRegion\"]" gTypeVTTRegion :: GType
newtype VTTRegionList = VTTRegionList { unVTTRegionList :: JSVal }
instance Eq (VTTRegionList) where
(VTTRegionList a) == (VTTRegionList b) = js_eq a b
instance PToJSVal VTTRegionList where
pToJSVal = unVTTRegionList
instance PFromJSVal VTTRegionList where
pFromJSVal = VTTRegionList
instance ToJSVal VTTRegionList where
toJSVal = return . unVTTRegionList
instance FromJSVal VTTRegionList where
fromJSVal = return . fmap VTTRegionList . maybeJSNullOrUndefined
instance IsGObject VTTRegionList where
typeGType _ = gTypeVTTRegionList
foreign import javascript unsafe "window[\"VTTRegionList\"]" gTypeVTTRegionList :: GType
newtype ValidityState = ValidityState { unValidityState :: JSVal }
instance Eq (ValidityState) where
(ValidityState a) == (ValidityState b) = js_eq a b
instance PToJSVal ValidityState where
pToJSVal = unValidityState
instance PFromJSVal ValidityState where
pFromJSVal = ValidityState
instance ToJSVal ValidityState where
toJSVal = return . unValidityState
instance FromJSVal ValidityState where
fromJSVal = return . fmap ValidityState . maybeJSNullOrUndefined
instance IsGObject ValidityState where
typeGType _ = gTypeValidityState
foreign import javascript unsafe "window[\"ValidityState\"]" gTypeValidityState :: GType
newtype VideoPlaybackQuality = VideoPlaybackQuality { unVideoPlaybackQuality :: JSVal }
instance Eq (VideoPlaybackQuality) where
(VideoPlaybackQuality a) == (VideoPlaybackQuality b) = js_eq a b
instance PToJSVal VideoPlaybackQuality where
pToJSVal = unVideoPlaybackQuality
instance PFromJSVal VideoPlaybackQuality where
pFromJSVal = VideoPlaybackQuality
instance ToJSVal VideoPlaybackQuality where
toJSVal = return . unVideoPlaybackQuality
instance FromJSVal VideoPlaybackQuality where
fromJSVal = return . fmap VideoPlaybackQuality . maybeJSNullOrUndefined
instance IsGObject VideoPlaybackQuality where
typeGType _ = gTypeVideoPlaybackQuality
foreign import javascript unsafe "window[\"VideoPlaybackQuality\"]" gTypeVideoPlaybackQuality :: GType
newtype VideoStreamTrack = VideoStreamTrack { unVideoStreamTrack :: JSVal }
instance Eq (VideoStreamTrack) where
(VideoStreamTrack a) == (VideoStreamTrack b) = js_eq a b
instance PToJSVal VideoStreamTrack where
pToJSVal = unVideoStreamTrack
instance PFromJSVal VideoStreamTrack where
pFromJSVal = VideoStreamTrack
instance ToJSVal VideoStreamTrack where
toJSVal = return . unVideoStreamTrack
instance FromJSVal VideoStreamTrack where
fromJSVal = return . fmap VideoStreamTrack . maybeJSNullOrUndefined
instance IsMediaStreamTrack VideoStreamTrack
instance IsEventTarget VideoStreamTrack
instance IsGObject VideoStreamTrack where
typeGType _ = gTypeVideoStreamTrack
foreign import javascript unsafe "window[\"VideoStreamTrack\"]" gTypeVideoStreamTrack :: GType
newtype VideoTrack = VideoTrack { unVideoTrack :: JSVal }
instance Eq (VideoTrack) where
(VideoTrack a) == (VideoTrack b) = js_eq a b
instance PToJSVal VideoTrack where
pToJSVal = unVideoTrack
instance PFromJSVal VideoTrack where
pFromJSVal = VideoTrack
instance ToJSVal VideoTrack where
toJSVal = return . unVideoTrack
instance FromJSVal VideoTrack where
fromJSVal = return . fmap VideoTrack . maybeJSNullOrUndefined
instance IsGObject VideoTrack where
typeGType _ = gTypeVideoTrack
foreign import javascript unsafe "window[\"VideoTrack\"]" gTypeVideoTrack :: GType
newtype VideoTrackList = VideoTrackList { unVideoTrackList :: JSVal }
instance Eq (VideoTrackList) where
(VideoTrackList a) == (VideoTrackList b) = js_eq a b
instance PToJSVal VideoTrackList where
pToJSVal = unVideoTrackList
instance PFromJSVal VideoTrackList where
pFromJSVal = VideoTrackList
instance ToJSVal VideoTrackList where
toJSVal = return . unVideoTrackList
instance FromJSVal VideoTrackList where
fromJSVal = return . fmap VideoTrackList . maybeJSNullOrUndefined
instance IsEventTarget VideoTrackList
instance IsGObject VideoTrackList where
typeGType _ = gTypeVideoTrackList
foreign import javascript unsafe "window[\"VideoTrackList\"]" gTypeVideoTrackList :: GType
newtype WaveShaperNode = WaveShaperNode { unWaveShaperNode :: JSVal }
instance Eq (WaveShaperNode) where
(WaveShaperNode a) == (WaveShaperNode b) = js_eq a b
instance PToJSVal WaveShaperNode where
pToJSVal = unWaveShaperNode
instance PFromJSVal WaveShaperNode where
pFromJSVal = WaveShaperNode
instance ToJSVal WaveShaperNode where
toJSVal = return . unWaveShaperNode
instance FromJSVal WaveShaperNode where
fromJSVal = return . fmap WaveShaperNode . maybeJSNullOrUndefined
instance IsAudioNode WaveShaperNode
instance IsEventTarget WaveShaperNode
instance IsGObject WaveShaperNode where
typeGType _ = gTypeWaveShaperNode
foreign import javascript unsafe "window[\"WaveShaperNode\"]" gTypeWaveShaperNode :: GType
newtype WebGL2RenderingContext = WebGL2RenderingContext { unWebGL2RenderingContext :: JSVal }
instance Eq (WebGL2RenderingContext) where
(WebGL2RenderingContext a) == (WebGL2RenderingContext b) = js_eq a b
instance PToJSVal WebGL2RenderingContext where
pToJSVal = unWebGL2RenderingContext
instance PFromJSVal WebGL2RenderingContext where
pFromJSVal = WebGL2RenderingContext
instance ToJSVal WebGL2RenderingContext where
toJSVal = return . unWebGL2RenderingContext
instance FromJSVal WebGL2RenderingContext where
fromJSVal = return . fmap WebGL2RenderingContext . maybeJSNullOrUndefined
instance IsWebGLRenderingContextBase WebGL2RenderingContext
instance IsCanvasRenderingContext WebGL2RenderingContext
instance IsGObject WebGL2RenderingContext where
typeGType _ = gTypeWebGL2RenderingContext
foreign import javascript unsafe "window[\"WebGL2RenderingContext\"]" gTypeWebGL2RenderingContext :: GType
newtype WebGLActiveInfo = WebGLActiveInfo { unWebGLActiveInfo :: JSVal }
instance Eq (WebGLActiveInfo) where
(WebGLActiveInfo a) == (WebGLActiveInfo b) = js_eq a b
instance PToJSVal WebGLActiveInfo where
pToJSVal = unWebGLActiveInfo
instance PFromJSVal WebGLActiveInfo where
pFromJSVal = WebGLActiveInfo
instance ToJSVal WebGLActiveInfo where
toJSVal = return . unWebGLActiveInfo
instance FromJSVal WebGLActiveInfo where
fromJSVal = return . fmap WebGLActiveInfo . maybeJSNullOrUndefined
instance IsGObject WebGLActiveInfo where
typeGType _ = gTypeWebGLActiveInfo
foreign import javascript unsafe "window[\"WebGLActiveInfo\"]" gTypeWebGLActiveInfo :: GType
newtype WebGLBuffer = WebGLBuffer { unWebGLBuffer :: JSVal }
instance Eq (WebGLBuffer) where
(WebGLBuffer a) == (WebGLBuffer b) = js_eq a b
instance PToJSVal WebGLBuffer where
pToJSVal = unWebGLBuffer
instance PFromJSVal WebGLBuffer where
pFromJSVal = WebGLBuffer
instance ToJSVal WebGLBuffer where
toJSVal = return . unWebGLBuffer
instance FromJSVal WebGLBuffer where
fromJSVal = return . fmap WebGLBuffer . maybeJSNullOrUndefined
instance IsGObject WebGLBuffer where
typeGType _ = gTypeWebGLBuffer
foreign import javascript unsafe "window[\"WebGLBuffer\"]" gTypeWebGLBuffer :: GType
newtype WebGLCompressedTextureATC = WebGLCompressedTextureATC { unWebGLCompressedTextureATC :: JSVal }
instance Eq (WebGLCompressedTextureATC) where
(WebGLCompressedTextureATC a) == (WebGLCompressedTextureATC b) = js_eq a b
instance PToJSVal WebGLCompressedTextureATC where
pToJSVal = unWebGLCompressedTextureATC
instance PFromJSVal WebGLCompressedTextureATC where
pFromJSVal = WebGLCompressedTextureATC
instance ToJSVal WebGLCompressedTextureATC where
toJSVal = return . unWebGLCompressedTextureATC
instance FromJSVal WebGLCompressedTextureATC where
fromJSVal = return . fmap WebGLCompressedTextureATC . maybeJSNullOrUndefined
instance IsGObject WebGLCompressedTextureATC where
typeGType _ = gTypeWebGLCompressedTextureATC
foreign import javascript unsafe "window[\"WebGLCompressedTextureATC\"]" gTypeWebGLCompressedTextureATC :: GType
newtype WebGLCompressedTexturePVRTC = WebGLCompressedTexturePVRTC { unWebGLCompressedTexturePVRTC :: JSVal }
instance Eq (WebGLCompressedTexturePVRTC) where
(WebGLCompressedTexturePVRTC a) == (WebGLCompressedTexturePVRTC b) = js_eq a b
instance PToJSVal WebGLCompressedTexturePVRTC where
pToJSVal = unWebGLCompressedTexturePVRTC
instance PFromJSVal WebGLCompressedTexturePVRTC where
pFromJSVal = WebGLCompressedTexturePVRTC
instance ToJSVal WebGLCompressedTexturePVRTC where
toJSVal = return . unWebGLCompressedTexturePVRTC
instance FromJSVal WebGLCompressedTexturePVRTC where
fromJSVal = return . fmap WebGLCompressedTexturePVRTC . maybeJSNullOrUndefined
instance IsGObject WebGLCompressedTexturePVRTC where
typeGType _ = gTypeWebGLCompressedTexturePVRTC
foreign import javascript unsafe "window[\"WebGLCompressedTexturePVRTC\"]" gTypeWebGLCompressedTexturePVRTC :: GType
newtype WebGLCompressedTextureS3TC = WebGLCompressedTextureS3TC { unWebGLCompressedTextureS3TC :: JSVal }
instance Eq (WebGLCompressedTextureS3TC) where
(WebGLCompressedTextureS3TC a) == (WebGLCompressedTextureS3TC b) = js_eq a b
instance PToJSVal WebGLCompressedTextureS3TC where
pToJSVal = unWebGLCompressedTextureS3TC
instance PFromJSVal WebGLCompressedTextureS3TC where
pFromJSVal = WebGLCompressedTextureS3TC
instance ToJSVal WebGLCompressedTextureS3TC where
toJSVal = return . unWebGLCompressedTextureS3TC
instance FromJSVal WebGLCompressedTextureS3TC where
fromJSVal = return . fmap WebGLCompressedTextureS3TC . maybeJSNullOrUndefined
instance IsGObject WebGLCompressedTextureS3TC where
typeGType _ = gTypeWebGLCompressedTextureS3TC
foreign import javascript unsafe "window[\"WebGLCompressedTextureS3TC\"]" gTypeWebGLCompressedTextureS3TC :: GType
newtype WebGLContextAttributes = WebGLContextAttributes { unWebGLContextAttributes :: JSVal }
instance Eq (WebGLContextAttributes) where
(WebGLContextAttributes a) == (WebGLContextAttributes b) = js_eq a b
instance PToJSVal WebGLContextAttributes where
pToJSVal = unWebGLContextAttributes
instance PFromJSVal WebGLContextAttributes where
pFromJSVal = WebGLContextAttributes
instance ToJSVal WebGLContextAttributes where
toJSVal = return . unWebGLContextAttributes
instance FromJSVal WebGLContextAttributes where
fromJSVal = return . fmap WebGLContextAttributes . maybeJSNullOrUndefined
instance IsGObject WebGLContextAttributes where
typeGType _ = gTypeWebGLContextAttributes
foreign import javascript unsafe "window[\"WebGLContextAttributes\"]" gTypeWebGLContextAttributes :: GType
newtype WebGLContextEvent = WebGLContextEvent { unWebGLContextEvent :: JSVal }
instance Eq (WebGLContextEvent) where
(WebGLContextEvent a) == (WebGLContextEvent b) = js_eq a b
instance PToJSVal WebGLContextEvent where
pToJSVal = unWebGLContextEvent
instance PFromJSVal WebGLContextEvent where
pFromJSVal = WebGLContextEvent
instance ToJSVal WebGLContextEvent where
toJSVal = return . unWebGLContextEvent
instance FromJSVal WebGLContextEvent where
fromJSVal = return . fmap WebGLContextEvent . maybeJSNullOrUndefined
instance IsEvent WebGLContextEvent
instance IsGObject WebGLContextEvent where
typeGType _ = gTypeWebGLContextEvent
foreign import javascript unsafe "window[\"WebGLContextEvent\"]" gTypeWebGLContextEvent :: GType
newtype WebGLDebugRendererInfo = WebGLDebugRendererInfo { unWebGLDebugRendererInfo :: JSVal }
instance Eq (WebGLDebugRendererInfo) where
(WebGLDebugRendererInfo a) == (WebGLDebugRendererInfo b) = js_eq a b
instance PToJSVal WebGLDebugRendererInfo where
pToJSVal = unWebGLDebugRendererInfo
instance PFromJSVal WebGLDebugRendererInfo where
pFromJSVal = WebGLDebugRendererInfo
instance ToJSVal WebGLDebugRendererInfo where
toJSVal = return . unWebGLDebugRendererInfo
instance FromJSVal WebGLDebugRendererInfo where
fromJSVal = return . fmap WebGLDebugRendererInfo . maybeJSNullOrUndefined
instance IsGObject WebGLDebugRendererInfo where
typeGType _ = gTypeWebGLDebugRendererInfo
foreign import javascript unsafe "window[\"WebGLDebugRendererInfo\"]" gTypeWebGLDebugRendererInfo :: GType
newtype WebGLDebugShaders = WebGLDebugShaders { unWebGLDebugShaders :: JSVal }
instance Eq (WebGLDebugShaders) where
(WebGLDebugShaders a) == (WebGLDebugShaders b) = js_eq a b
instance PToJSVal WebGLDebugShaders where
pToJSVal = unWebGLDebugShaders
instance PFromJSVal WebGLDebugShaders where
pFromJSVal = WebGLDebugShaders
instance ToJSVal WebGLDebugShaders where
toJSVal = return . unWebGLDebugShaders
instance FromJSVal WebGLDebugShaders where
fromJSVal = return . fmap WebGLDebugShaders . maybeJSNullOrUndefined
instance IsGObject WebGLDebugShaders where
typeGType _ = gTypeWebGLDebugShaders
foreign import javascript unsafe "window[\"WebGLDebugShaders\"]" gTypeWebGLDebugShaders :: GType
newtype WebGLDepthTexture = WebGLDepthTexture { unWebGLDepthTexture :: JSVal }
instance Eq (WebGLDepthTexture) where
(WebGLDepthTexture a) == (WebGLDepthTexture b) = js_eq a b
instance PToJSVal WebGLDepthTexture where
pToJSVal = unWebGLDepthTexture
instance PFromJSVal WebGLDepthTexture where
pFromJSVal = WebGLDepthTexture
instance ToJSVal WebGLDepthTexture where
toJSVal = return . unWebGLDepthTexture
instance FromJSVal WebGLDepthTexture where
fromJSVal = return . fmap WebGLDepthTexture . maybeJSNullOrUndefined
instance IsGObject WebGLDepthTexture where
typeGType _ = gTypeWebGLDepthTexture
foreign import javascript unsafe "window[\"WebGLDepthTexture\"]" gTypeWebGLDepthTexture :: GType
newtype WebGLDrawBuffers = WebGLDrawBuffers { unWebGLDrawBuffers :: JSVal }
instance Eq (WebGLDrawBuffers) where
(WebGLDrawBuffers a) == (WebGLDrawBuffers b) = js_eq a b
instance PToJSVal WebGLDrawBuffers where
pToJSVal = unWebGLDrawBuffers
instance PFromJSVal WebGLDrawBuffers where
pFromJSVal = WebGLDrawBuffers
instance ToJSVal WebGLDrawBuffers where
toJSVal = return . unWebGLDrawBuffers
instance FromJSVal WebGLDrawBuffers where
fromJSVal = return . fmap WebGLDrawBuffers . maybeJSNullOrUndefined
instance IsGObject WebGLDrawBuffers where
typeGType _ = gTypeWebGLDrawBuffers
foreign import javascript unsafe "window[\"WebGLDrawBuffers\"]" gTypeWebGLDrawBuffers :: GType
newtype WebGLFramebuffer = WebGLFramebuffer { unWebGLFramebuffer :: JSVal }
instance Eq (WebGLFramebuffer) where
(WebGLFramebuffer a) == (WebGLFramebuffer b) = js_eq a b
instance PToJSVal WebGLFramebuffer where
pToJSVal = unWebGLFramebuffer
instance PFromJSVal WebGLFramebuffer where
pFromJSVal = WebGLFramebuffer
instance ToJSVal WebGLFramebuffer where
toJSVal = return . unWebGLFramebuffer
instance FromJSVal WebGLFramebuffer where
fromJSVal = return . fmap WebGLFramebuffer . maybeJSNullOrUndefined
instance IsGObject WebGLFramebuffer where
typeGType _ = gTypeWebGLFramebuffer
foreign import javascript unsafe "window[\"WebGLFramebuffer\"]" gTypeWebGLFramebuffer :: GType
newtype WebGLLoseContext = WebGLLoseContext { unWebGLLoseContext :: JSVal }
instance Eq (WebGLLoseContext) where
(WebGLLoseContext a) == (WebGLLoseContext b) = js_eq a b
instance PToJSVal WebGLLoseContext where
pToJSVal = unWebGLLoseContext
instance PFromJSVal WebGLLoseContext where
pFromJSVal = WebGLLoseContext
instance ToJSVal WebGLLoseContext where
toJSVal = return . unWebGLLoseContext
instance FromJSVal WebGLLoseContext where
fromJSVal = return . fmap WebGLLoseContext . maybeJSNullOrUndefined
instance IsGObject WebGLLoseContext where
typeGType _ = gTypeWebGLLoseContext
foreign import javascript unsafe "window[\"WebGLLoseContext\"]" gTypeWebGLLoseContext :: GType
newtype WebGLProgram = WebGLProgram { unWebGLProgram :: JSVal }
instance Eq (WebGLProgram) where
(WebGLProgram a) == (WebGLProgram b) = js_eq a b
instance PToJSVal WebGLProgram where
pToJSVal = unWebGLProgram
instance PFromJSVal WebGLProgram where
pFromJSVal = WebGLProgram
instance ToJSVal WebGLProgram where
toJSVal = return . unWebGLProgram
instance FromJSVal WebGLProgram where
fromJSVal = return . fmap WebGLProgram . maybeJSNullOrUndefined
instance IsGObject WebGLProgram where
typeGType _ = gTypeWebGLProgram
foreign import javascript unsafe "window[\"WebGLProgram\"]" gTypeWebGLProgram :: GType
newtype WebGLQuery = WebGLQuery { unWebGLQuery :: JSVal }
instance Eq (WebGLQuery) where
(WebGLQuery a) == (WebGLQuery b) = js_eq a b
instance PToJSVal WebGLQuery where
pToJSVal = unWebGLQuery
instance PFromJSVal WebGLQuery where
pFromJSVal = WebGLQuery
instance ToJSVal WebGLQuery where
toJSVal = return . unWebGLQuery
instance FromJSVal WebGLQuery where
fromJSVal = return . fmap WebGLQuery . maybeJSNullOrUndefined
instance IsGObject WebGLQuery where
typeGType _ = gTypeWebGLQuery
foreign import javascript unsafe "window[\"WebGLQuery\"]" gTypeWebGLQuery :: GType
newtype WebGLRenderbuffer = WebGLRenderbuffer { unWebGLRenderbuffer :: JSVal }
instance Eq (WebGLRenderbuffer) where
(WebGLRenderbuffer a) == (WebGLRenderbuffer b) = js_eq a b
instance PToJSVal WebGLRenderbuffer where
pToJSVal = unWebGLRenderbuffer
instance PFromJSVal WebGLRenderbuffer where
pFromJSVal = WebGLRenderbuffer
instance ToJSVal WebGLRenderbuffer where
toJSVal = return . unWebGLRenderbuffer
instance FromJSVal WebGLRenderbuffer where
fromJSVal = return . fmap WebGLRenderbuffer . maybeJSNullOrUndefined
instance IsGObject WebGLRenderbuffer where
typeGType _ = gTypeWebGLRenderbuffer
foreign import javascript unsafe "window[\"WebGLRenderbuffer\"]" gTypeWebGLRenderbuffer :: GType
newtype WebGLRenderingContext = WebGLRenderingContext { unWebGLRenderingContext :: JSVal }
instance Eq (WebGLRenderingContext) where
(WebGLRenderingContext a) == (WebGLRenderingContext b) = js_eq a b
instance PToJSVal WebGLRenderingContext where
pToJSVal = unWebGLRenderingContext
instance PFromJSVal WebGLRenderingContext where
pFromJSVal = WebGLRenderingContext
instance ToJSVal WebGLRenderingContext where
toJSVal = return . unWebGLRenderingContext
instance FromJSVal WebGLRenderingContext where
fromJSVal = return . fmap WebGLRenderingContext . maybeJSNullOrUndefined
instance IsWebGLRenderingContextBase WebGLRenderingContext
instance IsCanvasRenderingContext WebGLRenderingContext
instance IsGObject WebGLRenderingContext where
typeGType _ = gTypeWebGLRenderingContext
foreign import javascript unsafe "window[\"WebGLRenderingContext\"]" gTypeWebGLRenderingContext :: GType
newtype WebGLRenderingContextBase = WebGLRenderingContextBase { unWebGLRenderingContextBase :: JSVal }
instance Eq (WebGLRenderingContextBase) where
(WebGLRenderingContextBase a) == (WebGLRenderingContextBase b) = js_eq a b
instance PToJSVal WebGLRenderingContextBase where
pToJSVal = unWebGLRenderingContextBase
instance PFromJSVal WebGLRenderingContextBase where
pFromJSVal = WebGLRenderingContextBase
instance ToJSVal WebGLRenderingContextBase where
toJSVal = return . unWebGLRenderingContextBase
instance FromJSVal WebGLRenderingContextBase where
fromJSVal = return . fmap WebGLRenderingContextBase . maybeJSNullOrUndefined
class IsCanvasRenderingContext o => IsWebGLRenderingContextBase o
toWebGLRenderingContextBase :: IsWebGLRenderingContextBase o => o -> WebGLRenderingContextBase
toWebGLRenderingContextBase = WebGLRenderingContextBase . coerce
instance IsWebGLRenderingContextBase WebGLRenderingContextBase
instance IsCanvasRenderingContext WebGLRenderingContextBase
instance IsGObject WebGLRenderingContextBase where
typeGType _ = gTypeWebGLRenderingContextBase
foreign import javascript unsafe "window[\"WebGLRenderingContextBase\"]" gTypeWebGLRenderingContextBase :: GType
newtype WebGLSampler = WebGLSampler { unWebGLSampler :: JSVal }
instance Eq (WebGLSampler) where
(WebGLSampler a) == (WebGLSampler b) = js_eq a b
instance PToJSVal WebGLSampler where
pToJSVal = unWebGLSampler
instance PFromJSVal WebGLSampler where
pFromJSVal = WebGLSampler
instance ToJSVal WebGLSampler where
toJSVal = return . unWebGLSampler
instance FromJSVal WebGLSampler where
fromJSVal = return . fmap WebGLSampler . maybeJSNullOrUndefined
instance IsGObject WebGLSampler where
typeGType _ = gTypeWebGLSampler
foreign import javascript unsafe "window[\"WebGLSampler\"]" gTypeWebGLSampler :: GType
newtype WebGLShader = WebGLShader { unWebGLShader :: JSVal }
instance Eq (WebGLShader) where
(WebGLShader a) == (WebGLShader b) = js_eq a b
instance PToJSVal WebGLShader where
pToJSVal = unWebGLShader
instance PFromJSVal WebGLShader where
pFromJSVal = WebGLShader
instance ToJSVal WebGLShader where
toJSVal = return . unWebGLShader
instance FromJSVal WebGLShader where
fromJSVal = return . fmap WebGLShader . maybeJSNullOrUndefined
instance IsGObject WebGLShader where
typeGType _ = gTypeWebGLShader
foreign import javascript unsafe "window[\"WebGLShader\"]" gTypeWebGLShader :: GType
newtype WebGLShaderPrecisionFormat = WebGLShaderPrecisionFormat { unWebGLShaderPrecisionFormat :: JSVal }
instance Eq (WebGLShaderPrecisionFormat) where
(WebGLShaderPrecisionFormat a) == (WebGLShaderPrecisionFormat b) = js_eq a b
instance PToJSVal WebGLShaderPrecisionFormat where
pToJSVal = unWebGLShaderPrecisionFormat
instance PFromJSVal WebGLShaderPrecisionFormat where
pFromJSVal = WebGLShaderPrecisionFormat
instance ToJSVal WebGLShaderPrecisionFormat where
toJSVal = return . unWebGLShaderPrecisionFormat
instance FromJSVal WebGLShaderPrecisionFormat where
fromJSVal = return . fmap WebGLShaderPrecisionFormat . maybeJSNullOrUndefined
instance IsGObject WebGLShaderPrecisionFormat where
typeGType _ = gTypeWebGLShaderPrecisionFormat
foreign import javascript unsafe "window[\"WebGLShaderPrecisionFormat\"]" gTypeWebGLShaderPrecisionFormat :: GType
newtype WebGLSync = WebGLSync { unWebGLSync :: JSVal }
instance Eq (WebGLSync) where
(WebGLSync a) == (WebGLSync b) = js_eq a b
instance PToJSVal WebGLSync where
pToJSVal = unWebGLSync
instance PFromJSVal WebGLSync where
pFromJSVal = WebGLSync
instance ToJSVal WebGLSync where
toJSVal = return . unWebGLSync
instance FromJSVal WebGLSync where
fromJSVal = return . fmap WebGLSync . maybeJSNullOrUndefined
instance IsGObject WebGLSync where
typeGType _ = gTypeWebGLSync
foreign import javascript unsafe "window[\"WebGLSync\"]" gTypeWebGLSync :: GType
newtype WebGLTexture = WebGLTexture { unWebGLTexture :: JSVal }
instance Eq (WebGLTexture) where
(WebGLTexture a) == (WebGLTexture b) = js_eq a b
instance PToJSVal WebGLTexture where
pToJSVal = unWebGLTexture
instance PFromJSVal WebGLTexture where
pFromJSVal = WebGLTexture
instance ToJSVal WebGLTexture where
toJSVal = return . unWebGLTexture
instance FromJSVal WebGLTexture where
fromJSVal = return . fmap WebGLTexture . maybeJSNullOrUndefined
instance IsGObject WebGLTexture where
typeGType _ = gTypeWebGLTexture
foreign import javascript unsafe "window[\"WebGLTexture\"]" gTypeWebGLTexture :: GType
newtype WebGLTransformFeedback = WebGLTransformFeedback { unWebGLTransformFeedback :: JSVal }
instance Eq (WebGLTransformFeedback) where
(WebGLTransformFeedback a) == (WebGLTransformFeedback b) = js_eq a b
instance PToJSVal WebGLTransformFeedback where
pToJSVal = unWebGLTransformFeedback
instance PFromJSVal WebGLTransformFeedback where
pFromJSVal = WebGLTransformFeedback
instance ToJSVal WebGLTransformFeedback where
toJSVal = return . unWebGLTransformFeedback
instance FromJSVal WebGLTransformFeedback where
fromJSVal = return . fmap WebGLTransformFeedback . maybeJSNullOrUndefined
instance IsGObject WebGLTransformFeedback where
typeGType _ = gTypeWebGLTransformFeedback
foreign import javascript unsafe "window[\"WebGLTransformFeedback\"]" gTypeWebGLTransformFeedback :: GType
newtype WebGLUniformLocation = WebGLUniformLocation { unWebGLUniformLocation :: JSVal }
instance Eq (WebGLUniformLocation) where
(WebGLUniformLocation a) == (WebGLUniformLocation b) = js_eq a b
instance PToJSVal WebGLUniformLocation where
pToJSVal = unWebGLUniformLocation
instance PFromJSVal WebGLUniformLocation where
pFromJSVal = WebGLUniformLocation
instance ToJSVal WebGLUniformLocation where
toJSVal = return . unWebGLUniformLocation
instance FromJSVal WebGLUniformLocation where
fromJSVal = return . fmap WebGLUniformLocation . maybeJSNullOrUndefined
instance IsGObject WebGLUniformLocation where
typeGType _ = gTypeWebGLUniformLocation
foreign import javascript unsafe "window[\"WebGLUniformLocation\"]" gTypeWebGLUniformLocation :: GType
newtype WebGLVertexArrayObject = WebGLVertexArrayObject { unWebGLVertexArrayObject :: JSVal }
instance Eq (WebGLVertexArrayObject) where
(WebGLVertexArrayObject a) == (WebGLVertexArrayObject b) = js_eq a b
instance PToJSVal WebGLVertexArrayObject where
pToJSVal = unWebGLVertexArrayObject
instance PFromJSVal WebGLVertexArrayObject where
pFromJSVal = WebGLVertexArrayObject
instance ToJSVal WebGLVertexArrayObject where
toJSVal = return . unWebGLVertexArrayObject
instance FromJSVal WebGLVertexArrayObject where
fromJSVal = return . fmap WebGLVertexArrayObject . maybeJSNullOrUndefined
instance IsGObject WebGLVertexArrayObject where
typeGType _ = gTypeWebGLVertexArrayObject
foreign import javascript unsafe "window[\"WebGLVertexArrayObject\"]" gTypeWebGLVertexArrayObject :: GType
newtype WebGLVertexArrayObjectOES = WebGLVertexArrayObjectOES { unWebGLVertexArrayObjectOES :: JSVal }
instance Eq (WebGLVertexArrayObjectOES) where
(WebGLVertexArrayObjectOES a) == (WebGLVertexArrayObjectOES b) = js_eq a b
instance PToJSVal WebGLVertexArrayObjectOES where
pToJSVal = unWebGLVertexArrayObjectOES
instance PFromJSVal WebGLVertexArrayObjectOES where
pFromJSVal = WebGLVertexArrayObjectOES
instance ToJSVal WebGLVertexArrayObjectOES where
toJSVal = return . unWebGLVertexArrayObjectOES
instance FromJSVal WebGLVertexArrayObjectOES where
fromJSVal = return . fmap WebGLVertexArrayObjectOES . maybeJSNullOrUndefined
instance IsGObject WebGLVertexArrayObjectOES where
typeGType _ = gTypeWebGLVertexArrayObjectOES
foreign import javascript unsafe "window[\"WebGLVertexArrayObjectOES\"]" gTypeWebGLVertexArrayObjectOES :: GType
newtype WebKitAnimationEvent = WebKitAnimationEvent { unWebKitAnimationEvent :: JSVal }
instance Eq (WebKitAnimationEvent) where
(WebKitAnimationEvent a) == (WebKitAnimationEvent b) = js_eq a b
instance PToJSVal WebKitAnimationEvent where
pToJSVal = unWebKitAnimationEvent
instance PFromJSVal WebKitAnimationEvent where
pFromJSVal = WebKitAnimationEvent
instance ToJSVal WebKitAnimationEvent where
toJSVal = return . unWebKitAnimationEvent
instance FromJSVal WebKitAnimationEvent where
fromJSVal = return . fmap WebKitAnimationEvent . maybeJSNullOrUndefined
instance IsEvent WebKitAnimationEvent
instance IsGObject WebKitAnimationEvent where
typeGType _ = gTypeWebKitAnimationEvent
foreign import javascript unsafe "window[\"WebKitAnimationEvent\"]" gTypeWebKitAnimationEvent :: GType
newtype WebKitCSSFilterValue = WebKitCSSFilterValue { unWebKitCSSFilterValue :: JSVal }
instance Eq (WebKitCSSFilterValue) where
(WebKitCSSFilterValue a) == (WebKitCSSFilterValue b) = js_eq a b
instance PToJSVal WebKitCSSFilterValue where
pToJSVal = unWebKitCSSFilterValue
instance PFromJSVal WebKitCSSFilterValue where
pFromJSVal = WebKitCSSFilterValue
instance ToJSVal WebKitCSSFilterValue where
toJSVal = return . unWebKitCSSFilterValue
instance FromJSVal WebKitCSSFilterValue where
fromJSVal = return . fmap WebKitCSSFilterValue . maybeJSNullOrUndefined
instance IsCSSValueList WebKitCSSFilterValue
instance IsCSSValue WebKitCSSFilterValue
instance IsGObject WebKitCSSFilterValue where
typeGType _ = gTypeWebKitCSSFilterValue
foreign import javascript unsafe "window[\"WebKitCSSFilterValue\"]" gTypeWebKitCSSFilterValue :: GType
newtype WebKitCSSMatrix = WebKitCSSMatrix { unWebKitCSSMatrix :: JSVal }
instance Eq (WebKitCSSMatrix) where
(WebKitCSSMatrix a) == (WebKitCSSMatrix b) = js_eq a b
instance PToJSVal WebKitCSSMatrix where
pToJSVal = unWebKitCSSMatrix
instance PFromJSVal WebKitCSSMatrix where
pFromJSVal = WebKitCSSMatrix
instance ToJSVal WebKitCSSMatrix where
toJSVal = return . unWebKitCSSMatrix
instance FromJSVal WebKitCSSMatrix where
fromJSVal = return . fmap WebKitCSSMatrix . maybeJSNullOrUndefined
instance IsGObject WebKitCSSMatrix where
typeGType _ = gTypeWebKitCSSMatrix
foreign import javascript unsafe "window[\"WebKitCSSMatrix\"]" gTypeWebKitCSSMatrix :: GType
newtype WebKitCSSRegionRule = WebKitCSSRegionRule { unWebKitCSSRegionRule :: JSVal }
instance Eq (WebKitCSSRegionRule) where
(WebKitCSSRegionRule a) == (WebKitCSSRegionRule b) = js_eq a b
instance PToJSVal WebKitCSSRegionRule where
pToJSVal = unWebKitCSSRegionRule
instance PFromJSVal WebKitCSSRegionRule where
pFromJSVal = WebKitCSSRegionRule
instance ToJSVal WebKitCSSRegionRule where
toJSVal = return . unWebKitCSSRegionRule
instance FromJSVal WebKitCSSRegionRule where
fromJSVal = return . fmap WebKitCSSRegionRule . maybeJSNullOrUndefined
instance IsCSSRule WebKitCSSRegionRule
instance IsGObject WebKitCSSRegionRule where
typeGType _ = gTypeWebKitCSSRegionRule
foreign import javascript unsafe "window[\"WebKitCSSRegionRule\"]" gTypeWebKitCSSRegionRule :: GType
newtype WebKitCSSTransformValue = WebKitCSSTransformValue { unWebKitCSSTransformValue :: JSVal }
instance Eq (WebKitCSSTransformValue) where
(WebKitCSSTransformValue a) == (WebKitCSSTransformValue b) = js_eq a b
instance PToJSVal WebKitCSSTransformValue where
pToJSVal = unWebKitCSSTransformValue
instance PFromJSVal WebKitCSSTransformValue where
pFromJSVal = WebKitCSSTransformValue
instance ToJSVal WebKitCSSTransformValue where
toJSVal = return . unWebKitCSSTransformValue
instance FromJSVal WebKitCSSTransformValue where
fromJSVal = return . fmap WebKitCSSTransformValue . maybeJSNullOrUndefined
instance IsCSSValueList WebKitCSSTransformValue
instance IsCSSValue WebKitCSSTransformValue
instance IsGObject WebKitCSSTransformValue where
typeGType _ = gTypeWebKitCSSTransformValue
foreign import javascript unsafe "window[\"WebKitCSSTransformValue\"]" gTypeWebKitCSSTransformValue :: GType
newtype WebKitCSSViewportRule = WebKitCSSViewportRule { unWebKitCSSViewportRule :: JSVal }
instance Eq (WebKitCSSViewportRule) where
(WebKitCSSViewportRule a) == (WebKitCSSViewportRule b) = js_eq a b
instance PToJSVal WebKitCSSViewportRule where
pToJSVal = unWebKitCSSViewportRule
instance PFromJSVal WebKitCSSViewportRule where
pFromJSVal = WebKitCSSViewportRule
instance ToJSVal WebKitCSSViewportRule where
toJSVal = return . unWebKitCSSViewportRule
instance FromJSVal WebKitCSSViewportRule where
fromJSVal = return . fmap WebKitCSSViewportRule . maybeJSNullOrUndefined
instance IsCSSRule WebKitCSSViewportRule
instance IsGObject WebKitCSSViewportRule where
typeGType _ = gTypeWebKitCSSViewportRule
foreign import javascript unsafe "window[\"WebKitCSSViewportRule\"]" gTypeWebKitCSSViewportRule :: GType
newtype WebKitNamedFlow = WebKitNamedFlow { unWebKitNamedFlow :: JSVal }
instance Eq (WebKitNamedFlow) where
(WebKitNamedFlow a) == (WebKitNamedFlow b) = js_eq a b
instance PToJSVal WebKitNamedFlow where
pToJSVal = unWebKitNamedFlow
instance PFromJSVal WebKitNamedFlow where
pFromJSVal = WebKitNamedFlow
instance ToJSVal WebKitNamedFlow where
toJSVal = return . unWebKitNamedFlow
instance FromJSVal WebKitNamedFlow where
fromJSVal = return . fmap WebKitNamedFlow . maybeJSNullOrUndefined
instance IsEventTarget WebKitNamedFlow
instance IsGObject WebKitNamedFlow where
typeGType _ = gTypeWebKitNamedFlow
foreign import javascript unsafe "window[\"WebKitNamedFlow\"]" gTypeWebKitNamedFlow :: GType
newtype WebKitNamespace = WebKitNamespace { unWebKitNamespace :: JSVal }
instance Eq (WebKitNamespace) where
(WebKitNamespace a) == (WebKitNamespace b) = js_eq a b
instance PToJSVal WebKitNamespace where
pToJSVal = unWebKitNamespace
instance PFromJSVal WebKitNamespace where
pFromJSVal = WebKitNamespace
instance ToJSVal WebKitNamespace where
toJSVal = return . unWebKitNamespace
instance FromJSVal WebKitNamespace where
fromJSVal = return . fmap WebKitNamespace . maybeJSNullOrUndefined
instance IsGObject WebKitNamespace where
typeGType _ = gTypeWebKitNamespace
foreign import javascript unsafe "window[\"WebKitNamespace\"]" gTypeWebKitNamespace :: GType
newtype WebKitPlaybackTargetAvailabilityEvent = WebKitPlaybackTargetAvailabilityEvent { unWebKitPlaybackTargetAvailabilityEvent :: JSVal }
instance Eq (WebKitPlaybackTargetAvailabilityEvent) where
(WebKitPlaybackTargetAvailabilityEvent a) == (WebKitPlaybackTargetAvailabilityEvent b) = js_eq a b
instance PToJSVal WebKitPlaybackTargetAvailabilityEvent where
pToJSVal = unWebKitPlaybackTargetAvailabilityEvent
instance PFromJSVal WebKitPlaybackTargetAvailabilityEvent where
pFromJSVal = WebKitPlaybackTargetAvailabilityEvent
instance ToJSVal WebKitPlaybackTargetAvailabilityEvent where
toJSVal = return . unWebKitPlaybackTargetAvailabilityEvent
instance FromJSVal WebKitPlaybackTargetAvailabilityEvent where
fromJSVal = return . fmap WebKitPlaybackTargetAvailabilityEvent . maybeJSNullOrUndefined
instance IsEvent WebKitPlaybackTargetAvailabilityEvent
instance IsGObject WebKitPlaybackTargetAvailabilityEvent where
typeGType _ = gTypeWebKitPlaybackTargetAvailabilityEvent
foreign import javascript unsafe "window[\"WebKitPlaybackTargetAvailabilityEvent\"]" gTypeWebKitPlaybackTargetAvailabilityEvent :: GType
newtype WebKitPoint = WebKitPoint { unWebKitPoint :: JSVal }
instance Eq (WebKitPoint) where
(WebKitPoint a) == (WebKitPoint b) = js_eq a b
instance PToJSVal WebKitPoint where
pToJSVal = unWebKitPoint
instance PFromJSVal WebKitPoint where
pFromJSVal = WebKitPoint
instance ToJSVal WebKitPoint where
toJSVal = return . unWebKitPoint
instance FromJSVal WebKitPoint where
fromJSVal = return . fmap WebKitPoint . maybeJSNullOrUndefined
instance IsGObject WebKitPoint where
typeGType _ = gTypeWebKitPoint
foreign import javascript unsafe "window[\"WebKitPoint\"]" gTypeWebKitPoint :: GType
newtype WebKitTransitionEvent = WebKitTransitionEvent { unWebKitTransitionEvent :: JSVal }
instance Eq (WebKitTransitionEvent) where
(WebKitTransitionEvent a) == (WebKitTransitionEvent b) = js_eq a b
instance PToJSVal WebKitTransitionEvent where
pToJSVal = unWebKitTransitionEvent
instance PFromJSVal WebKitTransitionEvent where
pFromJSVal = WebKitTransitionEvent
instance ToJSVal WebKitTransitionEvent where
toJSVal = return . unWebKitTransitionEvent
instance FromJSVal WebKitTransitionEvent where
fromJSVal = return . fmap WebKitTransitionEvent . maybeJSNullOrUndefined
instance IsEvent WebKitTransitionEvent
instance IsGObject WebKitTransitionEvent where
typeGType _ = gTypeWebKitTransitionEvent
foreign import javascript unsafe "window[\"WebKitTransitionEvent\"]" gTypeWebKitTransitionEvent :: GType
newtype WebSocket = WebSocket { unWebSocket :: JSVal }
instance Eq (WebSocket) where
(WebSocket a) == (WebSocket b) = js_eq a b
instance PToJSVal WebSocket where
pToJSVal = unWebSocket
instance PFromJSVal WebSocket where
pFromJSVal = WebSocket
instance ToJSVal WebSocket where
toJSVal = return . unWebSocket
instance FromJSVal WebSocket where
fromJSVal = return . fmap WebSocket . maybeJSNullOrUndefined
instance IsEventTarget WebSocket
instance IsGObject WebSocket where
typeGType _ = gTypeWebSocket
foreign import javascript unsafe "window[\"WebSocket\"]" gTypeWebSocket :: GType
newtype WheelEvent = WheelEvent { unWheelEvent :: JSVal }
instance Eq (WheelEvent) where
(WheelEvent a) == (WheelEvent b) = js_eq a b
instance PToJSVal WheelEvent where
pToJSVal = unWheelEvent
instance PFromJSVal WheelEvent where
pFromJSVal = WheelEvent
instance ToJSVal WheelEvent where
toJSVal = return . unWheelEvent
instance FromJSVal WheelEvent where
fromJSVal = return . fmap WheelEvent . maybeJSNullOrUndefined
instance IsMouseEvent WheelEvent
instance IsUIEvent WheelEvent
instance IsEvent WheelEvent
instance IsGObject WheelEvent where
typeGType _ = gTypeWheelEvent
foreign import javascript unsafe "window[\"WheelEvent\"]" gTypeWheelEvent :: GType
newtype Window = Window { unWindow :: JSVal }
instance Eq (Window) where
(Window a) == (Window b) = js_eq a b
instance PToJSVal Window where
pToJSVal = unWindow
instance PFromJSVal Window where
pFromJSVal = Window
instance ToJSVal Window where
toJSVal = return . unWindow
instance FromJSVal Window where
fromJSVal = return . fmap Window . maybeJSNullOrUndefined
instance IsEventTarget Window
instance IsGObject Window where
typeGType _ = gTypeWindow
foreign import javascript unsafe "window[\"Window\"]" gTypeWindow :: GType
newtype WindowBase64 = WindowBase64 { unWindowBase64 :: JSVal }
instance Eq (WindowBase64) where
(WindowBase64 a) == (WindowBase64 b) = js_eq a b
instance PToJSVal WindowBase64 where
pToJSVal = unWindowBase64
instance PFromJSVal WindowBase64 where
pFromJSVal = WindowBase64
instance ToJSVal WindowBase64 where
toJSVal = return . unWindowBase64
instance FromJSVal WindowBase64 where
fromJSVal = return . fmap WindowBase64 . maybeJSNullOrUndefined
instance IsGObject WindowBase64 where
typeGType _ = gTypeWindowBase64
foreign import javascript unsafe "window[\"WindowBase64\"]" gTypeWindowBase64 :: GType
newtype WindowTimers = WindowTimers { unWindowTimers :: JSVal }
instance Eq (WindowTimers) where
(WindowTimers a) == (WindowTimers b) = js_eq a b
instance PToJSVal WindowTimers where
pToJSVal = unWindowTimers
instance PFromJSVal WindowTimers where
pFromJSVal = WindowTimers
instance ToJSVal WindowTimers where
toJSVal = return . unWindowTimers
instance FromJSVal WindowTimers where
fromJSVal = return . fmap WindowTimers . maybeJSNullOrUndefined
instance IsGObject WindowTimers where
typeGType _ = gTypeWindowTimers
foreign import javascript unsafe "window[\"WindowTimers\"]" gTypeWindowTimers :: GType
newtype Worker = Worker { unWorker :: JSVal }
instance Eq (Worker) where
(Worker a) == (Worker b) = js_eq a b
instance PToJSVal Worker where
pToJSVal = unWorker
instance PFromJSVal Worker where
pFromJSVal = Worker
instance ToJSVal Worker where
toJSVal = return . unWorker
instance FromJSVal Worker where
fromJSVal = return . fmap Worker . maybeJSNullOrUndefined
instance IsEventTarget Worker
instance IsGObject Worker where
typeGType _ = gTypeWorker
foreign import javascript unsafe "window[\"Worker\"]" gTypeWorker :: GType
newtype WorkerGlobalScope = WorkerGlobalScope { unWorkerGlobalScope :: JSVal }
instance Eq (WorkerGlobalScope) where
(WorkerGlobalScope a) == (WorkerGlobalScope b) = js_eq a b
instance PToJSVal WorkerGlobalScope where
pToJSVal = unWorkerGlobalScope
instance PFromJSVal WorkerGlobalScope where
pFromJSVal = WorkerGlobalScope
instance ToJSVal WorkerGlobalScope where
toJSVal = return . unWorkerGlobalScope
instance FromJSVal WorkerGlobalScope where
fromJSVal = return . fmap WorkerGlobalScope . maybeJSNullOrUndefined
class IsEventTarget o => IsWorkerGlobalScope o
toWorkerGlobalScope :: IsWorkerGlobalScope o => o -> WorkerGlobalScope
toWorkerGlobalScope = WorkerGlobalScope . coerce
instance IsWorkerGlobalScope WorkerGlobalScope
instance IsEventTarget WorkerGlobalScope
instance IsGObject WorkerGlobalScope where
typeGType _ = gTypeWorkerGlobalScope
foreign import javascript unsafe "window[\"WorkerGlobalScope\"]" gTypeWorkerGlobalScope :: GType
newtype WorkerLocation = WorkerLocation { unWorkerLocation :: JSVal }
instance Eq (WorkerLocation) where
(WorkerLocation a) == (WorkerLocation b) = js_eq a b
instance PToJSVal WorkerLocation where
pToJSVal = unWorkerLocation
instance PFromJSVal WorkerLocation where
pFromJSVal = WorkerLocation
instance ToJSVal WorkerLocation where
toJSVal = return . unWorkerLocation
instance FromJSVal WorkerLocation where
fromJSVal = return . fmap WorkerLocation . maybeJSNullOrUndefined
instance IsGObject WorkerLocation where
typeGType _ = gTypeWorkerLocation
foreign import javascript unsafe "window[\"WorkerLocation\"]" gTypeWorkerLocation :: GType
newtype WorkerNavigator = WorkerNavigator { unWorkerNavigator :: JSVal }
instance Eq (WorkerNavigator) where
(WorkerNavigator a) == (WorkerNavigator b) = js_eq a b
instance PToJSVal WorkerNavigator where
pToJSVal = unWorkerNavigator
instance PFromJSVal WorkerNavigator where
pFromJSVal = WorkerNavigator
instance ToJSVal WorkerNavigator where
toJSVal = return . unWorkerNavigator
instance FromJSVal WorkerNavigator where
fromJSVal = return . fmap WorkerNavigator . maybeJSNullOrUndefined
instance IsGObject WorkerNavigator where
typeGType _ = gTypeWorkerNavigator
foreign import javascript unsafe "window[\"WorkerNavigator\"]" gTypeWorkerNavigator :: GType
newtype XMLHttpRequest = XMLHttpRequest { unXMLHttpRequest :: JSVal }
instance Eq (XMLHttpRequest) where
(XMLHttpRequest a) == (XMLHttpRequest b) = js_eq a b
instance PToJSVal XMLHttpRequest where
pToJSVal = unXMLHttpRequest
instance PFromJSVal XMLHttpRequest where
pFromJSVal = XMLHttpRequest
instance ToJSVal XMLHttpRequest where
toJSVal = return . unXMLHttpRequest
instance FromJSVal XMLHttpRequest where
fromJSVal = return . fmap XMLHttpRequest . maybeJSNullOrUndefined
instance IsEventTarget XMLHttpRequest
instance IsGObject XMLHttpRequest where
typeGType _ = gTypeXMLHttpRequest
foreign import javascript unsafe "window[\"XMLHttpRequest\"]" gTypeXMLHttpRequest :: GType
newtype XMLHttpRequestProgressEvent = XMLHttpRequestProgressEvent { unXMLHttpRequestProgressEvent :: JSVal }
instance Eq (XMLHttpRequestProgressEvent) where
(XMLHttpRequestProgressEvent a) == (XMLHttpRequestProgressEvent b) = js_eq a b
instance PToJSVal XMLHttpRequestProgressEvent where
pToJSVal = unXMLHttpRequestProgressEvent
instance PFromJSVal XMLHttpRequestProgressEvent where
pFromJSVal = XMLHttpRequestProgressEvent
instance ToJSVal XMLHttpRequestProgressEvent where
toJSVal = return . unXMLHttpRequestProgressEvent
instance FromJSVal XMLHttpRequestProgressEvent where
fromJSVal = return . fmap XMLHttpRequestProgressEvent . maybeJSNullOrUndefined
instance IsProgressEvent XMLHttpRequestProgressEvent
instance IsEvent XMLHttpRequestProgressEvent
instance IsGObject XMLHttpRequestProgressEvent where
typeGType _ = gTypeXMLHttpRequestProgressEvent
foreign import javascript unsafe "window[\"XMLHttpRequestProgressEvent\"]" gTypeXMLHttpRequestProgressEvent :: GType
newtype XMLHttpRequestUpload = XMLHttpRequestUpload { unXMLHttpRequestUpload :: JSVal }
instance Eq (XMLHttpRequestUpload) where
(XMLHttpRequestUpload a) == (XMLHttpRequestUpload b) = js_eq a b
instance PToJSVal XMLHttpRequestUpload where
pToJSVal = unXMLHttpRequestUpload
instance PFromJSVal XMLHttpRequestUpload where
pFromJSVal = XMLHttpRequestUpload
instance ToJSVal XMLHttpRequestUpload where
toJSVal = return . unXMLHttpRequestUpload
instance FromJSVal XMLHttpRequestUpload where
fromJSVal = return . fmap XMLHttpRequestUpload . maybeJSNullOrUndefined
instance IsEventTarget XMLHttpRequestUpload
instance IsGObject XMLHttpRequestUpload where
typeGType _ = gTypeXMLHttpRequestUpload
foreign import javascript unsafe "window[\"XMLHttpRequestUpload\"]" gTypeXMLHttpRequestUpload :: GType
newtype XMLSerializer = XMLSerializer { unXMLSerializer :: JSVal }
instance Eq (XMLSerializer) where
(XMLSerializer a) == (XMLSerializer b) = js_eq a b
instance PToJSVal XMLSerializer where
pToJSVal = unXMLSerializer
instance PFromJSVal XMLSerializer where
pFromJSVal = XMLSerializer
instance ToJSVal XMLSerializer where
toJSVal = return . unXMLSerializer
instance FromJSVal XMLSerializer where
fromJSVal = return . fmap XMLSerializer . maybeJSNullOrUndefined
instance IsGObject XMLSerializer where
typeGType _ = gTypeXMLSerializer
foreign import javascript unsafe "window[\"XMLSerializer\"]" gTypeXMLSerializer :: GType
newtype XPathEvaluator = XPathEvaluator { unXPathEvaluator :: JSVal }
instance Eq (XPathEvaluator) where
(XPathEvaluator a) == (XPathEvaluator b) = js_eq a b
instance PToJSVal XPathEvaluator where
pToJSVal = unXPathEvaluator
instance PFromJSVal XPathEvaluator where
pFromJSVal = XPathEvaluator
instance ToJSVal XPathEvaluator where
toJSVal = return . unXPathEvaluator
instance FromJSVal XPathEvaluator where
fromJSVal = return . fmap XPathEvaluator . maybeJSNullOrUndefined
instance IsGObject XPathEvaluator where
typeGType _ = gTypeXPathEvaluator
foreign import javascript unsafe "window[\"XPathEvaluator\"]" gTypeXPathEvaluator :: GType
newtype XPathExpression = XPathExpression { unXPathExpression :: JSVal }
instance Eq (XPathExpression) where
(XPathExpression a) == (XPathExpression b) = js_eq a b
instance PToJSVal XPathExpression where
pToJSVal = unXPathExpression
instance PFromJSVal XPathExpression where
pFromJSVal = XPathExpression
instance ToJSVal XPathExpression where
toJSVal = return . unXPathExpression
instance FromJSVal XPathExpression where
fromJSVal = return . fmap XPathExpression . maybeJSNullOrUndefined
instance IsGObject XPathExpression where
typeGType _ = gTypeXPathExpression
foreign import javascript unsafe "window[\"XPathExpression\"]" gTypeXPathExpression :: GType
newtype XPathNSResolver = XPathNSResolver { unXPathNSResolver :: JSVal }
instance Eq (XPathNSResolver) where
(XPathNSResolver a) == (XPathNSResolver b) = js_eq a b
instance PToJSVal XPathNSResolver where
pToJSVal = unXPathNSResolver
instance PFromJSVal XPathNSResolver where
pFromJSVal = XPathNSResolver
instance ToJSVal XPathNSResolver where
toJSVal = return . unXPathNSResolver
instance FromJSVal XPathNSResolver where
fromJSVal = return . fmap XPathNSResolver . maybeJSNullOrUndefined
instance IsGObject XPathNSResolver where
typeGType _ = gTypeXPathNSResolver
foreign import javascript unsafe "window[\"XPathNSResolver\"]" gTypeXPathNSResolver :: GType
newtype XPathResult = XPathResult { unXPathResult :: JSVal }
instance Eq (XPathResult) where
(XPathResult a) == (XPathResult b) = js_eq a b
instance PToJSVal XPathResult where
pToJSVal = unXPathResult
instance PFromJSVal XPathResult where
pFromJSVal = XPathResult
instance ToJSVal XPathResult where
toJSVal = return . unXPathResult
instance FromJSVal XPathResult where
fromJSVal = return . fmap XPathResult . maybeJSNullOrUndefined
instance IsGObject XPathResult where
typeGType _ = gTypeXPathResult
foreign import javascript unsafe "window[\"XPathResult\"]" gTypeXPathResult :: GType
newtype XSLTProcessor = XSLTProcessor { unXSLTProcessor :: JSVal }
instance Eq (XSLTProcessor) where
(XSLTProcessor a) == (XSLTProcessor b) = js_eq a b
instance PToJSVal XSLTProcessor where
pToJSVal = unXSLTProcessor
instance PFromJSVal XSLTProcessor where
pFromJSVal = XSLTProcessor
instance ToJSVal XSLTProcessor where
toJSVal = return . unXSLTProcessor
instance FromJSVal XSLTProcessor where
fromJSVal = return . fmap XSLTProcessor . maybeJSNullOrUndefined
instance IsGObject XSLTProcessor where
typeGType _ = gTypeXSLTProcessor
foreign import javascript unsafe "window[\"XSLTProcessor\"]" gTypeXSLTProcessor :: GType