#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
#else
#endif
module GHCJS.DOM.Types (
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
maybeJSNullOrUndefined, Nullable(..), nullableToMaybe, maybeToNullable, propagateGError, GType(..)
, GObject(..), IsGObject, toGObject, castToGObject, gTypeGObject, unsafeCastGObject, isA, objectToString
, js_eq
, DOMString(..), ToDOMString(..), FromDOMString(..), IsDOMString, ToJSString(..), FromJSString(..)
, toJSString, fromJSString, toMaybeJSString, fromMaybeJSString
, 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, castToPromise, gTypePromise
, Date(Date), unDate, IsDate, toDate, castToDate, gTypeDate
, Array(Array), unArray, IsArray, toArray, castToArray, gTypeArray
, ObjectArray(ObjectArray), unObjectArray, IsObjectArray, toObjectArray
, ArrayBuffer(ArrayBuffer), unArrayBuffer, IsArrayBuffer, toArrayBuffer, castToArrayBuffer, gTypeArrayBuffer
, ArrayBufferView(ArrayBufferView), unArrayBufferView, IsArrayBufferView, toArrayBufferView
, Float32Array(Float32Array), unFloat32Array, IsFloat32Array, toFloat32Array, castToFloat32Array, gTypeFloat32Array
, Float64Array(Float64Array), unFloat64Array, IsFloat64Array, toFloat64Array, castToFloat64Array, gTypeFloat64Array
, Uint8Array(Uint8Array), unUint8Array, IsUint8Array, toUint8Array, castToUint8Array, gTypeUint8Array
, Uint8ClampedArray(Uint8ClampedArray), unUint8ClampedArray, IsUint8ClampedArray, toUint8ClampedArray, castToUint8ClampedArray, gTypeUint8ClampedArray
, Uint16Array(Uint16Array), unUint16Array, IsUint16Array, toUint16Array, castToUint16Array, gTypeUint16Array
, Uint32Array(Uint32Array), unUint32Array, IsUint32Array, toUint32Array, castToUint32Array, gTypeUint32Array
, Int8Array(Int8Array), unInt8Array, IsInt8Array, toInt8Array, castToInt8Array, gTypeInt8Array
, Int16Array(Int16Array), unInt16Array, IsInt16Array, toInt16Array, castToInt16Array, gTypeInt16Array
, Int32Array(Int32Array), unInt32Array, IsInt32Array, toInt32Array, castToInt32Array, 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
, ANGLEInstancedArrays(ANGLEInstancedArrays), unANGLEInstancedArrays, castToANGLEInstancedArrays, gTypeANGLEInstancedArrays
, AbstractView(AbstractView), unAbstractView, castToAbstractView, gTypeAbstractView
, AbstractWorker(AbstractWorker), unAbstractWorker, castToAbstractWorker, gTypeAbstractWorker
, AllAudioCapabilities(AllAudioCapabilities), unAllAudioCapabilities, castToAllAudioCapabilities, gTypeAllAudioCapabilities
, AllVideoCapabilities(AllVideoCapabilities), unAllVideoCapabilities, castToAllVideoCapabilities, gTypeAllVideoCapabilities
, AnalyserNode(AnalyserNode), unAnalyserNode, castToAnalyserNode, gTypeAnalyserNode
, AnimationEvent(AnimationEvent), unAnimationEvent, castToAnimationEvent, gTypeAnimationEvent
, ApplicationCache(ApplicationCache), unApplicationCache, castToApplicationCache, gTypeApplicationCache
, Attr(Attr), unAttr, castToAttr, gTypeAttr
, AudioBuffer(AudioBuffer), unAudioBuffer, castToAudioBuffer, gTypeAudioBuffer
, AudioBufferSourceNode(AudioBufferSourceNode), unAudioBufferSourceNode, castToAudioBufferSourceNode, gTypeAudioBufferSourceNode
, AudioContext(AudioContext), unAudioContext, IsAudioContext, toAudioContext, castToAudioContext, gTypeAudioContext
, AudioDestinationNode(AudioDestinationNode), unAudioDestinationNode, castToAudioDestinationNode, gTypeAudioDestinationNode
, AudioListener(AudioListener), unAudioListener, castToAudioListener, gTypeAudioListener
, AudioNode(AudioNode), unAudioNode, IsAudioNode, toAudioNode, castToAudioNode, gTypeAudioNode
, AudioParam(AudioParam), unAudioParam, castToAudioParam, gTypeAudioParam
, AudioProcessingEvent(AudioProcessingEvent), unAudioProcessingEvent, castToAudioProcessingEvent, gTypeAudioProcessingEvent
, AudioStreamTrack(AudioStreamTrack), unAudioStreamTrack, castToAudioStreamTrack, gTypeAudioStreamTrack
, AudioTrack(AudioTrack), unAudioTrack, castToAudioTrack, gTypeAudioTrack
, AudioTrackList(AudioTrackList), unAudioTrackList, castToAudioTrackList, gTypeAudioTrackList
, AutocompleteErrorEvent(AutocompleteErrorEvent), unAutocompleteErrorEvent, castToAutocompleteErrorEvent, gTypeAutocompleteErrorEvent
, BarProp(BarProp), unBarProp, castToBarProp, gTypeBarProp
, BatteryManager(BatteryManager), unBatteryManager, castToBatteryManager, gTypeBatteryManager
, BeforeLoadEvent(BeforeLoadEvent), unBeforeLoadEvent, castToBeforeLoadEvent, gTypeBeforeLoadEvent
, BeforeUnloadEvent(BeforeUnloadEvent), unBeforeUnloadEvent, castToBeforeUnloadEvent, gTypeBeforeUnloadEvent
, BiquadFilterNode(BiquadFilterNode), unBiquadFilterNode, castToBiquadFilterNode, gTypeBiquadFilterNode
, Blob(Blob), unBlob, IsBlob, toBlob, castToBlob, gTypeBlob
, CDATASection(CDATASection), unCDATASection, castToCDATASection, gTypeCDATASection
, CSS(CSS), unCSS, castToCSS, gTypeCSS
, CSSCharsetRule(CSSCharsetRule), unCSSCharsetRule, castToCSSCharsetRule, gTypeCSSCharsetRule
, CSSFontFaceLoadEvent(CSSFontFaceLoadEvent), unCSSFontFaceLoadEvent, castToCSSFontFaceLoadEvent, gTypeCSSFontFaceLoadEvent
, CSSFontFaceRule(CSSFontFaceRule), unCSSFontFaceRule, castToCSSFontFaceRule, gTypeCSSFontFaceRule
, CSSImportRule(CSSImportRule), unCSSImportRule, castToCSSImportRule, gTypeCSSImportRule
, CSSKeyframeRule(CSSKeyframeRule), unCSSKeyframeRule, castToCSSKeyframeRule, gTypeCSSKeyframeRule
, CSSKeyframesRule(CSSKeyframesRule), unCSSKeyframesRule, castToCSSKeyframesRule, gTypeCSSKeyframesRule
, CSSMediaRule(CSSMediaRule), unCSSMediaRule, castToCSSMediaRule, gTypeCSSMediaRule
, CSSPageRule(CSSPageRule), unCSSPageRule, castToCSSPageRule, gTypeCSSPageRule
, CSSPrimitiveValue(CSSPrimitiveValue), unCSSPrimitiveValue, castToCSSPrimitiveValue, gTypeCSSPrimitiveValue
, CSSRule(CSSRule), unCSSRule, IsCSSRule, toCSSRule, castToCSSRule, gTypeCSSRule
, CSSRuleList(CSSRuleList), unCSSRuleList, castToCSSRuleList, gTypeCSSRuleList
, CSSStyleDeclaration(CSSStyleDeclaration), unCSSStyleDeclaration, castToCSSStyleDeclaration, gTypeCSSStyleDeclaration
, CSSStyleRule(CSSStyleRule), unCSSStyleRule, castToCSSStyleRule, gTypeCSSStyleRule
, CSSStyleSheet(CSSStyleSheet), unCSSStyleSheet, castToCSSStyleSheet, gTypeCSSStyleSheet
, CSSSupportsRule(CSSSupportsRule), unCSSSupportsRule, castToCSSSupportsRule, gTypeCSSSupportsRule
, CSSUnknownRule(CSSUnknownRule), unCSSUnknownRule, castToCSSUnknownRule, gTypeCSSUnknownRule
, CSSValue(CSSValue), unCSSValue, IsCSSValue, toCSSValue, castToCSSValue, gTypeCSSValue
, CSSValueList(CSSValueList), unCSSValueList, IsCSSValueList, toCSSValueList, castToCSSValueList, gTypeCSSValueList
, CanvasGradient(CanvasGradient), unCanvasGradient, castToCanvasGradient, gTypeCanvasGradient
, CanvasPattern(CanvasPattern), unCanvasPattern, castToCanvasPattern, gTypeCanvasPattern
, CanvasProxy(CanvasProxy), unCanvasProxy, castToCanvasProxy, gTypeCanvasProxy
, CanvasRenderingContext(CanvasRenderingContext), unCanvasRenderingContext, IsCanvasRenderingContext, toCanvasRenderingContext, castToCanvasRenderingContext, gTypeCanvasRenderingContext
, CanvasRenderingContext2D(CanvasRenderingContext2D), unCanvasRenderingContext2D, castToCanvasRenderingContext2D, gTypeCanvasRenderingContext2D
, CapabilityRange(CapabilityRange), unCapabilityRange, castToCapabilityRange, gTypeCapabilityRange
, ChannelMergerNode(ChannelMergerNode), unChannelMergerNode, castToChannelMergerNode, gTypeChannelMergerNode
, ChannelSplitterNode(ChannelSplitterNode), unChannelSplitterNode, castToChannelSplitterNode, gTypeChannelSplitterNode
, CharacterData(CharacterData), unCharacterData, IsCharacterData, toCharacterData, castToCharacterData, gTypeCharacterData
, ChildNode(ChildNode), unChildNode, castToChildNode, gTypeChildNode
, ClientRect(ClientRect), unClientRect, castToClientRect, gTypeClientRect
, ClientRectList(ClientRectList), unClientRectList, castToClientRectList, gTypeClientRectList
, CloseEvent(CloseEvent), unCloseEvent, castToCloseEvent, gTypeCloseEvent
, CommandLineAPIHost(CommandLineAPIHost), unCommandLineAPIHost, castToCommandLineAPIHost, gTypeCommandLineAPIHost
, Comment(Comment), unComment, castToComment, gTypeComment
, CompositionEvent(CompositionEvent), unCompositionEvent, castToCompositionEvent, gTypeCompositionEvent
, ConvolverNode(ConvolverNode), unConvolverNode, castToConvolverNode, gTypeConvolverNode
, Coordinates(Coordinates), unCoordinates, castToCoordinates, gTypeCoordinates
, Counter(Counter), unCounter, castToCounter, gTypeCounter
, Crypto(Crypto), unCrypto, castToCrypto, gTypeCrypto
, CryptoKey(CryptoKey), unCryptoKey, castToCryptoKey, gTypeCryptoKey
, CryptoKeyPair(CryptoKeyPair), unCryptoKeyPair, castToCryptoKeyPair, gTypeCryptoKeyPair
, CustomEvent(CustomEvent), unCustomEvent, castToCustomEvent, gTypeCustomEvent
, DOMError(DOMError), unDOMError, IsDOMError, toDOMError, castToDOMError, gTypeDOMError
, DOMImplementation(DOMImplementation), unDOMImplementation, castToDOMImplementation, gTypeDOMImplementation
, DOMNamedFlowCollection(DOMNamedFlowCollection), unDOMNamedFlowCollection, castToDOMNamedFlowCollection, gTypeDOMNamedFlowCollection
, DOMParser(DOMParser), unDOMParser, castToDOMParser, gTypeDOMParser
, DOMSettableTokenList(DOMSettableTokenList), unDOMSettableTokenList, castToDOMSettableTokenList, gTypeDOMSettableTokenList
, DOMStringList(DOMStringList), unDOMStringList, castToDOMStringList, gTypeDOMStringList
, DOMStringMap(DOMStringMap), unDOMStringMap, castToDOMStringMap, gTypeDOMStringMap
, DOMTokenList(DOMTokenList), unDOMTokenList, IsDOMTokenList, toDOMTokenList, castToDOMTokenList, gTypeDOMTokenList
, DataCue(DataCue), unDataCue, castToDataCue, gTypeDataCue
, DataTransfer(DataTransfer), unDataTransfer, castToDataTransfer, gTypeDataTransfer
, DataTransferItem(DataTransferItem), unDataTransferItem, castToDataTransferItem, gTypeDataTransferItem
, DataTransferItemList(DataTransferItemList), unDataTransferItemList, castToDataTransferItemList, gTypeDataTransferItemList
, Database(Database), unDatabase, castToDatabase, gTypeDatabase
, DedicatedWorkerGlobalScope(DedicatedWorkerGlobalScope), unDedicatedWorkerGlobalScope, castToDedicatedWorkerGlobalScope, gTypeDedicatedWorkerGlobalScope
, DelayNode(DelayNode), unDelayNode, castToDelayNode, gTypeDelayNode
, DeviceMotionEvent(DeviceMotionEvent), unDeviceMotionEvent, castToDeviceMotionEvent, gTypeDeviceMotionEvent
, DeviceOrientationEvent(DeviceOrientationEvent), unDeviceOrientationEvent, castToDeviceOrientationEvent, gTypeDeviceOrientationEvent
, DeviceProximityEvent(DeviceProximityEvent), unDeviceProximityEvent, castToDeviceProximityEvent, gTypeDeviceProximityEvent
, Document(Document), unDocument, IsDocument, toDocument, castToDocument, gTypeDocument
, DocumentFragment(DocumentFragment), unDocumentFragment, castToDocumentFragment, gTypeDocumentFragment
, DocumentType(DocumentType), unDocumentType, castToDocumentType, gTypeDocumentType
, DynamicsCompressorNode(DynamicsCompressorNode), unDynamicsCompressorNode, castToDynamicsCompressorNode, gTypeDynamicsCompressorNode
, EXTBlendMinMax(EXTBlendMinMax), unEXTBlendMinMax, castToEXTBlendMinMax, gTypeEXTBlendMinMax
, EXTFragDepth(EXTFragDepth), unEXTFragDepth, castToEXTFragDepth, gTypeEXTFragDepth
, EXTShaderTextureLOD(EXTShaderTextureLOD), unEXTShaderTextureLOD, castToEXTShaderTextureLOD, gTypeEXTShaderTextureLOD
, EXTTextureFilterAnisotropic(EXTTextureFilterAnisotropic), unEXTTextureFilterAnisotropic, castToEXTTextureFilterAnisotropic, gTypeEXTTextureFilterAnisotropic
, EXTsRGB(EXTsRGB), unEXTsRGB, castToEXTsRGB, gTypeEXTsRGB
, Element(Element), unElement, IsElement, toElement, castToElement, gTypeElement
, Entity(Entity), unEntity, castToEntity, gTypeEntity
, EntityReference(EntityReference), unEntityReference, castToEntityReference, gTypeEntityReference
, ErrorEvent(ErrorEvent), unErrorEvent, castToErrorEvent, gTypeErrorEvent
, Event(Event), unEvent, IsEvent, toEvent, castToEvent, gTypeEvent
, EventListener(EventListener), unEventListener, castToEventListener, gTypeEventListener
, EventSource(EventSource), unEventSource, castToEventSource, gTypeEventSource
, EventTarget(EventTarget), unEventTarget, IsEventTarget, toEventTarget, castToEventTarget, gTypeEventTarget
, File(File), unFile, castToFile, gTypeFile
, FileError(FileError), unFileError, castToFileError, gTypeFileError
, FileList(FileList), unFileList, castToFileList, gTypeFileList
, FileReader(FileReader), unFileReader, castToFileReader, gTypeFileReader
, FileReaderSync(FileReaderSync), unFileReaderSync, castToFileReaderSync, gTypeFileReaderSync
, FocusEvent(FocusEvent), unFocusEvent, castToFocusEvent, gTypeFocusEvent
, FontLoader(FontLoader), unFontLoader, castToFontLoader, gTypeFontLoader
, FormData(FormData), unFormData, castToFormData, gTypeFormData
, GainNode(GainNode), unGainNode, castToGainNode, gTypeGainNode
, Gamepad(Gamepad), unGamepad, castToGamepad, gTypeGamepad
, GamepadButton(GamepadButton), unGamepadButton, castToGamepadButton, gTypeGamepadButton
, GamepadEvent(GamepadEvent), unGamepadEvent, castToGamepadEvent, gTypeGamepadEvent
, Geolocation(Geolocation), unGeolocation, castToGeolocation, gTypeGeolocation
, Geoposition(Geoposition), unGeoposition, castToGeoposition, gTypeGeoposition
, HTMLAllCollection(HTMLAllCollection), unHTMLAllCollection, castToHTMLAllCollection, gTypeHTMLAllCollection
, HTMLAnchorElement(HTMLAnchorElement), unHTMLAnchorElement, castToHTMLAnchorElement, gTypeHTMLAnchorElement
, HTMLAppletElement(HTMLAppletElement), unHTMLAppletElement, castToHTMLAppletElement, gTypeHTMLAppletElement
, HTMLAreaElement(HTMLAreaElement), unHTMLAreaElement, castToHTMLAreaElement, gTypeHTMLAreaElement
, HTMLAudioElement(HTMLAudioElement), unHTMLAudioElement, castToHTMLAudioElement, gTypeHTMLAudioElement
, HTMLBRElement(HTMLBRElement), unHTMLBRElement, castToHTMLBRElement, gTypeHTMLBRElement
, HTMLBaseElement(HTMLBaseElement), unHTMLBaseElement, castToHTMLBaseElement, gTypeHTMLBaseElement
, HTMLBaseFontElement(HTMLBaseFontElement), unHTMLBaseFontElement, castToHTMLBaseFontElement, gTypeHTMLBaseFontElement
, HTMLBodyElement(HTMLBodyElement), unHTMLBodyElement, castToHTMLBodyElement, gTypeHTMLBodyElement
, HTMLButtonElement(HTMLButtonElement), unHTMLButtonElement, castToHTMLButtonElement, gTypeHTMLButtonElement
, HTMLCanvasElement(HTMLCanvasElement), unHTMLCanvasElement, castToHTMLCanvasElement, gTypeHTMLCanvasElement
, HTMLCollection(HTMLCollection), unHTMLCollection, IsHTMLCollection, toHTMLCollection, castToHTMLCollection, gTypeHTMLCollection
, HTMLDListElement(HTMLDListElement), unHTMLDListElement, castToHTMLDListElement, gTypeHTMLDListElement
, HTMLDataListElement(HTMLDataListElement), unHTMLDataListElement, castToHTMLDataListElement, gTypeHTMLDataListElement
, HTMLDetailsElement(HTMLDetailsElement), unHTMLDetailsElement, castToHTMLDetailsElement, gTypeHTMLDetailsElement
, HTMLDirectoryElement(HTMLDirectoryElement), unHTMLDirectoryElement, castToHTMLDirectoryElement, gTypeHTMLDirectoryElement
, HTMLDivElement(HTMLDivElement), unHTMLDivElement, castToHTMLDivElement, gTypeHTMLDivElement
, HTMLDocument(HTMLDocument), unHTMLDocument, castToHTMLDocument, gTypeHTMLDocument
, HTMLElement(HTMLElement), unHTMLElement, IsHTMLElement, toHTMLElement, castToHTMLElement, gTypeHTMLElement
, HTMLEmbedElement(HTMLEmbedElement), unHTMLEmbedElement, castToHTMLEmbedElement, gTypeHTMLEmbedElement
, HTMLFieldSetElement(HTMLFieldSetElement), unHTMLFieldSetElement, castToHTMLFieldSetElement, gTypeHTMLFieldSetElement
, HTMLFontElement(HTMLFontElement), unHTMLFontElement, castToHTMLFontElement, gTypeHTMLFontElement
, HTMLFormControlsCollection(HTMLFormControlsCollection), unHTMLFormControlsCollection, castToHTMLFormControlsCollection, gTypeHTMLFormControlsCollection
, HTMLFormElement(HTMLFormElement), unHTMLFormElement, castToHTMLFormElement, gTypeHTMLFormElement
, HTMLFrameElement(HTMLFrameElement), unHTMLFrameElement, castToHTMLFrameElement, gTypeHTMLFrameElement
, HTMLFrameSetElement(HTMLFrameSetElement), unHTMLFrameSetElement, castToHTMLFrameSetElement, gTypeHTMLFrameSetElement
, HTMLHRElement(HTMLHRElement), unHTMLHRElement, castToHTMLHRElement, gTypeHTMLHRElement
, HTMLHeadElement(HTMLHeadElement), unHTMLHeadElement, castToHTMLHeadElement, gTypeHTMLHeadElement
, HTMLHeadingElement(HTMLHeadingElement), unHTMLHeadingElement, castToHTMLHeadingElement, gTypeHTMLHeadingElement
, HTMLHtmlElement(HTMLHtmlElement), unHTMLHtmlElement, castToHTMLHtmlElement, gTypeHTMLHtmlElement
, HTMLIFrameElement(HTMLIFrameElement), unHTMLIFrameElement, castToHTMLIFrameElement, gTypeHTMLIFrameElement
, HTMLImageElement(HTMLImageElement), unHTMLImageElement, castToHTMLImageElement, gTypeHTMLImageElement
, HTMLInputElement(HTMLInputElement), unHTMLInputElement, castToHTMLInputElement, gTypeHTMLInputElement
, HTMLKeygenElement(HTMLKeygenElement), unHTMLKeygenElement, castToHTMLKeygenElement, gTypeHTMLKeygenElement
, HTMLLIElement(HTMLLIElement), unHTMLLIElement, castToHTMLLIElement, gTypeHTMLLIElement
, HTMLLabelElement(HTMLLabelElement), unHTMLLabelElement, castToHTMLLabelElement, gTypeHTMLLabelElement
, HTMLLegendElement(HTMLLegendElement), unHTMLLegendElement, castToHTMLLegendElement, gTypeHTMLLegendElement
, HTMLLinkElement(HTMLLinkElement), unHTMLLinkElement, castToHTMLLinkElement, gTypeHTMLLinkElement
, HTMLMapElement(HTMLMapElement), unHTMLMapElement, castToHTMLMapElement, gTypeHTMLMapElement
, HTMLMarqueeElement(HTMLMarqueeElement), unHTMLMarqueeElement, castToHTMLMarqueeElement, gTypeHTMLMarqueeElement
, HTMLMediaElement(HTMLMediaElement), unHTMLMediaElement, IsHTMLMediaElement, toHTMLMediaElement, castToHTMLMediaElement, gTypeHTMLMediaElement
, HTMLMenuElement(HTMLMenuElement), unHTMLMenuElement, castToHTMLMenuElement, gTypeHTMLMenuElement
, HTMLMetaElement(HTMLMetaElement), unHTMLMetaElement, castToHTMLMetaElement, gTypeHTMLMetaElement
, HTMLMeterElement(HTMLMeterElement), unHTMLMeterElement, castToHTMLMeterElement, gTypeHTMLMeterElement
, HTMLModElement(HTMLModElement), unHTMLModElement, castToHTMLModElement, gTypeHTMLModElement
, HTMLOListElement(HTMLOListElement), unHTMLOListElement, castToHTMLOListElement, gTypeHTMLOListElement
, HTMLObjectElement(HTMLObjectElement), unHTMLObjectElement, castToHTMLObjectElement, gTypeHTMLObjectElement
, HTMLOptGroupElement(HTMLOptGroupElement), unHTMLOptGroupElement, castToHTMLOptGroupElement, gTypeHTMLOptGroupElement
, HTMLOptionElement(HTMLOptionElement), unHTMLOptionElement, castToHTMLOptionElement, gTypeHTMLOptionElement
, HTMLOptionsCollection(HTMLOptionsCollection), unHTMLOptionsCollection, castToHTMLOptionsCollection, gTypeHTMLOptionsCollection
, HTMLOutputElement(HTMLOutputElement), unHTMLOutputElement, castToHTMLOutputElement, gTypeHTMLOutputElement
, HTMLParagraphElement(HTMLParagraphElement), unHTMLParagraphElement, castToHTMLParagraphElement, gTypeHTMLParagraphElement
, HTMLParamElement(HTMLParamElement), unHTMLParamElement, castToHTMLParamElement, gTypeHTMLParamElement
, HTMLPreElement(HTMLPreElement), unHTMLPreElement, castToHTMLPreElement, gTypeHTMLPreElement
, HTMLProgressElement(HTMLProgressElement), unHTMLProgressElement, castToHTMLProgressElement, gTypeHTMLProgressElement
, HTMLQuoteElement(HTMLQuoteElement), unHTMLQuoteElement, castToHTMLQuoteElement, gTypeHTMLQuoteElement
, HTMLScriptElement(HTMLScriptElement), unHTMLScriptElement, castToHTMLScriptElement, gTypeHTMLScriptElement
, HTMLSelectElement(HTMLSelectElement), unHTMLSelectElement, castToHTMLSelectElement, gTypeHTMLSelectElement
, HTMLSourceElement(HTMLSourceElement), unHTMLSourceElement, castToHTMLSourceElement, gTypeHTMLSourceElement
, HTMLSpanElement(HTMLSpanElement), unHTMLSpanElement, castToHTMLSpanElement, gTypeHTMLSpanElement
, HTMLStyleElement(HTMLStyleElement), unHTMLStyleElement, castToHTMLStyleElement, gTypeHTMLStyleElement
, HTMLTableCaptionElement(HTMLTableCaptionElement), unHTMLTableCaptionElement, castToHTMLTableCaptionElement, gTypeHTMLTableCaptionElement
, HTMLTableCellElement(HTMLTableCellElement), unHTMLTableCellElement, castToHTMLTableCellElement, gTypeHTMLTableCellElement
, HTMLTableColElement(HTMLTableColElement), unHTMLTableColElement, castToHTMLTableColElement, gTypeHTMLTableColElement
, HTMLTableElement(HTMLTableElement), unHTMLTableElement, castToHTMLTableElement, gTypeHTMLTableElement
, HTMLTableRowElement(HTMLTableRowElement), unHTMLTableRowElement, castToHTMLTableRowElement, gTypeHTMLTableRowElement
, HTMLTableSectionElement(HTMLTableSectionElement), unHTMLTableSectionElement, castToHTMLTableSectionElement, gTypeHTMLTableSectionElement
, HTMLTemplateElement(HTMLTemplateElement), unHTMLTemplateElement, castToHTMLTemplateElement, gTypeHTMLTemplateElement
, HTMLTextAreaElement(HTMLTextAreaElement), unHTMLTextAreaElement, castToHTMLTextAreaElement, gTypeHTMLTextAreaElement
, HTMLTitleElement(HTMLTitleElement), unHTMLTitleElement, castToHTMLTitleElement, gTypeHTMLTitleElement
, HTMLTrackElement(HTMLTrackElement), unHTMLTrackElement, castToHTMLTrackElement, gTypeHTMLTrackElement
, HTMLUListElement(HTMLUListElement), unHTMLUListElement, castToHTMLUListElement, gTypeHTMLUListElement
, HTMLUnknownElement(HTMLUnknownElement), unHTMLUnknownElement, castToHTMLUnknownElement, gTypeHTMLUnknownElement
, HTMLVideoElement(HTMLVideoElement), unHTMLVideoElement, castToHTMLVideoElement, gTypeHTMLVideoElement
, HashChangeEvent(HashChangeEvent), unHashChangeEvent, castToHashChangeEvent, gTypeHashChangeEvent
, History(History), unHistory, castToHistory, gTypeHistory
, IDBAny(IDBAny), unIDBAny, castToIDBAny, gTypeIDBAny
, IDBCursor(IDBCursor), unIDBCursor, IsIDBCursor, toIDBCursor, castToIDBCursor, gTypeIDBCursor
, IDBCursorWithValue(IDBCursorWithValue), unIDBCursorWithValue, castToIDBCursorWithValue, gTypeIDBCursorWithValue
, IDBDatabase(IDBDatabase), unIDBDatabase, castToIDBDatabase, gTypeIDBDatabase
, IDBFactory(IDBFactory), unIDBFactory, castToIDBFactory, gTypeIDBFactory
, IDBIndex(IDBIndex), unIDBIndex, castToIDBIndex, gTypeIDBIndex
, IDBKeyRange(IDBKeyRange), unIDBKeyRange, castToIDBKeyRange, gTypeIDBKeyRange
, IDBObjectStore(IDBObjectStore), unIDBObjectStore, castToIDBObjectStore, gTypeIDBObjectStore
, IDBOpenDBRequest(IDBOpenDBRequest), unIDBOpenDBRequest, castToIDBOpenDBRequest, gTypeIDBOpenDBRequest
, IDBRequest(IDBRequest), unIDBRequest, IsIDBRequest, toIDBRequest, castToIDBRequest, gTypeIDBRequest
, IDBTransaction(IDBTransaction), unIDBTransaction, castToIDBTransaction, gTypeIDBTransaction
, IDBVersionChangeEvent(IDBVersionChangeEvent), unIDBVersionChangeEvent, castToIDBVersionChangeEvent, gTypeIDBVersionChangeEvent
, ImageData(ImageData), unImageData, castToImageData, gTypeImageData
, InspectorFrontendHost(InspectorFrontendHost), unInspectorFrontendHost, castToInspectorFrontendHost, gTypeInspectorFrontendHost
, InternalSettings(InternalSettings), unInternalSettings, castToInternalSettings, gTypeInternalSettings
, Internals(Internals), unInternals, castToInternals, gTypeInternals
, KeyboardEvent(KeyboardEvent), unKeyboardEvent, castToKeyboardEvent, gTypeKeyboardEvent
, Location(Location), unLocation, castToLocation, gTypeLocation
, MallocStatistics(MallocStatistics), unMallocStatistics, castToMallocStatistics, gTypeMallocStatistics
, MediaController(MediaController), unMediaController, castToMediaController, gTypeMediaController
, MediaControlsHost(MediaControlsHost), unMediaControlsHost, castToMediaControlsHost, gTypeMediaControlsHost
, MediaElementAudioSourceNode(MediaElementAudioSourceNode), unMediaElementAudioSourceNode, castToMediaElementAudioSourceNode, gTypeMediaElementAudioSourceNode
, MediaError(MediaError), unMediaError, castToMediaError, gTypeMediaError
, MediaKeyError(MediaKeyError), unMediaKeyError, castToMediaKeyError, gTypeMediaKeyError
, MediaKeyEvent(MediaKeyEvent), unMediaKeyEvent, castToMediaKeyEvent, gTypeMediaKeyEvent
, MediaKeyMessageEvent(MediaKeyMessageEvent), unMediaKeyMessageEvent, castToMediaKeyMessageEvent, gTypeMediaKeyMessageEvent
, MediaKeyNeededEvent(MediaKeyNeededEvent), unMediaKeyNeededEvent, castToMediaKeyNeededEvent, gTypeMediaKeyNeededEvent
, MediaKeySession(MediaKeySession), unMediaKeySession, castToMediaKeySession, gTypeMediaKeySession
, MediaKeys(MediaKeys), unMediaKeys, castToMediaKeys, gTypeMediaKeys
, MediaList(MediaList), unMediaList, castToMediaList, gTypeMediaList
, MediaQueryList(MediaQueryList), unMediaQueryList, castToMediaQueryList, gTypeMediaQueryList
, MediaSource(MediaSource), unMediaSource, castToMediaSource, gTypeMediaSource
, MediaSourceStates(MediaSourceStates), unMediaSourceStates, castToMediaSourceStates, gTypeMediaSourceStates
, MediaStream(MediaStream), unMediaStream, castToMediaStream, gTypeMediaStream
, MediaStreamAudioDestinationNode(MediaStreamAudioDestinationNode), unMediaStreamAudioDestinationNode, castToMediaStreamAudioDestinationNode, gTypeMediaStreamAudioDestinationNode
, MediaStreamAudioSourceNode(MediaStreamAudioSourceNode), unMediaStreamAudioSourceNode, castToMediaStreamAudioSourceNode, gTypeMediaStreamAudioSourceNode
, MediaStreamCapabilities(MediaStreamCapabilities), unMediaStreamCapabilities, IsMediaStreamCapabilities, toMediaStreamCapabilities, castToMediaStreamCapabilities, gTypeMediaStreamCapabilities
, MediaStreamEvent(MediaStreamEvent), unMediaStreamEvent, castToMediaStreamEvent, gTypeMediaStreamEvent
, MediaStreamTrack(MediaStreamTrack), unMediaStreamTrack, IsMediaStreamTrack, toMediaStreamTrack, castToMediaStreamTrack, gTypeMediaStreamTrack
, MediaStreamTrackEvent(MediaStreamTrackEvent), unMediaStreamTrackEvent, castToMediaStreamTrackEvent, gTypeMediaStreamTrackEvent
, MediaTrackConstraint(MediaTrackConstraint), unMediaTrackConstraint, castToMediaTrackConstraint, gTypeMediaTrackConstraint
, MediaTrackConstraintSet(MediaTrackConstraintSet), unMediaTrackConstraintSet, castToMediaTrackConstraintSet, gTypeMediaTrackConstraintSet
, MediaTrackConstraints(MediaTrackConstraints), unMediaTrackConstraints, castToMediaTrackConstraints, gTypeMediaTrackConstraints
, MemoryInfo(MemoryInfo), unMemoryInfo, castToMemoryInfo, gTypeMemoryInfo
, MessageChannel(MessageChannel), unMessageChannel, castToMessageChannel, gTypeMessageChannel
, MessageEvent(MessageEvent), unMessageEvent, castToMessageEvent, gTypeMessageEvent
, MessagePort(MessagePort), unMessagePort, castToMessagePort, gTypeMessagePort
, MimeType(MimeType), unMimeType, castToMimeType, gTypeMimeType
, MimeTypeArray(MimeTypeArray), unMimeTypeArray, castToMimeTypeArray, gTypeMimeTypeArray
, MouseEvent(MouseEvent), unMouseEvent, IsMouseEvent, toMouseEvent, castToMouseEvent, gTypeMouseEvent
, MutationEvent(MutationEvent), unMutationEvent, castToMutationEvent, gTypeMutationEvent
, MutationObserver(MutationObserver), unMutationObserver, castToMutationObserver, gTypeMutationObserver
, MutationRecord(MutationRecord), unMutationRecord, castToMutationRecord, gTypeMutationRecord
, NamedNodeMap(NamedNodeMap), unNamedNodeMap, castToNamedNodeMap, gTypeNamedNodeMap
, Navigator(Navigator), unNavigator, castToNavigator, gTypeNavigator
, NavigatorUserMediaError(NavigatorUserMediaError), unNavigatorUserMediaError, castToNavigatorUserMediaError, gTypeNavigatorUserMediaError
, Node(Node), unNode, IsNode, toNode, castToNode, gTypeNode
, NodeFilter(NodeFilter), unNodeFilter, castToNodeFilter, gTypeNodeFilter
, NodeIterator(NodeIterator), unNodeIterator, castToNodeIterator, gTypeNodeIterator
, NodeList(NodeList), unNodeList, IsNodeList, toNodeList, castToNodeList, gTypeNodeList
, Notification(Notification), unNotification, castToNotification, gTypeNotification
, NotificationCenter(NotificationCenter), unNotificationCenter, castToNotificationCenter, gTypeNotificationCenter
, OESElementIndexUint(OESElementIndexUint), unOESElementIndexUint, castToOESElementIndexUint, gTypeOESElementIndexUint
, OESStandardDerivatives(OESStandardDerivatives), unOESStandardDerivatives, castToOESStandardDerivatives, gTypeOESStandardDerivatives
, OESTextureFloat(OESTextureFloat), unOESTextureFloat, castToOESTextureFloat, gTypeOESTextureFloat
, OESTextureFloatLinear(OESTextureFloatLinear), unOESTextureFloatLinear, castToOESTextureFloatLinear, gTypeOESTextureFloatLinear
, OESTextureHalfFloat(OESTextureHalfFloat), unOESTextureHalfFloat, castToOESTextureHalfFloat, gTypeOESTextureHalfFloat
, OESTextureHalfFloatLinear(OESTextureHalfFloatLinear), unOESTextureHalfFloatLinear, castToOESTextureHalfFloatLinear, gTypeOESTextureHalfFloatLinear
, OESVertexArrayObject(OESVertexArrayObject), unOESVertexArrayObject, castToOESVertexArrayObject, gTypeOESVertexArrayObject
, OfflineAudioCompletionEvent(OfflineAudioCompletionEvent), unOfflineAudioCompletionEvent, castToOfflineAudioCompletionEvent, gTypeOfflineAudioCompletionEvent
, OfflineAudioContext(OfflineAudioContext), unOfflineAudioContext, castToOfflineAudioContext, gTypeOfflineAudioContext
, OscillatorNode(OscillatorNode), unOscillatorNode, castToOscillatorNode, gTypeOscillatorNode
, OverflowEvent(OverflowEvent), unOverflowEvent, castToOverflowEvent, gTypeOverflowEvent
, PageTransitionEvent(PageTransitionEvent), unPageTransitionEvent, castToPageTransitionEvent, gTypePageTransitionEvent
, PannerNode(PannerNode), unPannerNode, castToPannerNode, gTypePannerNode
, Path2D(Path2D), unPath2D, castToPath2D, gTypePath2D
, Performance(Performance), unPerformance, castToPerformance, gTypePerformance
, PerformanceEntry(PerformanceEntry), unPerformanceEntry, IsPerformanceEntry, toPerformanceEntry, castToPerformanceEntry, gTypePerformanceEntry
, PerformanceEntryList(PerformanceEntryList), unPerformanceEntryList, castToPerformanceEntryList, gTypePerformanceEntryList
, PerformanceMark(PerformanceMark), unPerformanceMark, castToPerformanceMark, gTypePerformanceMark
, PerformanceMeasure(PerformanceMeasure), unPerformanceMeasure, castToPerformanceMeasure, gTypePerformanceMeasure
, PerformanceNavigation(PerformanceNavigation), unPerformanceNavigation, castToPerformanceNavigation, gTypePerformanceNavigation
, PerformanceResourceTiming(PerformanceResourceTiming), unPerformanceResourceTiming, castToPerformanceResourceTiming, gTypePerformanceResourceTiming
, PerformanceTiming(PerformanceTiming), unPerformanceTiming, castToPerformanceTiming, gTypePerformanceTiming
, PeriodicWave(PeriodicWave), unPeriodicWave, castToPeriodicWave, gTypePeriodicWave
, Plugin(Plugin), unPlugin, castToPlugin, gTypePlugin
, PluginArray(PluginArray), unPluginArray, castToPluginArray, gTypePluginArray
, PopStateEvent(PopStateEvent), unPopStateEvent, castToPopStateEvent, gTypePopStateEvent
, PositionError(PositionError), unPositionError, castToPositionError, gTypePositionError
, ProcessingInstruction(ProcessingInstruction), unProcessingInstruction, castToProcessingInstruction, gTypeProcessingInstruction
, ProgressEvent(ProgressEvent), unProgressEvent, IsProgressEvent, toProgressEvent, castToProgressEvent, gTypeProgressEvent
, QuickTimePluginReplacement(QuickTimePluginReplacement), unQuickTimePluginReplacement, castToQuickTimePluginReplacement, gTypeQuickTimePluginReplacement
, RGBColor(RGBColor), unRGBColor, castToRGBColor, gTypeRGBColor
, RTCConfiguration(RTCConfiguration), unRTCConfiguration, castToRTCConfiguration, gTypeRTCConfiguration
, RTCDTMFSender(RTCDTMFSender), unRTCDTMFSender, castToRTCDTMFSender, gTypeRTCDTMFSender
, RTCDTMFToneChangeEvent(RTCDTMFToneChangeEvent), unRTCDTMFToneChangeEvent, castToRTCDTMFToneChangeEvent, gTypeRTCDTMFToneChangeEvent
, RTCDataChannel(RTCDataChannel), unRTCDataChannel, castToRTCDataChannel, gTypeRTCDataChannel
, RTCDataChannelEvent(RTCDataChannelEvent), unRTCDataChannelEvent, castToRTCDataChannelEvent, gTypeRTCDataChannelEvent
, RTCIceCandidate(RTCIceCandidate), unRTCIceCandidate, castToRTCIceCandidate, gTypeRTCIceCandidate
, RTCIceCandidateEvent(RTCIceCandidateEvent), unRTCIceCandidateEvent, castToRTCIceCandidateEvent, gTypeRTCIceCandidateEvent
, RTCIceServer(RTCIceServer), unRTCIceServer, castToRTCIceServer, gTypeRTCIceServer
, RTCPeerConnection(RTCPeerConnection), unRTCPeerConnection, castToRTCPeerConnection, gTypeRTCPeerConnection
, RTCSessionDescription(RTCSessionDescription), unRTCSessionDescription, castToRTCSessionDescription, gTypeRTCSessionDescription
, RTCStatsReport(RTCStatsReport), unRTCStatsReport, castToRTCStatsReport, gTypeRTCStatsReport
, RTCStatsResponse(RTCStatsResponse), unRTCStatsResponse, castToRTCStatsResponse, gTypeRTCStatsResponse
, RadioNodeList(RadioNodeList), unRadioNodeList, castToRadioNodeList, gTypeRadioNodeList
, Range(Range), unRange, castToRange, gTypeRange
, ReadableStream(ReadableStream), unReadableStream, castToReadableStream, gTypeReadableStream
, Rect(Rect), unRect, castToRect, gTypeRect
, SQLError(SQLError), unSQLError, castToSQLError, gTypeSQLError
, SQLResultSet(SQLResultSet), unSQLResultSet, castToSQLResultSet, gTypeSQLResultSet
, SQLResultSetRowList(SQLResultSetRowList), unSQLResultSetRowList, castToSQLResultSetRowList, gTypeSQLResultSetRowList
, SQLTransaction(SQLTransaction), unSQLTransaction, castToSQLTransaction, gTypeSQLTransaction
, SVGAElement(SVGAElement), unSVGAElement, castToSVGAElement, gTypeSVGAElement
, SVGAltGlyphDefElement(SVGAltGlyphDefElement), unSVGAltGlyphDefElement, castToSVGAltGlyphDefElement, gTypeSVGAltGlyphDefElement
, SVGAltGlyphElement(SVGAltGlyphElement), unSVGAltGlyphElement, castToSVGAltGlyphElement, gTypeSVGAltGlyphElement
, SVGAltGlyphItemElement(SVGAltGlyphItemElement), unSVGAltGlyphItemElement, castToSVGAltGlyphItemElement, gTypeSVGAltGlyphItemElement
, SVGAngle(SVGAngle), unSVGAngle, castToSVGAngle, gTypeSVGAngle
, SVGAnimateColorElement(SVGAnimateColorElement), unSVGAnimateColorElement, castToSVGAnimateColorElement, gTypeSVGAnimateColorElement
, SVGAnimateElement(SVGAnimateElement), unSVGAnimateElement, castToSVGAnimateElement, gTypeSVGAnimateElement
, SVGAnimateMotionElement(SVGAnimateMotionElement), unSVGAnimateMotionElement, castToSVGAnimateMotionElement, gTypeSVGAnimateMotionElement
, SVGAnimateTransformElement(SVGAnimateTransformElement), unSVGAnimateTransformElement, castToSVGAnimateTransformElement, gTypeSVGAnimateTransformElement
, SVGAnimatedAngle(SVGAnimatedAngle), unSVGAnimatedAngle, castToSVGAnimatedAngle, gTypeSVGAnimatedAngle
, SVGAnimatedBoolean(SVGAnimatedBoolean), unSVGAnimatedBoolean, castToSVGAnimatedBoolean, gTypeSVGAnimatedBoolean
, SVGAnimatedEnumeration(SVGAnimatedEnumeration), unSVGAnimatedEnumeration, castToSVGAnimatedEnumeration, gTypeSVGAnimatedEnumeration
, SVGAnimatedInteger(SVGAnimatedInteger), unSVGAnimatedInteger, castToSVGAnimatedInteger, gTypeSVGAnimatedInteger
, SVGAnimatedLength(SVGAnimatedLength), unSVGAnimatedLength, castToSVGAnimatedLength, gTypeSVGAnimatedLength
, SVGAnimatedLengthList(SVGAnimatedLengthList), unSVGAnimatedLengthList, castToSVGAnimatedLengthList, gTypeSVGAnimatedLengthList
, SVGAnimatedNumber(SVGAnimatedNumber), unSVGAnimatedNumber, castToSVGAnimatedNumber, gTypeSVGAnimatedNumber
, SVGAnimatedNumberList(SVGAnimatedNumberList), unSVGAnimatedNumberList, castToSVGAnimatedNumberList, gTypeSVGAnimatedNumberList
, SVGAnimatedPreserveAspectRatio(SVGAnimatedPreserveAspectRatio), unSVGAnimatedPreserveAspectRatio, castToSVGAnimatedPreserveAspectRatio, gTypeSVGAnimatedPreserveAspectRatio
, SVGAnimatedRect(SVGAnimatedRect), unSVGAnimatedRect, castToSVGAnimatedRect, gTypeSVGAnimatedRect
, SVGAnimatedString(SVGAnimatedString), unSVGAnimatedString, castToSVGAnimatedString, gTypeSVGAnimatedString
, SVGAnimatedTransformList(SVGAnimatedTransformList), unSVGAnimatedTransformList, castToSVGAnimatedTransformList, gTypeSVGAnimatedTransformList
, SVGAnimationElement(SVGAnimationElement), unSVGAnimationElement, IsSVGAnimationElement, toSVGAnimationElement, castToSVGAnimationElement, gTypeSVGAnimationElement
, SVGCircleElement(SVGCircleElement), unSVGCircleElement, castToSVGCircleElement, gTypeSVGCircleElement
, SVGClipPathElement(SVGClipPathElement), unSVGClipPathElement, castToSVGClipPathElement, gTypeSVGClipPathElement
, SVGColor(SVGColor), unSVGColor, IsSVGColor, toSVGColor, castToSVGColor, gTypeSVGColor
, SVGComponentTransferFunctionElement(SVGComponentTransferFunctionElement), unSVGComponentTransferFunctionElement, IsSVGComponentTransferFunctionElement, toSVGComponentTransferFunctionElement, castToSVGComponentTransferFunctionElement, gTypeSVGComponentTransferFunctionElement
, SVGCursorElement(SVGCursorElement), unSVGCursorElement, castToSVGCursorElement, gTypeSVGCursorElement
, SVGDefsElement(SVGDefsElement), unSVGDefsElement, castToSVGDefsElement, gTypeSVGDefsElement
, SVGDescElement(SVGDescElement), unSVGDescElement, castToSVGDescElement, gTypeSVGDescElement
, SVGDocument(SVGDocument), unSVGDocument, castToSVGDocument, gTypeSVGDocument
, SVGElement(SVGElement), unSVGElement, IsSVGElement, toSVGElement, castToSVGElement, gTypeSVGElement
, SVGEllipseElement(SVGEllipseElement), unSVGEllipseElement, castToSVGEllipseElement, gTypeSVGEllipseElement
, SVGExternalResourcesRequired(SVGExternalResourcesRequired), unSVGExternalResourcesRequired, castToSVGExternalResourcesRequired, gTypeSVGExternalResourcesRequired
, SVGFEBlendElement(SVGFEBlendElement), unSVGFEBlendElement, castToSVGFEBlendElement, gTypeSVGFEBlendElement
, SVGFEColorMatrixElement(SVGFEColorMatrixElement), unSVGFEColorMatrixElement, castToSVGFEColorMatrixElement, gTypeSVGFEColorMatrixElement
, SVGFEComponentTransferElement(SVGFEComponentTransferElement), unSVGFEComponentTransferElement, castToSVGFEComponentTransferElement, gTypeSVGFEComponentTransferElement
, SVGFECompositeElement(SVGFECompositeElement), unSVGFECompositeElement, castToSVGFECompositeElement, gTypeSVGFECompositeElement
, SVGFEConvolveMatrixElement(SVGFEConvolveMatrixElement), unSVGFEConvolveMatrixElement, castToSVGFEConvolveMatrixElement, gTypeSVGFEConvolveMatrixElement
, SVGFEDiffuseLightingElement(SVGFEDiffuseLightingElement), unSVGFEDiffuseLightingElement, castToSVGFEDiffuseLightingElement, gTypeSVGFEDiffuseLightingElement
, SVGFEDisplacementMapElement(SVGFEDisplacementMapElement), unSVGFEDisplacementMapElement, castToSVGFEDisplacementMapElement, gTypeSVGFEDisplacementMapElement
, SVGFEDistantLightElement(SVGFEDistantLightElement), unSVGFEDistantLightElement, castToSVGFEDistantLightElement, gTypeSVGFEDistantLightElement
, SVGFEDropShadowElement(SVGFEDropShadowElement), unSVGFEDropShadowElement, castToSVGFEDropShadowElement, gTypeSVGFEDropShadowElement
, SVGFEFloodElement(SVGFEFloodElement), unSVGFEFloodElement, castToSVGFEFloodElement, gTypeSVGFEFloodElement
, SVGFEFuncAElement(SVGFEFuncAElement), unSVGFEFuncAElement, castToSVGFEFuncAElement, gTypeSVGFEFuncAElement
, SVGFEFuncBElement(SVGFEFuncBElement), unSVGFEFuncBElement, castToSVGFEFuncBElement, gTypeSVGFEFuncBElement
, SVGFEFuncGElement(SVGFEFuncGElement), unSVGFEFuncGElement, castToSVGFEFuncGElement, gTypeSVGFEFuncGElement
, SVGFEFuncRElement(SVGFEFuncRElement), unSVGFEFuncRElement, castToSVGFEFuncRElement, gTypeSVGFEFuncRElement
, SVGFEGaussianBlurElement(SVGFEGaussianBlurElement), unSVGFEGaussianBlurElement, castToSVGFEGaussianBlurElement, gTypeSVGFEGaussianBlurElement
, SVGFEImageElement(SVGFEImageElement), unSVGFEImageElement, castToSVGFEImageElement, gTypeSVGFEImageElement
, SVGFEMergeElement(SVGFEMergeElement), unSVGFEMergeElement, castToSVGFEMergeElement, gTypeSVGFEMergeElement
, SVGFEMergeNodeElement(SVGFEMergeNodeElement), unSVGFEMergeNodeElement, castToSVGFEMergeNodeElement, gTypeSVGFEMergeNodeElement
, SVGFEMorphologyElement(SVGFEMorphologyElement), unSVGFEMorphologyElement, castToSVGFEMorphologyElement, gTypeSVGFEMorphologyElement
, SVGFEOffsetElement(SVGFEOffsetElement), unSVGFEOffsetElement, castToSVGFEOffsetElement, gTypeSVGFEOffsetElement
, SVGFEPointLightElement(SVGFEPointLightElement), unSVGFEPointLightElement, castToSVGFEPointLightElement, gTypeSVGFEPointLightElement
, SVGFESpecularLightingElement(SVGFESpecularLightingElement), unSVGFESpecularLightingElement, castToSVGFESpecularLightingElement, gTypeSVGFESpecularLightingElement
, SVGFESpotLightElement(SVGFESpotLightElement), unSVGFESpotLightElement, castToSVGFESpotLightElement, gTypeSVGFESpotLightElement
, SVGFETileElement(SVGFETileElement), unSVGFETileElement, castToSVGFETileElement, gTypeSVGFETileElement
, SVGFETurbulenceElement(SVGFETurbulenceElement), unSVGFETurbulenceElement, castToSVGFETurbulenceElement, gTypeSVGFETurbulenceElement
, SVGFilterElement(SVGFilterElement), unSVGFilterElement, castToSVGFilterElement, gTypeSVGFilterElement
, SVGFilterPrimitiveStandardAttributes(SVGFilterPrimitiveStandardAttributes), unSVGFilterPrimitiveStandardAttributes, castToSVGFilterPrimitiveStandardAttributes, gTypeSVGFilterPrimitiveStandardAttributes
, SVGFitToViewBox(SVGFitToViewBox), unSVGFitToViewBox, castToSVGFitToViewBox, gTypeSVGFitToViewBox
, SVGFontElement(SVGFontElement), unSVGFontElement, castToSVGFontElement, gTypeSVGFontElement
, SVGFontFaceElement(SVGFontFaceElement), unSVGFontFaceElement, castToSVGFontFaceElement, gTypeSVGFontFaceElement
, SVGFontFaceFormatElement(SVGFontFaceFormatElement), unSVGFontFaceFormatElement, castToSVGFontFaceFormatElement, gTypeSVGFontFaceFormatElement
, SVGFontFaceNameElement(SVGFontFaceNameElement), unSVGFontFaceNameElement, castToSVGFontFaceNameElement, gTypeSVGFontFaceNameElement
, SVGFontFaceSrcElement(SVGFontFaceSrcElement), unSVGFontFaceSrcElement, castToSVGFontFaceSrcElement, gTypeSVGFontFaceSrcElement
, SVGFontFaceUriElement(SVGFontFaceUriElement), unSVGFontFaceUriElement, castToSVGFontFaceUriElement, gTypeSVGFontFaceUriElement
, SVGForeignObjectElement(SVGForeignObjectElement), unSVGForeignObjectElement, castToSVGForeignObjectElement, gTypeSVGForeignObjectElement
, SVGGElement(SVGGElement), unSVGGElement, castToSVGGElement, gTypeSVGGElement
, SVGGlyphElement(SVGGlyphElement), unSVGGlyphElement, castToSVGGlyphElement, gTypeSVGGlyphElement
, SVGGlyphRefElement(SVGGlyphRefElement), unSVGGlyphRefElement, castToSVGGlyphRefElement, gTypeSVGGlyphRefElement
, SVGGradientElement(SVGGradientElement), unSVGGradientElement, IsSVGGradientElement, toSVGGradientElement, castToSVGGradientElement, gTypeSVGGradientElement
, SVGGraphicsElement(SVGGraphicsElement), unSVGGraphicsElement, IsSVGGraphicsElement, toSVGGraphicsElement, castToSVGGraphicsElement, gTypeSVGGraphicsElement
, SVGHKernElement(SVGHKernElement), unSVGHKernElement, castToSVGHKernElement, gTypeSVGHKernElement
, SVGImageElement(SVGImageElement), unSVGImageElement, castToSVGImageElement, gTypeSVGImageElement
, SVGLength(SVGLength), unSVGLength, castToSVGLength, gTypeSVGLength
, SVGLengthList(SVGLengthList), unSVGLengthList, castToSVGLengthList, gTypeSVGLengthList
, SVGLineElement(SVGLineElement), unSVGLineElement, castToSVGLineElement, gTypeSVGLineElement
, SVGLinearGradientElement(SVGLinearGradientElement), unSVGLinearGradientElement, castToSVGLinearGradientElement, gTypeSVGLinearGradientElement
, SVGMPathElement(SVGMPathElement), unSVGMPathElement, castToSVGMPathElement, gTypeSVGMPathElement
, SVGMarkerElement(SVGMarkerElement), unSVGMarkerElement, castToSVGMarkerElement, gTypeSVGMarkerElement
, SVGMaskElement(SVGMaskElement), unSVGMaskElement, castToSVGMaskElement, gTypeSVGMaskElement
, SVGMatrix(SVGMatrix), unSVGMatrix, castToSVGMatrix, gTypeSVGMatrix
, SVGMetadataElement(SVGMetadataElement), unSVGMetadataElement, castToSVGMetadataElement, gTypeSVGMetadataElement
, SVGMissingGlyphElement(SVGMissingGlyphElement), unSVGMissingGlyphElement, castToSVGMissingGlyphElement, gTypeSVGMissingGlyphElement
, SVGNumber(SVGNumber), unSVGNumber, castToSVGNumber, gTypeSVGNumber
, SVGNumberList(SVGNumberList), unSVGNumberList, castToSVGNumberList, gTypeSVGNumberList
, SVGPaint(SVGPaint), unSVGPaint, castToSVGPaint, gTypeSVGPaint
, SVGPathElement(SVGPathElement), unSVGPathElement, castToSVGPathElement, gTypeSVGPathElement
, SVGPathSeg(SVGPathSeg), unSVGPathSeg, IsSVGPathSeg, toSVGPathSeg, castToSVGPathSeg, gTypeSVGPathSeg
, SVGPathSegArcAbs(SVGPathSegArcAbs), unSVGPathSegArcAbs, castToSVGPathSegArcAbs, gTypeSVGPathSegArcAbs
, SVGPathSegArcRel(SVGPathSegArcRel), unSVGPathSegArcRel, castToSVGPathSegArcRel, gTypeSVGPathSegArcRel
, SVGPathSegClosePath(SVGPathSegClosePath), unSVGPathSegClosePath, castToSVGPathSegClosePath, gTypeSVGPathSegClosePath
, SVGPathSegCurvetoCubicAbs(SVGPathSegCurvetoCubicAbs), unSVGPathSegCurvetoCubicAbs, castToSVGPathSegCurvetoCubicAbs, gTypeSVGPathSegCurvetoCubicAbs
, SVGPathSegCurvetoCubicRel(SVGPathSegCurvetoCubicRel), unSVGPathSegCurvetoCubicRel, castToSVGPathSegCurvetoCubicRel, gTypeSVGPathSegCurvetoCubicRel
, SVGPathSegCurvetoCubicSmoothAbs(SVGPathSegCurvetoCubicSmoothAbs), unSVGPathSegCurvetoCubicSmoothAbs, castToSVGPathSegCurvetoCubicSmoothAbs, gTypeSVGPathSegCurvetoCubicSmoothAbs
, SVGPathSegCurvetoCubicSmoothRel(SVGPathSegCurvetoCubicSmoothRel), unSVGPathSegCurvetoCubicSmoothRel, castToSVGPathSegCurvetoCubicSmoothRel, gTypeSVGPathSegCurvetoCubicSmoothRel
, SVGPathSegCurvetoQuadraticAbs(SVGPathSegCurvetoQuadraticAbs), unSVGPathSegCurvetoQuadraticAbs, castToSVGPathSegCurvetoQuadraticAbs, gTypeSVGPathSegCurvetoQuadraticAbs
, SVGPathSegCurvetoQuadraticRel(SVGPathSegCurvetoQuadraticRel), unSVGPathSegCurvetoQuadraticRel, castToSVGPathSegCurvetoQuadraticRel, gTypeSVGPathSegCurvetoQuadraticRel
, SVGPathSegCurvetoQuadraticSmoothAbs(SVGPathSegCurvetoQuadraticSmoothAbs), unSVGPathSegCurvetoQuadraticSmoothAbs, castToSVGPathSegCurvetoQuadraticSmoothAbs, gTypeSVGPathSegCurvetoQuadraticSmoothAbs
, SVGPathSegCurvetoQuadraticSmoothRel(SVGPathSegCurvetoQuadraticSmoothRel), unSVGPathSegCurvetoQuadraticSmoothRel, castToSVGPathSegCurvetoQuadraticSmoothRel, gTypeSVGPathSegCurvetoQuadraticSmoothRel
, SVGPathSegLinetoAbs(SVGPathSegLinetoAbs), unSVGPathSegLinetoAbs, castToSVGPathSegLinetoAbs, gTypeSVGPathSegLinetoAbs
, SVGPathSegLinetoHorizontalAbs(SVGPathSegLinetoHorizontalAbs), unSVGPathSegLinetoHorizontalAbs, castToSVGPathSegLinetoHorizontalAbs, gTypeSVGPathSegLinetoHorizontalAbs
, SVGPathSegLinetoHorizontalRel(SVGPathSegLinetoHorizontalRel), unSVGPathSegLinetoHorizontalRel, castToSVGPathSegLinetoHorizontalRel, gTypeSVGPathSegLinetoHorizontalRel
, SVGPathSegLinetoRel(SVGPathSegLinetoRel), unSVGPathSegLinetoRel, castToSVGPathSegLinetoRel, gTypeSVGPathSegLinetoRel
, SVGPathSegLinetoVerticalAbs(SVGPathSegLinetoVerticalAbs), unSVGPathSegLinetoVerticalAbs, castToSVGPathSegLinetoVerticalAbs, gTypeSVGPathSegLinetoVerticalAbs
, SVGPathSegLinetoVerticalRel(SVGPathSegLinetoVerticalRel), unSVGPathSegLinetoVerticalRel, castToSVGPathSegLinetoVerticalRel, gTypeSVGPathSegLinetoVerticalRel
, SVGPathSegList(SVGPathSegList), unSVGPathSegList, castToSVGPathSegList, gTypeSVGPathSegList
, SVGPathSegMovetoAbs(SVGPathSegMovetoAbs), unSVGPathSegMovetoAbs, castToSVGPathSegMovetoAbs, gTypeSVGPathSegMovetoAbs
, SVGPathSegMovetoRel(SVGPathSegMovetoRel), unSVGPathSegMovetoRel, castToSVGPathSegMovetoRel, gTypeSVGPathSegMovetoRel
, SVGPatternElement(SVGPatternElement), unSVGPatternElement, castToSVGPatternElement, gTypeSVGPatternElement
, SVGPoint(SVGPoint), unSVGPoint, castToSVGPoint, gTypeSVGPoint
, SVGPointList(SVGPointList), unSVGPointList, castToSVGPointList, gTypeSVGPointList
, SVGPolygonElement(SVGPolygonElement), unSVGPolygonElement, castToSVGPolygonElement, gTypeSVGPolygonElement
, SVGPolylineElement(SVGPolylineElement), unSVGPolylineElement, castToSVGPolylineElement, gTypeSVGPolylineElement
, SVGPreserveAspectRatio(SVGPreserveAspectRatio), unSVGPreserveAspectRatio, castToSVGPreserveAspectRatio, gTypeSVGPreserveAspectRatio
, SVGRadialGradientElement(SVGRadialGradientElement), unSVGRadialGradientElement, castToSVGRadialGradientElement, gTypeSVGRadialGradientElement
, SVGRect(SVGRect), unSVGRect, castToSVGRect, gTypeSVGRect
, SVGRectElement(SVGRectElement), unSVGRectElement, castToSVGRectElement, gTypeSVGRectElement
, SVGRenderingIntent(SVGRenderingIntent), unSVGRenderingIntent, castToSVGRenderingIntent, gTypeSVGRenderingIntent
, SVGSVGElement(SVGSVGElement), unSVGSVGElement, castToSVGSVGElement, gTypeSVGSVGElement
, SVGScriptElement(SVGScriptElement), unSVGScriptElement, castToSVGScriptElement, gTypeSVGScriptElement
, SVGSetElement(SVGSetElement), unSVGSetElement, castToSVGSetElement, gTypeSVGSetElement
, SVGStopElement(SVGStopElement), unSVGStopElement, castToSVGStopElement, gTypeSVGStopElement
, SVGStringList(SVGStringList), unSVGStringList, castToSVGStringList, gTypeSVGStringList
, SVGStyleElement(SVGStyleElement), unSVGStyleElement, castToSVGStyleElement, gTypeSVGStyleElement
, SVGSwitchElement(SVGSwitchElement), unSVGSwitchElement, castToSVGSwitchElement, gTypeSVGSwitchElement
, SVGSymbolElement(SVGSymbolElement), unSVGSymbolElement, castToSVGSymbolElement, gTypeSVGSymbolElement
, SVGTRefElement(SVGTRefElement), unSVGTRefElement, castToSVGTRefElement, gTypeSVGTRefElement
, SVGTSpanElement(SVGTSpanElement), unSVGTSpanElement, castToSVGTSpanElement, gTypeSVGTSpanElement
, SVGTests(SVGTests), unSVGTests, castToSVGTests, gTypeSVGTests
, SVGTextContentElement(SVGTextContentElement), unSVGTextContentElement, IsSVGTextContentElement, toSVGTextContentElement, castToSVGTextContentElement, gTypeSVGTextContentElement
, SVGTextElement(SVGTextElement), unSVGTextElement, castToSVGTextElement, gTypeSVGTextElement
, SVGTextPathElement(SVGTextPathElement), unSVGTextPathElement, castToSVGTextPathElement, gTypeSVGTextPathElement
, SVGTextPositioningElement(SVGTextPositioningElement), unSVGTextPositioningElement, IsSVGTextPositioningElement, toSVGTextPositioningElement, castToSVGTextPositioningElement, gTypeSVGTextPositioningElement
, SVGTitleElement(SVGTitleElement), unSVGTitleElement, castToSVGTitleElement, gTypeSVGTitleElement
, SVGTransform(SVGTransform), unSVGTransform, castToSVGTransform, gTypeSVGTransform
, SVGTransformList(SVGTransformList), unSVGTransformList, castToSVGTransformList, gTypeSVGTransformList
, SVGURIReference(SVGURIReference), unSVGURIReference, castToSVGURIReference, gTypeSVGURIReference
, SVGUnitTypes(SVGUnitTypes), unSVGUnitTypes, castToSVGUnitTypes, gTypeSVGUnitTypes
, SVGUseElement(SVGUseElement), unSVGUseElement, castToSVGUseElement, gTypeSVGUseElement
, SVGVKernElement(SVGVKernElement), unSVGVKernElement, castToSVGVKernElement, gTypeSVGVKernElement
, SVGViewElement(SVGViewElement), unSVGViewElement, castToSVGViewElement, gTypeSVGViewElement
, SVGViewSpec(SVGViewSpec), unSVGViewSpec, castToSVGViewSpec, gTypeSVGViewSpec
, SVGZoomAndPan(SVGZoomAndPan), unSVGZoomAndPan, castToSVGZoomAndPan, gTypeSVGZoomAndPan
, SVGZoomEvent(SVGZoomEvent), unSVGZoomEvent, castToSVGZoomEvent, gTypeSVGZoomEvent
, Screen(Screen), unScreen, castToScreen, gTypeScreen
, ScriptProcessorNode(ScriptProcessorNode), unScriptProcessorNode, castToScriptProcessorNode, gTypeScriptProcessorNode
, ScriptProfile(ScriptProfile), unScriptProfile, castToScriptProfile, gTypeScriptProfile
, ScriptProfileNode(ScriptProfileNode), unScriptProfileNode, castToScriptProfileNode, gTypeScriptProfileNode
, SecurityPolicy(SecurityPolicy), unSecurityPolicy, castToSecurityPolicy, gTypeSecurityPolicy
, SecurityPolicyViolationEvent(SecurityPolicyViolationEvent), unSecurityPolicyViolationEvent, castToSecurityPolicyViolationEvent, gTypeSecurityPolicyViolationEvent
, Selection(Selection), unSelection, castToSelection, gTypeSelection
, SourceBuffer(SourceBuffer), unSourceBuffer, castToSourceBuffer, gTypeSourceBuffer
, SourceBufferList(SourceBufferList), unSourceBufferList, castToSourceBufferList, gTypeSourceBufferList
, SourceInfo(SourceInfo), unSourceInfo, castToSourceInfo, gTypeSourceInfo
, SpeechSynthesis(SpeechSynthesis), unSpeechSynthesis, castToSpeechSynthesis, gTypeSpeechSynthesis
, SpeechSynthesisEvent(SpeechSynthesisEvent), unSpeechSynthesisEvent, castToSpeechSynthesisEvent, gTypeSpeechSynthesisEvent
, SpeechSynthesisUtterance(SpeechSynthesisUtterance), unSpeechSynthesisUtterance, castToSpeechSynthesisUtterance, gTypeSpeechSynthesisUtterance
, SpeechSynthesisVoice(SpeechSynthesisVoice), unSpeechSynthesisVoice, castToSpeechSynthesisVoice, gTypeSpeechSynthesisVoice
, Storage(Storage), unStorage, castToStorage, gTypeStorage
, StorageEvent(StorageEvent), unStorageEvent, castToStorageEvent, gTypeStorageEvent
, StorageInfo(StorageInfo), unStorageInfo, castToStorageInfo, gTypeStorageInfo
, StorageQuota(StorageQuota), unStorageQuota, castToStorageQuota, gTypeStorageQuota
, StyleMedia(StyleMedia), unStyleMedia, castToStyleMedia, gTypeStyleMedia
, StyleSheet(StyleSheet), unStyleSheet, IsStyleSheet, toStyleSheet, castToStyleSheet, gTypeStyleSheet
, StyleSheetList(StyleSheetList), unStyleSheetList, castToStyleSheetList, gTypeStyleSheetList
, SubtleCrypto(SubtleCrypto), unSubtleCrypto, castToSubtleCrypto, gTypeSubtleCrypto
, Text(Text), unText, IsText, toText, castToText, gTypeText
, TextEvent(TextEvent), unTextEvent, castToTextEvent, gTypeTextEvent
, TextMetrics(TextMetrics), unTextMetrics, castToTextMetrics, gTypeTextMetrics
, TextTrack(TextTrack), unTextTrack, castToTextTrack, gTypeTextTrack
, TextTrackCue(TextTrackCue), unTextTrackCue, IsTextTrackCue, toTextTrackCue, castToTextTrackCue, gTypeTextTrackCue
, TextTrackCueList(TextTrackCueList), unTextTrackCueList, castToTextTrackCueList, gTypeTextTrackCueList
, TextTrackList(TextTrackList), unTextTrackList, castToTextTrackList, gTypeTextTrackList
, TimeRanges(TimeRanges), unTimeRanges, castToTimeRanges, gTypeTimeRanges
, Touch(Touch), unTouch, castToTouch, gTypeTouch
, TouchEvent(TouchEvent), unTouchEvent, castToTouchEvent, gTypeTouchEvent
, TouchList(TouchList), unTouchList, castToTouchList, gTypeTouchList
, TrackEvent(TrackEvent), unTrackEvent, castToTrackEvent, gTypeTrackEvent
, TransitionEvent(TransitionEvent), unTransitionEvent, castToTransitionEvent, gTypeTransitionEvent
, TreeWalker(TreeWalker), unTreeWalker, castToTreeWalker, gTypeTreeWalker
, TypeConversions(TypeConversions), unTypeConversions, castToTypeConversions, gTypeTypeConversions
, UIEvent(UIEvent), unUIEvent, IsUIEvent, toUIEvent, castToUIEvent, gTypeUIEvent
, UIRequestEvent(UIRequestEvent), unUIRequestEvent, castToUIRequestEvent, gTypeUIRequestEvent
, URL(URL), unURL, castToURL, gTypeURL
, URLUtils(URLUtils), unURLUtils, castToURLUtils, gTypeURLUtils
, UserMessageHandler(UserMessageHandler), unUserMessageHandler, castToUserMessageHandler, gTypeUserMessageHandler
, UserMessageHandlersNamespace(UserMessageHandlersNamespace), unUserMessageHandlersNamespace, castToUserMessageHandlersNamespace, gTypeUserMessageHandlersNamespace
, VTTCue(VTTCue), unVTTCue, castToVTTCue, gTypeVTTCue
, VTTRegion(VTTRegion), unVTTRegion, castToVTTRegion, gTypeVTTRegion
, VTTRegionList(VTTRegionList), unVTTRegionList, castToVTTRegionList, gTypeVTTRegionList
, ValidityState(ValidityState), unValidityState, castToValidityState, gTypeValidityState
, VideoPlaybackQuality(VideoPlaybackQuality), unVideoPlaybackQuality, castToVideoPlaybackQuality, gTypeVideoPlaybackQuality
, VideoStreamTrack(VideoStreamTrack), unVideoStreamTrack, castToVideoStreamTrack, gTypeVideoStreamTrack
, VideoTrack(VideoTrack), unVideoTrack, castToVideoTrack, gTypeVideoTrack
, VideoTrackList(VideoTrackList), unVideoTrackList, castToVideoTrackList, gTypeVideoTrackList
, WaveShaperNode(WaveShaperNode), unWaveShaperNode, castToWaveShaperNode, gTypeWaveShaperNode
, WebGL2RenderingContext(WebGL2RenderingContext), unWebGL2RenderingContext, castToWebGL2RenderingContext, gTypeWebGL2RenderingContext
, WebGLActiveInfo(WebGLActiveInfo), unWebGLActiveInfo, castToWebGLActiveInfo, gTypeWebGLActiveInfo
, WebGLBuffer(WebGLBuffer), unWebGLBuffer, castToWebGLBuffer, gTypeWebGLBuffer
, WebGLCompressedTextureATC(WebGLCompressedTextureATC), unWebGLCompressedTextureATC, castToWebGLCompressedTextureATC, gTypeWebGLCompressedTextureATC
, WebGLCompressedTexturePVRTC(WebGLCompressedTexturePVRTC), unWebGLCompressedTexturePVRTC, castToWebGLCompressedTexturePVRTC, gTypeWebGLCompressedTexturePVRTC
, WebGLCompressedTextureS3TC(WebGLCompressedTextureS3TC), unWebGLCompressedTextureS3TC, castToWebGLCompressedTextureS3TC, gTypeWebGLCompressedTextureS3TC
, WebGLContextAttributes(WebGLContextAttributes), unWebGLContextAttributes, castToWebGLContextAttributes, gTypeWebGLContextAttributes
, WebGLContextEvent(WebGLContextEvent), unWebGLContextEvent, castToWebGLContextEvent, gTypeWebGLContextEvent
, WebGLDebugRendererInfo(WebGLDebugRendererInfo), unWebGLDebugRendererInfo, castToWebGLDebugRendererInfo, gTypeWebGLDebugRendererInfo
, WebGLDebugShaders(WebGLDebugShaders), unWebGLDebugShaders, castToWebGLDebugShaders, gTypeWebGLDebugShaders
, WebGLDepthTexture(WebGLDepthTexture), unWebGLDepthTexture, castToWebGLDepthTexture, gTypeWebGLDepthTexture
, WebGLDrawBuffers(WebGLDrawBuffers), unWebGLDrawBuffers, castToWebGLDrawBuffers, gTypeWebGLDrawBuffers
, WebGLFramebuffer(WebGLFramebuffer), unWebGLFramebuffer, castToWebGLFramebuffer, gTypeWebGLFramebuffer
, WebGLLoseContext(WebGLLoseContext), unWebGLLoseContext, castToWebGLLoseContext, gTypeWebGLLoseContext
, WebGLProgram(WebGLProgram), unWebGLProgram, castToWebGLProgram, gTypeWebGLProgram
, WebGLQuery(WebGLQuery), unWebGLQuery, castToWebGLQuery, gTypeWebGLQuery
, WebGLRenderbuffer(WebGLRenderbuffer), unWebGLRenderbuffer, castToWebGLRenderbuffer, gTypeWebGLRenderbuffer
, WebGLRenderingContext(WebGLRenderingContext), unWebGLRenderingContext, castToWebGLRenderingContext, gTypeWebGLRenderingContext
, WebGLRenderingContextBase(WebGLRenderingContextBase), unWebGLRenderingContextBase, IsWebGLRenderingContextBase, toWebGLRenderingContextBase, castToWebGLRenderingContextBase, gTypeWebGLRenderingContextBase
, WebGLSampler(WebGLSampler), unWebGLSampler, castToWebGLSampler, gTypeWebGLSampler
, WebGLShader(WebGLShader), unWebGLShader, castToWebGLShader, gTypeWebGLShader
, WebGLShaderPrecisionFormat(WebGLShaderPrecisionFormat), unWebGLShaderPrecisionFormat, castToWebGLShaderPrecisionFormat, gTypeWebGLShaderPrecisionFormat
, WebGLSync(WebGLSync), unWebGLSync, castToWebGLSync, gTypeWebGLSync
, WebGLTexture(WebGLTexture), unWebGLTexture, castToWebGLTexture, gTypeWebGLTexture
, WebGLTransformFeedback(WebGLTransformFeedback), unWebGLTransformFeedback, castToWebGLTransformFeedback, gTypeWebGLTransformFeedback
, WebGLUniformLocation(WebGLUniformLocation), unWebGLUniformLocation, castToWebGLUniformLocation, gTypeWebGLUniformLocation
, WebGLVertexArrayObject(WebGLVertexArrayObject), unWebGLVertexArrayObject, castToWebGLVertexArrayObject, gTypeWebGLVertexArrayObject
, WebGLVertexArrayObjectOES(WebGLVertexArrayObjectOES), unWebGLVertexArrayObjectOES, castToWebGLVertexArrayObjectOES, gTypeWebGLVertexArrayObjectOES
, WebKitAnimationEvent(WebKitAnimationEvent), unWebKitAnimationEvent, castToWebKitAnimationEvent, gTypeWebKitAnimationEvent
, WebKitCSSFilterValue(WebKitCSSFilterValue), unWebKitCSSFilterValue, castToWebKitCSSFilterValue, gTypeWebKitCSSFilterValue
, WebKitCSSMatrix(WebKitCSSMatrix), unWebKitCSSMatrix, castToWebKitCSSMatrix, gTypeWebKitCSSMatrix
, WebKitCSSRegionRule(WebKitCSSRegionRule), unWebKitCSSRegionRule, castToWebKitCSSRegionRule, gTypeWebKitCSSRegionRule
, WebKitCSSTransformValue(WebKitCSSTransformValue), unWebKitCSSTransformValue, castToWebKitCSSTransformValue, gTypeWebKitCSSTransformValue
, WebKitCSSViewportRule(WebKitCSSViewportRule), unWebKitCSSViewportRule, castToWebKitCSSViewportRule, gTypeWebKitCSSViewportRule
, WebKitNamedFlow(WebKitNamedFlow), unWebKitNamedFlow, castToWebKitNamedFlow, gTypeWebKitNamedFlow
, WebKitNamespace(WebKitNamespace), unWebKitNamespace, castToWebKitNamespace, gTypeWebKitNamespace
, WebKitPlaybackTargetAvailabilityEvent(WebKitPlaybackTargetAvailabilityEvent), unWebKitPlaybackTargetAvailabilityEvent, castToWebKitPlaybackTargetAvailabilityEvent, gTypeWebKitPlaybackTargetAvailabilityEvent
, WebKitPoint(WebKitPoint), unWebKitPoint, castToWebKitPoint, gTypeWebKitPoint
, WebKitTransitionEvent(WebKitTransitionEvent), unWebKitTransitionEvent, castToWebKitTransitionEvent, gTypeWebKitTransitionEvent
, WebSocket(WebSocket), unWebSocket, castToWebSocket, gTypeWebSocket
, WheelEvent(WheelEvent), unWheelEvent, castToWheelEvent, gTypeWheelEvent
, Window(Window), unWindow, castToWindow, gTypeWindow
, WindowBase64(WindowBase64), unWindowBase64, castToWindowBase64, gTypeWindowBase64
, WindowTimers(WindowTimers), unWindowTimers, castToWindowTimers, gTypeWindowTimers
, Worker(Worker), unWorker, castToWorker, gTypeWorker
, WorkerGlobalScope(WorkerGlobalScope), unWorkerGlobalScope, IsWorkerGlobalScope, toWorkerGlobalScope, castToWorkerGlobalScope, gTypeWorkerGlobalScope
, WorkerLocation(WorkerLocation), unWorkerLocation, castToWorkerLocation, gTypeWorkerLocation
, WorkerNavigator(WorkerNavigator), unWorkerNavigator, castToWorkerNavigator, gTypeWorkerNavigator
, XMLHttpRequest(XMLHttpRequest), unXMLHttpRequest, castToXMLHttpRequest, gTypeXMLHttpRequest
, XMLHttpRequestProgressEvent(XMLHttpRequestProgressEvent), unXMLHttpRequestProgressEvent, castToXMLHttpRequestProgressEvent, gTypeXMLHttpRequestProgressEvent
, XMLHttpRequestUpload(XMLHttpRequestUpload), unXMLHttpRequestUpload, castToXMLHttpRequestUpload, gTypeXMLHttpRequestUpload
, XMLSerializer(XMLSerializer), unXMLSerializer, castToXMLSerializer, gTypeXMLSerializer
, XPathEvaluator(XPathEvaluator), unXPathEvaluator, castToXPathEvaluator, gTypeXPathEvaluator
, XPathExpression(XPathExpression), unXPathExpression, castToXPathExpression, gTypeXPathExpression
, XPathNSResolver(XPathNSResolver), unXPathNSResolver, castToXPathNSResolver, gTypeXPathNSResolver
, XPathResult(XPathResult), unXPathResult, castToXPathResult, gTypeXPathResult
, XSLTProcessor(XSLTProcessor), unXSLTProcessor, castToXSLTProcessor, gTypeXSLTProcessor
#else
propagateGError, GType(..), DOMString(..), ToDOMString(..), FromDOMString(..)
, FocusEvent
, TouchEvent
, module Graphics.UI.Gtk.WebKit.Types
, IsGObject
, IsApplicationCache
, IsAttr
#ifndef USE_OLD_WEBKIT
, IsAudioTrack
#endif
#ifndef USE_OLD_WEBKIT
, IsAudioTrackList
#endif
#ifndef USE_OLD_WEBKIT
, IsBarProp
#endif
#ifndef USE_OLD_WEBKIT
, IsBatteryManager
#endif
, IsBlob
, IsCDATASection
#ifndef USE_OLD_WEBKIT
, IsCSS
#endif
, IsCSSRule
, IsCSSRuleList
, IsCSSStyleDeclaration
, IsCSSStyleSheet
, IsCSSValue
, IsCharacterData
, IsComment
, IsDOMImplementation
#ifndef USE_OLD_WEBKIT
, IsDOMNamedFlowCollection
#endif
, IsDOMSettableTokenList
, IsDOMStringList
, IsDOMTokenList
, IsDocument
, IsDocumentFragment
, IsDocumentType
, IsElement
, IsEntityReference
, IsEvent
, IsEventTarget
, IsFile
, IsFileList
, IsGeolocation
, IsHTMLAnchorElement
, IsHTMLAppletElement
, IsHTMLAreaElement
, IsHTMLAudioElement
, IsHTMLBRElement
, IsHTMLBaseElement
, IsHTMLBaseFontElement
, IsHTMLBodyElement
, IsHTMLButtonElement
, IsHTMLCanvasElement
, IsHTMLCollection
, IsHTMLDListElement
, IsHTMLDetailsElement
, IsHTMLDirectoryElement
, IsHTMLDivElement
, IsHTMLDocument
, IsHTMLElement
, IsHTMLEmbedElement
, IsHTMLFieldSetElement
, IsHTMLFontElement
, IsHTMLFormElement
, IsHTMLFrameElement
, IsHTMLFrameSetElement
, IsHTMLHRElement
, IsHTMLHeadElement
, IsHTMLHeadingElement
, IsHTMLHtmlElement
, IsHTMLIFrameElement
, IsHTMLImageElement
, IsHTMLInputElement
, IsHTMLKeygenElement
, IsHTMLLIElement
, IsHTMLLabelElement
, IsHTMLLegendElement
, IsHTMLLinkElement
, IsHTMLMapElement
, IsHTMLMarqueeElement
, IsHTMLMediaElement
, IsHTMLMenuElement
, IsHTMLMetaElement
, IsHTMLModElement
, IsHTMLOListElement
, IsHTMLObjectElement
, IsHTMLOptGroupElement
, IsHTMLOptionElement
, IsHTMLOptionsCollection
, IsHTMLParagraphElement
, IsHTMLParamElement
, IsHTMLPreElement
, IsHTMLQuoteElement
, IsHTMLScriptElement
, IsHTMLSelectElement
, IsHTMLStyleElement
, IsHTMLTableCaptionElement
, IsHTMLTableCellElement
, IsHTMLTableColElement
, IsHTMLTableElement
, IsHTMLTableRowElement
, IsHTMLTableSectionElement
, IsHTMLTextAreaElement
, IsHTMLTitleElement
, IsHTMLUListElement
, IsHTMLVideoElement
, IsHistory
#ifndef USE_OLD_WEBKIT
, IsKeyboardEvent
#endif
, IsLocation
, IsMediaError
, IsMediaList
, IsMediaQueryList
, IsMessagePort
, IsMimeType
, IsMimeTypeArray
, IsMouseEvent
, IsNamedNodeMap
, IsNavigator
, IsNode
, IsNodeFilter
, IsNodeIterator
, IsNodeList
#ifndef USE_OLD_WEBKIT
, IsPerformance
#endif
#ifndef USE_OLD_WEBKIT
, IsPerformanceNavigation
#endif
#ifndef USE_OLD_WEBKIT
, IsPerformanceTiming
#endif
, IsPlugin
, IsPluginArray
, IsProcessingInstruction
, IsRange
, IsScreen
#ifndef USE_OLD_WEBKIT
, IsSecurityPolicy
#endif
, IsSelection
, IsStorage
#ifndef USE_OLD_WEBKIT
, IsStorageInfo
#endif
#ifndef USE_OLD_WEBKIT
, IsStorageQuota
#endif
, IsStyleMedia
, IsStyleSheet
, IsStyleSheetList
, IsText
#ifndef USE_OLD_WEBKIT
, IsTextTrack
#endif
#ifndef USE_OLD_WEBKIT
, IsTextTrackCue
#endif
#ifndef USE_OLD_WEBKIT
, IsTextTrackCueList
#endif
#ifndef USE_OLD_WEBKIT
, IsTextTrackList
#endif
, IsTimeRanges
#ifndef USE_OLD_WEBKIT
, IsTouch
#endif
, IsTreeWalker
, IsUIEvent
, IsValidityState
#ifndef USE_OLD_WEBKIT
, IsVideoTrack
#endif
#ifndef USE_OLD_WEBKIT
, IsVideoTrackList
#endif
, IsWebKitNamedFlow
, IsWebKitPoint
#ifndef USE_OLD_WEBKIT
, IsWheelEvent
#endif
, IsWindow
, IsXPathExpression
, IsXPathNSResolver
, IsXPathResult
#endif
) where
import Control.Applicative ((<$>))
import qualified Data.Text as T (Text)
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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(..))
#else
import Data.Maybe (isNothing)
import Foreign.C (CString)
import Graphics.UI.Gtk.WebKit.Types
import System.Glib (propagateGError, GType(..))
import System.Glib.UTFString
(readUTFString, GlibString(..))
#endif
import Data.Int (Int8, Int16, Int32, Int64)
import Data.Word (Word8, Word16, Word32, Word64)
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
"$1===$2" js_eq :: JSVal -> JSVal -> Bool
#ifdef ghcjs_HOST_OS
foreign import javascript unsafe "h$isInstanceOf $1 $2"
typeInstanceIsA' :: JSVal -> JSVal -> Bool
#else
typeInstanceIsA' :: JSVal -> JSVal -> Bool
typeInstanceIsA' = error "typeInstanceIsA': only available in JavaScript"
#endif
typeInstanceIsA o (GType t) = typeInstanceIsA' o t
castTo :: (IsGObject obj, IsGObject obj') => GType -> String
-> (obj -> obj')
castTo gtype objTypeName obj =
case toGObject obj of
gobj@(GObject objRef)
| typeInstanceIsA objRef gtype
-> unsafeCastGObject gobj
| otherwise -> error $ "Cannot cast object to " ++ objTypeName
isA :: IsGObject o => o -> GType -> Bool
isA obj = typeInstanceIsA (unGObject $ toGObject obj)
newtype GObject = GObject { unGObject :: JSVal }
class (ToJSVal o, FromJSVal o) => IsGObject o where
toGObject :: o -> GObject
unsafeCastGObject :: GObject -> o
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
toGObject = id
unsafeCastGObject = id
castToGObject :: IsGObject obj => obj -> obj
castToGObject = id
#ifdef ghcjs_HOST_OS
foreign import javascript unsafe "object" gTypeGObject :: GType
#else
gTypeGObject = error "gTypeGObject: only available in JavaScript"
#endif
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)))
#ifdef ghcjs_HOST_OS
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
#endif
#else
type IsGObject o = GObjectClass o
type DOMString = T.Text
type ToDOMString s = GlibString s
type FromDOMString s = GlibString s
type FocusEvent = UIEvent
type TouchEvent = UIEvent
#endif
type IsDOMString s = (ToDOMString s, FromDOMString s)
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsSerializedScriptValue SerializedScriptValue
instance IsGObject SerializedScriptValue where
toGObject = GObject . unSerializedScriptValue
unsafeCastGObject = SerializedScriptValue . unGObject
#else
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsPositionOptions PositionOptions
instance IsGObject PositionOptions where
toGObject = GObject . unPositionOptions
unsafeCastGObject = PositionOptions . unGObject
#else
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsDictionary Dictionary
instance IsGObject Dictionary where
toGObject = GObject . unDictionary
unsafeCastGObject = Dictionary . unGObject
#else
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsBlobPropertyBag BlobPropertyBag
instance IsGObject BlobPropertyBag where
toGObject = GObject . unBlobPropertyBag
unsafeCastGObject = BlobPropertyBag . unGObject
#else
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsMutationCallback MutationCallback
instance IsGObject MutationCallback where
toGObject = GObject . unMutationCallback
unsafeCastGObject = MutationCallback . unGObject
#else
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsPromise Promise
instance IsGObject Promise where
toGObject = GObject . unPromise
unsafeCastGObject = Promise . unGObject
castToPromise :: IsGObject obj => obj -> Promise
castToPromise = castTo gTypePromise "Promise"
foreign import javascript unsafe "window[\"Promise\"]" gTypePromise :: GType
#else
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsArrayBuffer ArrayBuffer
instance IsGObject ArrayBuffer where
toGObject = GObject . unArrayBuffer
unsafeCastGObject = ArrayBuffer . unGObject
castToArrayBuffer :: IsGObject obj => obj -> ArrayBuffer
castToArrayBuffer = castTo gTypeArrayBuffer "ArrayBuffer"
foreign import javascript unsafe "window[\"ArrayBuffer\"]" gTypeArrayBuffer :: GType
#else
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsFloat32Array Float32Array
instance IsGObject Float32Array where
toGObject = GObject . unFloat32Array
unsafeCastGObject = Float32Array . unGObject
castToFloat32Array :: IsGObject obj => obj -> Float32Array
castToFloat32Array = castTo gTypeFloat32Array "Float32Array"
foreign import javascript unsafe "window[\"Float32Array\"]" gTypeFloat32Array :: GType
#else
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsFloat64Array Float64Array
instance IsGObject Float64Array where
toGObject = GObject . unFloat64Array
unsafeCastGObject = Float64Array . unGObject
castToFloat64Array :: IsGObject obj => obj -> Float64Array
castToFloat64Array = castTo gTypeFloat64Array "Float64Array"
foreign import javascript unsafe "window[\"Float64Array\"]" gTypeFloat64Array :: GType
#else
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsUint8Array Uint8Array
instance IsGObject Uint8Array where
toGObject = GObject . unUint8Array
unsafeCastGObject = Uint8Array . unGObject
castToUint8Array :: IsGObject obj => obj -> Uint8Array
castToUint8Array = castTo gTypeUint8Array "Uint8Array"
foreign import javascript unsafe "window[\"Uint8Array\"]" gTypeUint8Array :: GType
#else
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsUint8ClampedArray Uint8ClampedArray
instance IsGObject Uint8ClampedArray where
toGObject = GObject . unUint8ClampedArray
unsafeCastGObject = Uint8ClampedArray . unGObject
castToUint8ClampedArray :: IsGObject obj => obj -> Uint8ClampedArray
castToUint8ClampedArray = castTo gTypeUint8ClampedArray "Uint8ClampedArray"
foreign import javascript unsafe "window[\"Uint8ClampedArray\"]" gTypeUint8ClampedArray :: GType
#else
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsUint16Array Uint16Array
instance IsGObject Uint16Array where
toGObject = GObject . unUint16Array
unsafeCastGObject = Uint16Array . unGObject
castToUint16Array :: IsGObject obj => obj -> Uint16Array
castToUint16Array = castTo gTypeUint16Array "Uint16Array"
foreign import javascript unsafe "window[\"Uint16Array\"]" gTypeUint16Array :: GType
#else
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsUint32Array Uint32Array
instance IsGObject Uint32Array where
toGObject = GObject . unUint32Array
unsafeCastGObject = Uint32Array . unGObject
castToUint32Array :: IsGObject obj => obj -> Uint32Array
castToUint32Array = castTo gTypeUint32Array "Uint32Array"
foreign import javascript unsafe "window[\"Uint32Array\"]" gTypeUint32Array :: GType
#else
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsInt8Array Int8Array
instance IsGObject Int8Array where
toGObject = GObject . unInt8Array
unsafeCastGObject = Int8Array . unGObject
castToInt8Array :: IsGObject obj => obj -> Int8Array
castToInt8Array = castTo gTypeInt8Array "Int8Array"
foreign import javascript unsafe "window[\"Int8Array\"]" gTypeInt8Array :: GType
#else
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsInt16Array Int16Array
instance IsGObject Int16Array where
toGObject = GObject . unInt16Array
unsafeCastGObject = Int16Array . unGObject
castToInt16Array :: IsGObject obj => obj -> Int16Array
castToInt16Array = castTo gTypeInt16Array "Int16Array"
foreign import javascript unsafe "window[\"Int16Array\"]" gTypeInt16Array :: GType
#else
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsInt32Array Int32Array
instance IsGObject Int32Array where
toGObject = GObject . unInt32Array
unsafeCastGObject = Int32Array . unGObject
castToInt32Array :: IsGObject obj => obj -> Int32Array
castToInt32Array = castTo gTypeInt32Array "Int32Array"
foreign import javascript unsafe "window[\"Int32Array\"]" gTypeInt32Array :: GType
#else
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsObjectArray ObjectArray
instance IsGObject ObjectArray where
toGObject = GObject . unObjectArray
unsafeCastGObject = ObjectArray . unGObject
#else
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsArrayBufferView ArrayBufferView
instance IsGObject ArrayBufferView where
toGObject = GObject . unArrayBufferView
unsafeCastGObject = ArrayBufferView . unGObject
#else
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsArray Array
instance IsGObject Array where
toGObject = GObject . unArray
unsafeCastGObject = Array . unGObject
castToArray :: IsGObject obj => obj -> Array
castToArray = castTo gTypeArray "Array"
foreign import javascript unsafe "window[\"Array\"]" gTypeArray :: GType
#else
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsDate Date
instance IsGObject Date where
toGObject = GObject . unDate
unsafeCastGObject = Date . unGObject
castToDate :: IsGObject obj => obj -> Date
castToDate = castTo gTypeDate "Date"
foreign import javascript unsafe "window[\"Date\"]" gTypeDate :: GType
#else
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsAcceleration Acceleration
instance IsGObject Acceleration where
toGObject = GObject . unAcceleration
unsafeCastGObject = Acceleration . unGObject
#else
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsRotationRate RotationRate
instance IsGObject RotationRate where
toGObject = GObject . unRotationRate
unsafeCastGObject = RotationRate . unGObject
#else
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsAlgorithm Algorithm
instance IsGObject Algorithm where
toGObject = GObject . unAlgorithm
unsafeCastGObject = Algorithm . unGObject
#else
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsCryptoOperationData CryptoOperationData
instance IsGObject CryptoOperationData where
toGObject = GObject . unCryptoOperationData
unsafeCastGObject = CryptoOperationData . unGObject
instance IsCryptoOperationData ArrayBuffer
instance IsCryptoOperationData ArrayBufferView
#else
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsCanvasStyle CanvasStyle
instance IsGObject CanvasStyle where
toGObject = GObject . unCanvasStyle
unsafeCastGObject = CanvasStyle . unGObject
instance IsCanvasStyle CanvasGradient
instance IsCanvasStyle CanvasPattern
#else
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsDOMException DOMException
instance IsGObject DOMException where
toGObject = GObject . unDOMException
unsafeCastGObject = DOMException . unGObject
#else
#endif
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
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unANGLEInstancedArrays
unsafeCastGObject = ANGLEInstancedArrays . unGObject
castToANGLEInstancedArrays :: IsGObject obj => obj -> ANGLEInstancedArrays
castToANGLEInstancedArrays = castTo gTypeANGLEInstancedArrays "ANGLEInstancedArrays"
foreign import javascript unsafe "window[\"ANGLEInstancedArrays\"]" gTypeANGLEInstancedArrays :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unAbstractView
unsafeCastGObject = AbstractView . unGObject
castToAbstractView :: IsGObject obj => obj -> AbstractView
castToAbstractView = castTo gTypeAbstractView "AbstractView"
foreign import javascript unsafe "window[\"AbstractView\"]" gTypeAbstractView :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unAbstractWorker
unsafeCastGObject = AbstractWorker . unGObject
castToAbstractWorker :: IsGObject obj => obj -> AbstractWorker
castToAbstractWorker = castTo gTypeAbstractWorker "AbstractWorker"
foreign import javascript unsafe "window[\"AbstractWorker\"]" gTypeAbstractWorker :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unAllAudioCapabilities
unsafeCastGObject = AllAudioCapabilities . unGObject
castToAllAudioCapabilities :: IsGObject obj => obj -> AllAudioCapabilities
castToAllAudioCapabilities = castTo gTypeAllAudioCapabilities "AllAudioCapabilities"
foreign import javascript unsafe "window[\"AllAudioCapabilities\"]" gTypeAllAudioCapabilities :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unAllVideoCapabilities
unsafeCastGObject = AllVideoCapabilities . unGObject
castToAllVideoCapabilities :: IsGObject obj => obj -> AllVideoCapabilities
castToAllVideoCapabilities = castTo gTypeAllVideoCapabilities "AllVideoCapabilities"
foreign import javascript unsafe "window[\"AllVideoCapabilities\"]" gTypeAllVideoCapabilities :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unAnalyserNode
unsafeCastGObject = AnalyserNode . unGObject
castToAnalyserNode :: IsGObject obj => obj -> AnalyserNode
castToAnalyserNode = castTo gTypeAnalyserNode "AnalyserNode"
foreign import javascript unsafe "window[\"AnalyserNode\"]" gTypeAnalyserNode :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unAnimationEvent
unsafeCastGObject = AnimationEvent . unGObject
castToAnimationEvent :: IsGObject obj => obj -> AnimationEvent
castToAnimationEvent = castTo gTypeAnimationEvent "AnimationEvent"
foreign import javascript unsafe "window[\"AnimationEvent\"]" gTypeAnimationEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unApplicationCache
unsafeCastGObject = ApplicationCache . unGObject
castToApplicationCache :: IsGObject obj => obj -> ApplicationCache
castToApplicationCache = castTo gTypeApplicationCache "ApplicationCache"
foreign import javascript unsafe "window[\"ApplicationCache\"]" gTypeApplicationCache :: GType
#else
type IsApplicationCache o = ApplicationCacheClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unAttr
unsafeCastGObject = Attr . unGObject
castToAttr :: IsGObject obj => obj -> Attr
castToAttr = castTo gTypeAttr "Attr"
foreign import javascript unsafe "window[\"Attr\"]" gTypeAttr :: GType
#else
type IsAttr o = AttrClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unAudioBuffer
unsafeCastGObject = AudioBuffer . unGObject
castToAudioBuffer :: IsGObject obj => obj -> AudioBuffer
castToAudioBuffer = castTo gTypeAudioBuffer "AudioBuffer"
foreign import javascript unsafe "window[\"AudioBuffer\"]" gTypeAudioBuffer :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unAudioBufferSourceNode
unsafeCastGObject = AudioBufferSourceNode . unGObject
castToAudioBufferSourceNode :: IsGObject obj => obj -> AudioBufferSourceNode
castToAudioBufferSourceNode = castTo gTypeAudioBufferSourceNode "AudioBufferSourceNode"
foreign import javascript unsafe "window[\"AudioBufferSourceNode\"]" gTypeAudioBufferSourceNode :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsAudioContext AudioContext
instance IsEventTarget AudioContext
instance IsGObject AudioContext where
toGObject = GObject . unAudioContext
unsafeCastGObject = AudioContext . unGObject
castToAudioContext :: IsGObject obj => obj -> AudioContext
castToAudioContext = castTo gTypeAudioContext "AudioContext"
foreign import javascript unsafe "window[\"AudioContext\"]" gTypeAudioContext :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unAudioDestinationNode
unsafeCastGObject = AudioDestinationNode . unGObject
castToAudioDestinationNode :: IsGObject obj => obj -> AudioDestinationNode
castToAudioDestinationNode = castTo gTypeAudioDestinationNode "AudioDestinationNode"
foreign import javascript unsafe "window[\"AudioDestinationNode\"]" gTypeAudioDestinationNode :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unAudioListener
unsafeCastGObject = AudioListener . unGObject
castToAudioListener :: IsGObject obj => obj -> AudioListener
castToAudioListener = castTo gTypeAudioListener "AudioListener"
foreign import javascript unsafe "window[\"AudioListener\"]" gTypeAudioListener :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsAudioNode AudioNode
instance IsEventTarget AudioNode
instance IsGObject AudioNode where
toGObject = GObject . unAudioNode
unsafeCastGObject = AudioNode . unGObject
castToAudioNode :: IsGObject obj => obj -> AudioNode
castToAudioNode = castTo gTypeAudioNode "AudioNode"
foreign import javascript unsafe "window[\"AudioNode\"]" gTypeAudioNode :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unAudioParam
unsafeCastGObject = AudioParam . unGObject
castToAudioParam :: IsGObject obj => obj -> AudioParam
castToAudioParam = castTo gTypeAudioParam "AudioParam"
foreign import javascript unsafe "window[\"AudioParam\"]" gTypeAudioParam :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unAudioProcessingEvent
unsafeCastGObject = AudioProcessingEvent . unGObject
castToAudioProcessingEvent :: IsGObject obj => obj -> AudioProcessingEvent
castToAudioProcessingEvent = castTo gTypeAudioProcessingEvent "AudioProcessingEvent"
foreign import javascript unsafe "window[\"AudioProcessingEvent\"]" gTypeAudioProcessingEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unAudioStreamTrack
unsafeCastGObject = AudioStreamTrack . unGObject
castToAudioStreamTrack :: IsGObject obj => obj -> AudioStreamTrack
castToAudioStreamTrack = castTo gTypeAudioStreamTrack "AudioStreamTrack"
foreign import javascript unsafe "window[\"AudioStreamTrack\"]" gTypeAudioStreamTrack :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unAudioTrack
unsafeCastGObject = AudioTrack . unGObject
castToAudioTrack :: IsGObject obj => obj -> AudioTrack
castToAudioTrack = castTo gTypeAudioTrack "AudioTrack"
foreign import javascript unsafe "window[\"AudioTrack\"]" gTypeAudioTrack :: GType
#else
#ifndef USE_OLD_WEBKIT
type IsAudioTrack o = AudioTrackClass o
#endif
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unAudioTrackList
unsafeCastGObject = AudioTrackList . unGObject
castToAudioTrackList :: IsGObject obj => obj -> AudioTrackList
castToAudioTrackList = castTo gTypeAudioTrackList "AudioTrackList"
foreign import javascript unsafe "window[\"AudioTrackList\"]" gTypeAudioTrackList :: GType
#else
#ifndef USE_OLD_WEBKIT
type IsAudioTrackList o = AudioTrackListClass o
#endif
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unAutocompleteErrorEvent
unsafeCastGObject = AutocompleteErrorEvent . unGObject
castToAutocompleteErrorEvent :: IsGObject obj => obj -> AutocompleteErrorEvent
castToAutocompleteErrorEvent = castTo gTypeAutocompleteErrorEvent "AutocompleteErrorEvent"
foreign import javascript unsafe "window[\"AutocompleteErrorEvent\"]" gTypeAutocompleteErrorEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unBarProp
unsafeCastGObject = BarProp . unGObject
castToBarProp :: IsGObject obj => obj -> BarProp
castToBarProp = castTo gTypeBarProp "BarProp"
foreign import javascript unsafe "window[\"BarProp\"]" gTypeBarProp :: GType
#else
#ifndef USE_OLD_WEBKIT
type IsBarProp o = BarPropClass o
#endif
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unBatteryManager
unsafeCastGObject = BatteryManager . unGObject
castToBatteryManager :: IsGObject obj => obj -> BatteryManager
castToBatteryManager = castTo gTypeBatteryManager "BatteryManager"
foreign import javascript unsafe "window[\"BatteryManager\"]" gTypeBatteryManager :: GType
#else
#ifndef USE_OLD_WEBKIT
type IsBatteryManager o = BatteryManagerClass o
#endif
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unBeforeLoadEvent
unsafeCastGObject = BeforeLoadEvent . unGObject
castToBeforeLoadEvent :: IsGObject obj => obj -> BeforeLoadEvent
castToBeforeLoadEvent = castTo gTypeBeforeLoadEvent "BeforeLoadEvent"
foreign import javascript unsafe "window[\"BeforeLoadEvent\"]" gTypeBeforeLoadEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unBeforeUnloadEvent
unsafeCastGObject = BeforeUnloadEvent . unGObject
castToBeforeUnloadEvent :: IsGObject obj => obj -> BeforeUnloadEvent
castToBeforeUnloadEvent = castTo gTypeBeforeUnloadEvent "BeforeUnloadEvent"
foreign import javascript unsafe "window[\"BeforeUnloadEvent\"]" gTypeBeforeUnloadEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unBiquadFilterNode
unsafeCastGObject = BiquadFilterNode . unGObject
castToBiquadFilterNode :: IsGObject obj => obj -> BiquadFilterNode
castToBiquadFilterNode = castTo gTypeBiquadFilterNode "BiquadFilterNode"
foreign import javascript unsafe "window[\"BiquadFilterNode\"]" gTypeBiquadFilterNode :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsBlob Blob
instance IsGObject Blob where
toGObject = GObject . unBlob
unsafeCastGObject = Blob . unGObject
castToBlob :: IsGObject obj => obj -> Blob
castToBlob = castTo gTypeBlob "Blob"
foreign import javascript unsafe "window[\"Blob\"]" gTypeBlob :: GType
#else
type IsBlob o = BlobClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCDATASection
unsafeCastGObject = CDATASection . unGObject
castToCDATASection :: IsGObject obj => obj -> CDATASection
castToCDATASection = castTo gTypeCDATASection "CDATASection"
foreign import javascript unsafe "window[\"CDATASection\"]" gTypeCDATASection :: GType
#else
type IsCDATASection o = CDATASectionClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCSS
unsafeCastGObject = CSS . unGObject
castToCSS :: IsGObject obj => obj -> CSS
castToCSS = castTo gTypeCSS "CSS"
foreign import javascript unsafe "window[\"CSS\"]" gTypeCSS :: GType
#else
#ifndef USE_OLD_WEBKIT
type IsCSS o = CSSClass o
#endif
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCSSCharsetRule
unsafeCastGObject = CSSCharsetRule . unGObject
castToCSSCharsetRule :: IsGObject obj => obj -> CSSCharsetRule
castToCSSCharsetRule = castTo gTypeCSSCharsetRule "CSSCharsetRule"
foreign import javascript unsafe "window[\"CSSCharsetRule\"]" gTypeCSSCharsetRule :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCSSFontFaceLoadEvent
unsafeCastGObject = CSSFontFaceLoadEvent . unGObject
castToCSSFontFaceLoadEvent :: IsGObject obj => obj -> CSSFontFaceLoadEvent
castToCSSFontFaceLoadEvent = castTo gTypeCSSFontFaceLoadEvent "CSSFontFaceLoadEvent"
foreign import javascript unsafe "window[\"CSSFontFaceLoadEvent\"]" gTypeCSSFontFaceLoadEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCSSFontFaceRule
unsafeCastGObject = CSSFontFaceRule . unGObject
castToCSSFontFaceRule :: IsGObject obj => obj -> CSSFontFaceRule
castToCSSFontFaceRule = castTo gTypeCSSFontFaceRule "CSSFontFaceRule"
foreign import javascript unsafe "window[\"CSSFontFaceRule\"]" gTypeCSSFontFaceRule :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCSSImportRule
unsafeCastGObject = CSSImportRule . unGObject
castToCSSImportRule :: IsGObject obj => obj -> CSSImportRule
castToCSSImportRule = castTo gTypeCSSImportRule "CSSImportRule"
foreign import javascript unsafe "window[\"CSSImportRule\"]" gTypeCSSImportRule :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCSSKeyframeRule
unsafeCastGObject = CSSKeyframeRule . unGObject
castToCSSKeyframeRule :: IsGObject obj => obj -> CSSKeyframeRule
castToCSSKeyframeRule = castTo gTypeCSSKeyframeRule "CSSKeyframeRule"
foreign import javascript unsafe "window[\"CSSKeyframeRule\"]" gTypeCSSKeyframeRule :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCSSKeyframesRule
unsafeCastGObject = CSSKeyframesRule . unGObject
castToCSSKeyframesRule :: IsGObject obj => obj -> CSSKeyframesRule
castToCSSKeyframesRule = castTo gTypeCSSKeyframesRule "CSSKeyframesRule"
foreign import javascript unsafe "window[\"CSSKeyframesRule\"]" gTypeCSSKeyframesRule :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCSSMediaRule
unsafeCastGObject = CSSMediaRule . unGObject
castToCSSMediaRule :: IsGObject obj => obj -> CSSMediaRule
castToCSSMediaRule = castTo gTypeCSSMediaRule "CSSMediaRule"
foreign import javascript unsafe "window[\"CSSMediaRule\"]" gTypeCSSMediaRule :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCSSPageRule
unsafeCastGObject = CSSPageRule . unGObject
castToCSSPageRule :: IsGObject obj => obj -> CSSPageRule
castToCSSPageRule = castTo gTypeCSSPageRule "CSSPageRule"
foreign import javascript unsafe "window[\"CSSPageRule\"]" gTypeCSSPageRule :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCSSPrimitiveValue
unsafeCastGObject = CSSPrimitiveValue . unGObject
castToCSSPrimitiveValue :: IsGObject obj => obj -> CSSPrimitiveValue
castToCSSPrimitiveValue = castTo gTypeCSSPrimitiveValue "CSSPrimitiveValue"
foreign import javascript unsafe "window[\"CSSPrimitiveValue\"]" gTypeCSSPrimitiveValue :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsCSSRule CSSRule
instance IsGObject CSSRule where
toGObject = GObject . unCSSRule
unsafeCastGObject = CSSRule . unGObject
castToCSSRule :: IsGObject obj => obj -> CSSRule
castToCSSRule = castTo gTypeCSSRule "CSSRule"
foreign import javascript unsafe "window[\"CSSRule\"]" gTypeCSSRule :: GType
#else
type IsCSSRule o = CSSRuleClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCSSRuleList
unsafeCastGObject = CSSRuleList . unGObject
castToCSSRuleList :: IsGObject obj => obj -> CSSRuleList
castToCSSRuleList = castTo gTypeCSSRuleList "CSSRuleList"
foreign import javascript unsafe "window[\"CSSRuleList\"]" gTypeCSSRuleList :: GType
#else
type IsCSSRuleList o = CSSRuleListClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCSSStyleDeclaration
unsafeCastGObject = CSSStyleDeclaration . unGObject
castToCSSStyleDeclaration :: IsGObject obj => obj -> CSSStyleDeclaration
castToCSSStyleDeclaration = castTo gTypeCSSStyleDeclaration "CSSStyleDeclaration"
foreign import javascript unsafe "window[\"CSSStyleDeclaration\"]" gTypeCSSStyleDeclaration :: GType
#else
type IsCSSStyleDeclaration o = CSSStyleDeclarationClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCSSStyleRule
unsafeCastGObject = CSSStyleRule . unGObject
castToCSSStyleRule :: IsGObject obj => obj -> CSSStyleRule
castToCSSStyleRule = castTo gTypeCSSStyleRule "CSSStyleRule"
foreign import javascript unsafe "window[\"CSSStyleRule\"]" gTypeCSSStyleRule :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCSSStyleSheet
unsafeCastGObject = CSSStyleSheet . unGObject
castToCSSStyleSheet :: IsGObject obj => obj -> CSSStyleSheet
castToCSSStyleSheet = castTo gTypeCSSStyleSheet "CSSStyleSheet"
foreign import javascript unsafe "window[\"CSSStyleSheet\"]" gTypeCSSStyleSheet :: GType
#else
type IsCSSStyleSheet o = CSSStyleSheetClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCSSSupportsRule
unsafeCastGObject = CSSSupportsRule . unGObject
castToCSSSupportsRule :: IsGObject obj => obj -> CSSSupportsRule
castToCSSSupportsRule = castTo gTypeCSSSupportsRule "CSSSupportsRule"
foreign import javascript unsafe "window[\"CSSSupportsRule\"]" gTypeCSSSupportsRule :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCSSUnknownRule
unsafeCastGObject = CSSUnknownRule . unGObject
castToCSSUnknownRule :: IsGObject obj => obj -> CSSUnknownRule
castToCSSUnknownRule = castTo gTypeCSSUnknownRule "CSSUnknownRule"
foreign import javascript unsafe "window[\"CSSUnknownRule\"]" gTypeCSSUnknownRule :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsCSSValue CSSValue
instance IsGObject CSSValue where
toGObject = GObject . unCSSValue
unsafeCastGObject = CSSValue . unGObject
castToCSSValue :: IsGObject obj => obj -> CSSValue
castToCSSValue = castTo gTypeCSSValue "CSSValue"
foreign import javascript unsafe "window[\"CSSValue\"]" gTypeCSSValue :: GType
#else
type IsCSSValue o = CSSValueClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsCSSValueList CSSValueList
instance IsCSSValue CSSValueList
instance IsGObject CSSValueList where
toGObject = GObject . unCSSValueList
unsafeCastGObject = CSSValueList . unGObject
castToCSSValueList :: IsGObject obj => obj -> CSSValueList
castToCSSValueList = castTo gTypeCSSValueList "CSSValueList"
foreign import javascript unsafe "window[\"CSSValueList\"]" gTypeCSSValueList :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCanvasGradient
unsafeCastGObject = CanvasGradient . unGObject
castToCanvasGradient :: IsGObject obj => obj -> CanvasGradient
castToCanvasGradient = castTo gTypeCanvasGradient "CanvasGradient"
foreign import javascript unsafe "window[\"CanvasGradient\"]" gTypeCanvasGradient :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCanvasPattern
unsafeCastGObject = CanvasPattern . unGObject
castToCanvasPattern :: IsGObject obj => obj -> CanvasPattern
castToCanvasPattern = castTo gTypeCanvasPattern "CanvasPattern"
foreign import javascript unsafe "window[\"CanvasPattern\"]" gTypeCanvasPattern :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCanvasProxy
unsafeCastGObject = CanvasProxy . unGObject
castToCanvasProxy :: IsGObject obj => obj -> CanvasProxy
castToCanvasProxy = castTo gTypeCanvasProxy "CanvasProxy"
foreign import javascript unsafe "window[\"CanvasProxy\"]" gTypeCanvasProxy :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsCanvasRenderingContext CanvasRenderingContext
instance IsGObject CanvasRenderingContext where
toGObject = GObject . unCanvasRenderingContext
unsafeCastGObject = CanvasRenderingContext . unGObject
castToCanvasRenderingContext :: IsGObject obj => obj -> CanvasRenderingContext
castToCanvasRenderingContext = castTo gTypeCanvasRenderingContext "CanvasRenderingContext"
foreign import javascript unsafe "window[\"CanvasRenderingContext\"]" gTypeCanvasRenderingContext :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCanvasRenderingContext2D
unsafeCastGObject = CanvasRenderingContext2D . unGObject
castToCanvasRenderingContext2D :: IsGObject obj => obj -> CanvasRenderingContext2D
castToCanvasRenderingContext2D = castTo gTypeCanvasRenderingContext2D "CanvasRenderingContext2D"
foreign import javascript unsafe "window[\"CanvasRenderingContext2D\"]" gTypeCanvasRenderingContext2D :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCapabilityRange
unsafeCastGObject = CapabilityRange . unGObject
castToCapabilityRange :: IsGObject obj => obj -> CapabilityRange
castToCapabilityRange = castTo gTypeCapabilityRange "CapabilityRange"
foreign import javascript unsafe "window[\"CapabilityRange\"]" gTypeCapabilityRange :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unChannelMergerNode
unsafeCastGObject = ChannelMergerNode . unGObject
castToChannelMergerNode :: IsGObject obj => obj -> ChannelMergerNode
castToChannelMergerNode = castTo gTypeChannelMergerNode "ChannelMergerNode"
foreign import javascript unsafe "window[\"ChannelMergerNode\"]" gTypeChannelMergerNode :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unChannelSplitterNode
unsafeCastGObject = ChannelSplitterNode . unGObject
castToChannelSplitterNode :: IsGObject obj => obj -> ChannelSplitterNode
castToChannelSplitterNode = castTo gTypeChannelSplitterNode "ChannelSplitterNode"
foreign import javascript unsafe "window[\"ChannelSplitterNode\"]" gTypeChannelSplitterNode :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsCharacterData CharacterData
instance IsNode CharacterData
instance IsEventTarget CharacterData
instance IsGObject CharacterData where
toGObject = GObject . unCharacterData
unsafeCastGObject = CharacterData . unGObject
castToCharacterData :: IsGObject obj => obj -> CharacterData
castToCharacterData = castTo gTypeCharacterData "CharacterData"
foreign import javascript unsafe "window[\"CharacterData\"]" gTypeCharacterData :: GType
#else
type IsCharacterData o = CharacterDataClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unChildNode
unsafeCastGObject = ChildNode . unGObject
castToChildNode :: IsGObject obj => obj -> ChildNode
castToChildNode = castTo gTypeChildNode "ChildNode"
foreign import javascript unsafe "window[\"ChildNode\"]" gTypeChildNode :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unClientRect
unsafeCastGObject = ClientRect . unGObject
castToClientRect :: IsGObject obj => obj -> ClientRect
castToClientRect = castTo gTypeClientRect "ClientRect"
foreign import javascript unsafe "window[\"ClientRect\"]" gTypeClientRect :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unClientRectList
unsafeCastGObject = ClientRectList . unGObject
castToClientRectList :: IsGObject obj => obj -> ClientRectList
castToClientRectList = castTo gTypeClientRectList "ClientRectList"
foreign import javascript unsafe "window[\"ClientRectList\"]" gTypeClientRectList :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCloseEvent
unsafeCastGObject = CloseEvent . unGObject
castToCloseEvent :: IsGObject obj => obj -> CloseEvent
castToCloseEvent = castTo gTypeCloseEvent "CloseEvent"
foreign import javascript unsafe "window[\"CloseEvent\"]" gTypeCloseEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCommandLineAPIHost
unsafeCastGObject = CommandLineAPIHost . unGObject
castToCommandLineAPIHost :: IsGObject obj => obj -> CommandLineAPIHost
castToCommandLineAPIHost = castTo gTypeCommandLineAPIHost "CommandLineAPIHost"
foreign import javascript unsafe "window[\"CommandLineAPIHost\"]" gTypeCommandLineAPIHost :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unComment
unsafeCastGObject = Comment . unGObject
castToComment :: IsGObject obj => obj -> Comment
castToComment = castTo gTypeComment "Comment"
foreign import javascript unsafe "window[\"Comment\"]" gTypeComment :: GType
#else
type IsComment o = CommentClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCompositionEvent
unsafeCastGObject = CompositionEvent . unGObject
castToCompositionEvent :: IsGObject obj => obj -> CompositionEvent
castToCompositionEvent = castTo gTypeCompositionEvent "CompositionEvent"
foreign import javascript unsafe "window[\"CompositionEvent\"]" gTypeCompositionEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unConvolverNode
unsafeCastGObject = ConvolverNode . unGObject
castToConvolverNode :: IsGObject obj => obj -> ConvolverNode
castToConvolverNode = castTo gTypeConvolverNode "ConvolverNode"
foreign import javascript unsafe "window[\"ConvolverNode\"]" gTypeConvolverNode :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCoordinates
unsafeCastGObject = Coordinates . unGObject
castToCoordinates :: IsGObject obj => obj -> Coordinates
castToCoordinates = castTo gTypeCoordinates "Coordinates"
foreign import javascript unsafe "window[\"Coordinates\"]" gTypeCoordinates :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCounter
unsafeCastGObject = Counter . unGObject
castToCounter :: IsGObject obj => obj -> Counter
castToCounter = castTo gTypeCounter "Counter"
foreign import javascript unsafe "window[\"Counter\"]" gTypeCounter :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCrypto
unsafeCastGObject = Crypto . unGObject
castToCrypto :: IsGObject obj => obj -> Crypto
castToCrypto = castTo gTypeCrypto "Crypto"
foreign import javascript unsafe "window[\"Crypto\"]" gTypeCrypto :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCryptoKey
unsafeCastGObject = CryptoKey . unGObject
castToCryptoKey :: IsGObject obj => obj -> CryptoKey
castToCryptoKey = castTo gTypeCryptoKey "CryptoKey"
foreign import javascript unsafe "window[\"CryptoKey\"]" gTypeCryptoKey :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCryptoKeyPair
unsafeCastGObject = CryptoKeyPair . unGObject
castToCryptoKeyPair :: IsGObject obj => obj -> CryptoKeyPair
castToCryptoKeyPair = castTo gTypeCryptoKeyPair "CryptoKeyPair"
foreign import javascript unsafe "window[\"CryptoKeyPair\"]" gTypeCryptoKeyPair :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unCustomEvent
unsafeCastGObject = CustomEvent . unGObject
castToCustomEvent :: IsGObject obj => obj -> CustomEvent
castToCustomEvent = castTo gTypeCustomEvent "CustomEvent"
foreign import javascript unsafe "window[\"CustomEvent\"]" gTypeCustomEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsDOMError DOMError
instance IsGObject DOMError where
toGObject = GObject . unDOMError
unsafeCastGObject = DOMError . unGObject
castToDOMError :: IsGObject obj => obj -> DOMError
castToDOMError = castTo gTypeDOMError "DOMError"
foreign import javascript unsafe "window[\"DOMError\"]" gTypeDOMError :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unDOMImplementation
unsafeCastGObject = DOMImplementation . unGObject
castToDOMImplementation :: IsGObject obj => obj -> DOMImplementation
castToDOMImplementation = castTo gTypeDOMImplementation "DOMImplementation"
foreign import javascript unsafe "window[\"DOMImplementation\"]" gTypeDOMImplementation :: GType
#else
type IsDOMImplementation o = DOMImplementationClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unDOMNamedFlowCollection
unsafeCastGObject = DOMNamedFlowCollection . unGObject
castToDOMNamedFlowCollection :: IsGObject obj => obj -> DOMNamedFlowCollection
castToDOMNamedFlowCollection = castTo gTypeDOMNamedFlowCollection "DOMNamedFlowCollection"
foreign import javascript unsafe "window[\"WebKitNamedFlowCollection\"]" gTypeDOMNamedFlowCollection :: GType
#else
#ifndef USE_OLD_WEBKIT
type IsDOMNamedFlowCollection o = DOMNamedFlowCollectionClass o
#endif
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unDOMParser
unsafeCastGObject = DOMParser . unGObject
castToDOMParser :: IsGObject obj => obj -> DOMParser
castToDOMParser = castTo gTypeDOMParser "DOMParser"
foreign import javascript unsafe "window[\"DOMParser\"]" gTypeDOMParser :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unDOMSettableTokenList
unsafeCastGObject = DOMSettableTokenList . unGObject
castToDOMSettableTokenList :: IsGObject obj => obj -> DOMSettableTokenList
castToDOMSettableTokenList = castTo gTypeDOMSettableTokenList "DOMSettableTokenList"
foreign import javascript unsafe "window[\"DOMSettableTokenList\"]" gTypeDOMSettableTokenList :: GType
#else
type IsDOMSettableTokenList o = DOMSettableTokenListClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unDOMStringList
unsafeCastGObject = DOMStringList . unGObject
castToDOMStringList :: IsGObject obj => obj -> DOMStringList
castToDOMStringList = castTo gTypeDOMStringList "DOMStringList"
foreign import javascript unsafe "window[\"DOMStringList\"]" gTypeDOMStringList :: GType
#else
type IsDOMStringList o = DOMStringListClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unDOMStringMap
unsafeCastGObject = DOMStringMap . unGObject
castToDOMStringMap :: IsGObject obj => obj -> DOMStringMap
castToDOMStringMap = castTo gTypeDOMStringMap "DOMStringMap"
foreign import javascript unsafe "window[\"DOMStringMap\"]" gTypeDOMStringMap :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsDOMTokenList DOMTokenList
instance IsGObject DOMTokenList where
toGObject = GObject . unDOMTokenList
unsafeCastGObject = DOMTokenList . unGObject
castToDOMTokenList :: IsGObject obj => obj -> DOMTokenList
castToDOMTokenList = castTo gTypeDOMTokenList "DOMTokenList"
foreign import javascript unsafe "window[\"DOMTokenList\"]" gTypeDOMTokenList :: GType
#else
type IsDOMTokenList o = DOMTokenListClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unDataCue
unsafeCastGObject = DataCue . unGObject
castToDataCue :: IsGObject obj => obj -> DataCue
castToDataCue = castTo gTypeDataCue "DataCue"
foreign import javascript unsafe "window[\"WebKitDataCue\"]" gTypeDataCue :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unDataTransfer
unsafeCastGObject = DataTransfer . unGObject
castToDataTransfer :: IsGObject obj => obj -> DataTransfer
castToDataTransfer = castTo gTypeDataTransfer "DataTransfer"
foreign import javascript unsafe "window[\"DataTransfer\"]" gTypeDataTransfer :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unDataTransferItem
unsafeCastGObject = DataTransferItem . unGObject
castToDataTransferItem :: IsGObject obj => obj -> DataTransferItem
castToDataTransferItem = castTo gTypeDataTransferItem "DataTransferItem"
foreign import javascript unsafe "window[\"DataTransferItem\"]" gTypeDataTransferItem :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unDataTransferItemList
unsafeCastGObject = DataTransferItemList . unGObject
castToDataTransferItemList :: IsGObject obj => obj -> DataTransferItemList
castToDataTransferItemList = castTo gTypeDataTransferItemList "DataTransferItemList"
foreign import javascript unsafe "window[\"DataTransferItemList\"]" gTypeDataTransferItemList :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unDatabase
unsafeCastGObject = Database . unGObject
castToDatabase :: IsGObject obj => obj -> Database
castToDatabase = castTo gTypeDatabase "Database"
foreign import javascript unsafe "window[\"Database\"]" gTypeDatabase :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unDedicatedWorkerGlobalScope
unsafeCastGObject = DedicatedWorkerGlobalScope . unGObject
castToDedicatedWorkerGlobalScope :: IsGObject obj => obj -> DedicatedWorkerGlobalScope
castToDedicatedWorkerGlobalScope = castTo gTypeDedicatedWorkerGlobalScope "DedicatedWorkerGlobalScope"
foreign import javascript unsafe "window[\"DedicatedWorkerGlobalScope\"]" gTypeDedicatedWorkerGlobalScope :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unDelayNode
unsafeCastGObject = DelayNode . unGObject
castToDelayNode :: IsGObject obj => obj -> DelayNode
castToDelayNode = castTo gTypeDelayNode "DelayNode"
foreign import javascript unsafe "window[\"DelayNode\"]" gTypeDelayNode :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unDeviceMotionEvent
unsafeCastGObject = DeviceMotionEvent . unGObject
castToDeviceMotionEvent :: IsGObject obj => obj -> DeviceMotionEvent
castToDeviceMotionEvent = castTo gTypeDeviceMotionEvent "DeviceMotionEvent"
foreign import javascript unsafe "window[\"DeviceMotionEvent\"]" gTypeDeviceMotionEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unDeviceOrientationEvent
unsafeCastGObject = DeviceOrientationEvent . unGObject
castToDeviceOrientationEvent :: IsGObject obj => obj -> DeviceOrientationEvent
castToDeviceOrientationEvent = castTo gTypeDeviceOrientationEvent "DeviceOrientationEvent"
foreign import javascript unsafe "window[\"DeviceOrientationEvent\"]" gTypeDeviceOrientationEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unDeviceProximityEvent
unsafeCastGObject = DeviceProximityEvent . unGObject
castToDeviceProximityEvent :: IsGObject obj => obj -> DeviceProximityEvent
castToDeviceProximityEvent = castTo gTypeDeviceProximityEvent "DeviceProximityEvent"
foreign import javascript unsafe "window[\"DeviceProximityEvent\"]" gTypeDeviceProximityEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsDocument Document
instance IsNode Document
instance IsEventTarget Document
instance IsGObject Document where
toGObject = GObject . unDocument
unsafeCastGObject = Document . unGObject
castToDocument :: IsGObject obj => obj -> Document
castToDocument = castTo gTypeDocument "Document"
foreign import javascript unsafe "window[\"Document\"]" gTypeDocument :: GType
#else
type IsDocument o = DocumentClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unDocumentFragment
unsafeCastGObject = DocumentFragment . unGObject
castToDocumentFragment :: IsGObject obj => obj -> DocumentFragment
castToDocumentFragment = castTo gTypeDocumentFragment "DocumentFragment"
foreign import javascript unsafe "window[\"DocumentFragment\"]" gTypeDocumentFragment :: GType
#else
type IsDocumentFragment o = DocumentFragmentClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unDocumentType
unsafeCastGObject = DocumentType . unGObject
castToDocumentType :: IsGObject obj => obj -> DocumentType
castToDocumentType = castTo gTypeDocumentType "DocumentType"
foreign import javascript unsafe "window[\"DocumentType\"]" gTypeDocumentType :: GType
#else
type IsDocumentType o = DocumentTypeClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unDynamicsCompressorNode
unsafeCastGObject = DynamicsCompressorNode . unGObject
castToDynamicsCompressorNode :: IsGObject obj => obj -> DynamicsCompressorNode
castToDynamicsCompressorNode = castTo gTypeDynamicsCompressorNode "DynamicsCompressorNode"
foreign import javascript unsafe "window[\"DynamicsCompressorNode\"]" gTypeDynamicsCompressorNode :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unEXTBlendMinMax
unsafeCastGObject = EXTBlendMinMax . unGObject
castToEXTBlendMinMax :: IsGObject obj => obj -> EXTBlendMinMax
castToEXTBlendMinMax = castTo gTypeEXTBlendMinMax "EXTBlendMinMax"
foreign import javascript unsafe "window[\"EXTBlendMinMax\"]" gTypeEXTBlendMinMax :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unEXTFragDepth
unsafeCastGObject = EXTFragDepth . unGObject
castToEXTFragDepth :: IsGObject obj => obj -> EXTFragDepth
castToEXTFragDepth = castTo gTypeEXTFragDepth "EXTFragDepth"
foreign import javascript unsafe "window[\"EXTFragDepth\"]" gTypeEXTFragDepth :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unEXTShaderTextureLOD
unsafeCastGObject = EXTShaderTextureLOD . unGObject
castToEXTShaderTextureLOD :: IsGObject obj => obj -> EXTShaderTextureLOD
castToEXTShaderTextureLOD = castTo gTypeEXTShaderTextureLOD "EXTShaderTextureLOD"
foreign import javascript unsafe "window[\"EXTShaderTextureLOD\"]" gTypeEXTShaderTextureLOD :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unEXTTextureFilterAnisotropic
unsafeCastGObject = EXTTextureFilterAnisotropic . unGObject
castToEXTTextureFilterAnisotropic :: IsGObject obj => obj -> EXTTextureFilterAnisotropic
castToEXTTextureFilterAnisotropic = castTo gTypeEXTTextureFilterAnisotropic "EXTTextureFilterAnisotropic"
foreign import javascript unsafe "window[\"EXTTextureFilterAnisotropic\"]" gTypeEXTTextureFilterAnisotropic :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unEXTsRGB
unsafeCastGObject = EXTsRGB . unGObject
castToEXTsRGB :: IsGObject obj => obj -> EXTsRGB
castToEXTsRGB = castTo gTypeEXTsRGB "EXTsRGB"
foreign import javascript unsafe "window[\"EXTsRGB\"]" gTypeEXTsRGB :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsElement Element
instance IsNode Element
instance IsEventTarget Element
instance IsGObject Element where
toGObject = GObject . unElement
unsafeCastGObject = Element . unGObject
castToElement :: IsGObject obj => obj -> Element
castToElement = castTo gTypeElement "Element"
foreign import javascript unsafe "window[\"Element\"]" gTypeElement :: GType
#else
type IsElement o = ElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unEntity
unsafeCastGObject = Entity . unGObject
castToEntity :: IsGObject obj => obj -> Entity
castToEntity = castTo gTypeEntity "Entity"
foreign import javascript unsafe "window[\"Entity\"]" gTypeEntity :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unEntityReference
unsafeCastGObject = EntityReference . unGObject
castToEntityReference :: IsGObject obj => obj -> EntityReference
castToEntityReference = castTo gTypeEntityReference "EntityReference"
foreign import javascript unsafe "window[\"EntityReference\"]" gTypeEntityReference :: GType
#else
type IsEntityReference o = EntityReferenceClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unErrorEvent
unsafeCastGObject = ErrorEvent . unGObject
castToErrorEvent :: IsGObject obj => obj -> ErrorEvent
castToErrorEvent = castTo gTypeErrorEvent "ErrorEvent"
foreign import javascript unsafe "window[\"ErrorEvent\"]" gTypeErrorEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsEvent Event
instance IsGObject Event where
toGObject = GObject . unEvent
unsafeCastGObject = Event . unGObject
castToEvent :: IsGObject obj => obj -> Event
castToEvent = castTo gTypeEvent "Event"
foreign import javascript unsafe "window[\"Event\"]" gTypeEvent :: GType
#else
type IsEvent o = EventClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unEventListener
unsafeCastGObject = EventListener . unGObject
castToEventListener :: IsGObject obj => obj -> EventListener
castToEventListener = castTo gTypeEventListener "EventListener"
foreign import javascript unsafe "window[\"EventListener\"]" gTypeEventListener :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unEventSource
unsafeCastGObject = EventSource . unGObject
castToEventSource :: IsGObject obj => obj -> EventSource
castToEventSource = castTo gTypeEventSource "EventSource"
foreign import javascript unsafe "window[\"EventSource\"]" gTypeEventSource :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsEventTarget EventTarget
instance IsGObject EventTarget where
toGObject = GObject . unEventTarget
unsafeCastGObject = EventTarget . unGObject
castToEventTarget :: IsGObject obj => obj -> EventTarget
castToEventTarget = castTo gTypeEventTarget "EventTarget"
foreign import javascript unsafe "window[\"EventTarget\"]" gTypeEventTarget :: GType
#else
type IsEventTarget o = EventTargetClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unFile
unsafeCastGObject = File . unGObject
castToFile :: IsGObject obj => obj -> File
castToFile = castTo gTypeFile "File"
foreign import javascript unsafe "window[\"File\"]" gTypeFile :: GType
#else
type IsFile o = FileClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unFileError
unsafeCastGObject = FileError . unGObject
castToFileError :: IsGObject obj => obj -> FileError
castToFileError = castTo gTypeFileError "FileError"
foreign import javascript unsafe "window[\"FileError\"]" gTypeFileError :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unFileList
unsafeCastGObject = FileList . unGObject
castToFileList :: IsGObject obj => obj -> FileList
castToFileList = castTo gTypeFileList "FileList"
foreign import javascript unsafe "window[\"FileList\"]" gTypeFileList :: GType
#else
type IsFileList o = FileListClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unFileReader
unsafeCastGObject = FileReader . unGObject
castToFileReader :: IsGObject obj => obj -> FileReader
castToFileReader = castTo gTypeFileReader "FileReader"
foreign import javascript unsafe "window[\"FileReader\"]" gTypeFileReader :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unFileReaderSync
unsafeCastGObject = FileReaderSync . unGObject
castToFileReaderSync :: IsGObject obj => obj -> FileReaderSync
castToFileReaderSync = castTo gTypeFileReaderSync "FileReaderSync"
foreign import javascript unsafe "window[\"FileReaderSync\"]" gTypeFileReaderSync :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unFocusEvent
unsafeCastGObject = FocusEvent . unGObject
castToFocusEvent :: IsGObject obj => obj -> FocusEvent
castToFocusEvent = castTo gTypeFocusEvent "FocusEvent"
foreign import javascript unsafe "window[\"FocusEvent\"]" gTypeFocusEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unFontLoader
unsafeCastGObject = FontLoader . unGObject
castToFontLoader :: IsGObject obj => obj -> FontLoader
castToFontLoader = castTo gTypeFontLoader "FontLoader"
foreign import javascript unsafe "window[\"FontLoader\"]" gTypeFontLoader :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unFormData
unsafeCastGObject = FormData . unGObject
castToFormData :: IsGObject obj => obj -> FormData
castToFormData = castTo gTypeFormData "FormData"
foreign import javascript unsafe "window[\"FormData\"]" gTypeFormData :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unGainNode
unsafeCastGObject = GainNode . unGObject
castToGainNode :: IsGObject obj => obj -> GainNode
castToGainNode = castTo gTypeGainNode "GainNode"
foreign import javascript unsafe "window[\"GainNode\"]" gTypeGainNode :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unGamepad
unsafeCastGObject = Gamepad . unGObject
castToGamepad :: IsGObject obj => obj -> Gamepad
castToGamepad = castTo gTypeGamepad "Gamepad"
foreign import javascript unsafe "window[\"Gamepad\"]" gTypeGamepad :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unGamepadButton
unsafeCastGObject = GamepadButton . unGObject
castToGamepadButton :: IsGObject obj => obj -> GamepadButton
castToGamepadButton = castTo gTypeGamepadButton "GamepadButton"
foreign import javascript unsafe "window[\"GamepadButton\"]" gTypeGamepadButton :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unGamepadEvent
unsafeCastGObject = GamepadEvent . unGObject
castToGamepadEvent :: IsGObject obj => obj -> GamepadEvent
castToGamepadEvent = castTo gTypeGamepadEvent "GamepadEvent"
foreign import javascript unsafe "window[\"GamepadEvent\"]" gTypeGamepadEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unGeolocation
unsafeCastGObject = Geolocation . unGObject
castToGeolocation :: IsGObject obj => obj -> Geolocation
castToGeolocation = castTo gTypeGeolocation "Geolocation"
foreign import javascript unsafe "window[\"Geolocation\"]" gTypeGeolocation :: GType
#else
type IsGeolocation o = GeolocationClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unGeoposition
unsafeCastGObject = Geoposition . unGObject
castToGeoposition :: IsGObject obj => obj -> Geoposition
castToGeoposition = castTo gTypeGeoposition "Geoposition"
foreign import javascript unsafe "window[\"Geoposition\"]" gTypeGeoposition :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLAllCollection
unsafeCastGObject = HTMLAllCollection . unGObject
castToHTMLAllCollection :: IsGObject obj => obj -> HTMLAllCollection
castToHTMLAllCollection = castTo gTypeHTMLAllCollection "HTMLAllCollection"
foreign import javascript unsafe "window[\"HTMLAllCollection\"]" gTypeHTMLAllCollection :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLAnchorElement
unsafeCastGObject = HTMLAnchorElement . unGObject
castToHTMLAnchorElement :: IsGObject obj => obj -> HTMLAnchorElement
castToHTMLAnchorElement = castTo gTypeHTMLAnchorElement "HTMLAnchorElement"
foreign import javascript unsafe "window[\"HTMLAnchorElement\"]" gTypeHTMLAnchorElement :: GType
#else
type IsHTMLAnchorElement o = HTMLAnchorElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLAppletElement
unsafeCastGObject = HTMLAppletElement . unGObject
castToHTMLAppletElement :: IsGObject obj => obj -> HTMLAppletElement
castToHTMLAppletElement = castTo gTypeHTMLAppletElement "HTMLAppletElement"
foreign import javascript unsafe "window[\"HTMLAppletElement\"]" gTypeHTMLAppletElement :: GType
#else
type IsHTMLAppletElement o = HTMLAppletElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLAreaElement
unsafeCastGObject = HTMLAreaElement . unGObject
castToHTMLAreaElement :: IsGObject obj => obj -> HTMLAreaElement
castToHTMLAreaElement = castTo gTypeHTMLAreaElement "HTMLAreaElement"
foreign import javascript unsafe "window[\"HTMLAreaElement\"]" gTypeHTMLAreaElement :: GType
#else
type IsHTMLAreaElement o = HTMLAreaElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLAudioElement
unsafeCastGObject = HTMLAudioElement . unGObject
castToHTMLAudioElement :: IsGObject obj => obj -> HTMLAudioElement
castToHTMLAudioElement = castTo gTypeHTMLAudioElement "HTMLAudioElement"
foreign import javascript unsafe "window[\"HTMLAudioElement\"]" gTypeHTMLAudioElement :: GType
#else
type IsHTMLAudioElement o = HTMLAudioElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLBRElement
unsafeCastGObject = HTMLBRElement . unGObject
castToHTMLBRElement :: IsGObject obj => obj -> HTMLBRElement
castToHTMLBRElement = castTo gTypeHTMLBRElement "HTMLBRElement"
foreign import javascript unsafe "window[\"HTMLBRElement\"]" gTypeHTMLBRElement :: GType
#else
type IsHTMLBRElement o = HTMLBRElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLBaseElement
unsafeCastGObject = HTMLBaseElement . unGObject
castToHTMLBaseElement :: IsGObject obj => obj -> HTMLBaseElement
castToHTMLBaseElement = castTo gTypeHTMLBaseElement "HTMLBaseElement"
foreign import javascript unsafe "window[\"HTMLBaseElement\"]" gTypeHTMLBaseElement :: GType
#else
type IsHTMLBaseElement o = HTMLBaseElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLBaseFontElement
unsafeCastGObject = HTMLBaseFontElement . unGObject
castToHTMLBaseFontElement :: IsGObject obj => obj -> HTMLBaseFontElement
castToHTMLBaseFontElement = castTo gTypeHTMLBaseFontElement "HTMLBaseFontElement"
foreign import javascript unsafe "window[\"HTMLBaseFontElement\"]" gTypeHTMLBaseFontElement :: GType
#else
type IsHTMLBaseFontElement o = HTMLBaseFontElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLBodyElement
unsafeCastGObject = HTMLBodyElement . unGObject
castToHTMLBodyElement :: IsGObject obj => obj -> HTMLBodyElement
castToHTMLBodyElement = castTo gTypeHTMLBodyElement "HTMLBodyElement"
foreign import javascript unsafe "window[\"HTMLBodyElement\"]" gTypeHTMLBodyElement :: GType
#else
type IsHTMLBodyElement o = HTMLBodyElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLButtonElement
unsafeCastGObject = HTMLButtonElement . unGObject
castToHTMLButtonElement :: IsGObject obj => obj -> HTMLButtonElement
castToHTMLButtonElement = castTo gTypeHTMLButtonElement "HTMLButtonElement"
foreign import javascript unsafe "window[\"HTMLButtonElement\"]" gTypeHTMLButtonElement :: GType
#else
type IsHTMLButtonElement o = HTMLButtonElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLCanvasElement
unsafeCastGObject = HTMLCanvasElement . unGObject
castToHTMLCanvasElement :: IsGObject obj => obj -> HTMLCanvasElement
castToHTMLCanvasElement = castTo gTypeHTMLCanvasElement "HTMLCanvasElement"
foreign import javascript unsafe "window[\"HTMLCanvasElement\"]" gTypeHTMLCanvasElement :: GType
#else
type IsHTMLCanvasElement o = HTMLCanvasElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsHTMLCollection HTMLCollection
instance IsGObject HTMLCollection where
toGObject = GObject . unHTMLCollection
unsafeCastGObject = HTMLCollection . unGObject
castToHTMLCollection :: IsGObject obj => obj -> HTMLCollection
castToHTMLCollection = castTo gTypeHTMLCollection "HTMLCollection"
foreign import javascript unsafe "window[\"HTMLCollection\"]" gTypeHTMLCollection :: GType
#else
type IsHTMLCollection o = HTMLCollectionClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLDListElement
unsafeCastGObject = HTMLDListElement . unGObject
castToHTMLDListElement :: IsGObject obj => obj -> HTMLDListElement
castToHTMLDListElement = castTo gTypeHTMLDListElement "HTMLDListElement"
foreign import javascript unsafe "window[\"HTMLDListElement\"]" gTypeHTMLDListElement :: GType
#else
type IsHTMLDListElement o = HTMLDListElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLDataListElement
unsafeCastGObject = HTMLDataListElement . unGObject
castToHTMLDataListElement :: IsGObject obj => obj -> HTMLDataListElement
castToHTMLDataListElement = castTo gTypeHTMLDataListElement "HTMLDataListElement"
foreign import javascript unsafe "window[\"HTMLDataListElement\"]" gTypeHTMLDataListElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLDetailsElement
unsafeCastGObject = HTMLDetailsElement . unGObject
castToHTMLDetailsElement :: IsGObject obj => obj -> HTMLDetailsElement
castToHTMLDetailsElement = castTo gTypeHTMLDetailsElement "HTMLDetailsElement"
foreign import javascript unsafe "window[\"HTMLDetailsElement\"]" gTypeHTMLDetailsElement :: GType
#else
type IsHTMLDetailsElement o = HTMLDetailsElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLDirectoryElement
unsafeCastGObject = HTMLDirectoryElement . unGObject
castToHTMLDirectoryElement :: IsGObject obj => obj -> HTMLDirectoryElement
castToHTMLDirectoryElement = castTo gTypeHTMLDirectoryElement "HTMLDirectoryElement"
foreign import javascript unsafe "window[\"HTMLDirectoryElement\"]" gTypeHTMLDirectoryElement :: GType
#else
type IsHTMLDirectoryElement o = HTMLDirectoryElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLDivElement
unsafeCastGObject = HTMLDivElement . unGObject
castToHTMLDivElement :: IsGObject obj => obj -> HTMLDivElement
castToHTMLDivElement = castTo gTypeHTMLDivElement "HTMLDivElement"
foreign import javascript unsafe "window[\"HTMLDivElement\"]" gTypeHTMLDivElement :: GType
#else
type IsHTMLDivElement o = HTMLDivElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLDocument
unsafeCastGObject = HTMLDocument . unGObject
castToHTMLDocument :: IsGObject obj => obj -> HTMLDocument
castToHTMLDocument = castTo gTypeHTMLDocument "HTMLDocument"
foreign import javascript unsafe "window[\"HTMLDocument\"]" gTypeHTMLDocument :: GType
#else
type IsHTMLDocument o = HTMLDocumentClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsHTMLElement HTMLElement
instance IsElement HTMLElement
instance IsNode HTMLElement
instance IsEventTarget HTMLElement
instance IsGObject HTMLElement where
toGObject = GObject . unHTMLElement
unsafeCastGObject = HTMLElement . unGObject
castToHTMLElement :: IsGObject obj => obj -> HTMLElement
castToHTMLElement = castTo gTypeHTMLElement "HTMLElement"
foreign import javascript unsafe "window[\"HTMLElement\"]" gTypeHTMLElement :: GType
#else
type IsHTMLElement o = HTMLElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLEmbedElement
unsafeCastGObject = HTMLEmbedElement . unGObject
castToHTMLEmbedElement :: IsGObject obj => obj -> HTMLEmbedElement
castToHTMLEmbedElement = castTo gTypeHTMLEmbedElement "HTMLEmbedElement"
foreign import javascript unsafe "window[\"HTMLEmbedElement\"]" gTypeHTMLEmbedElement :: GType
#else
type IsHTMLEmbedElement o = HTMLEmbedElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLFieldSetElement
unsafeCastGObject = HTMLFieldSetElement . unGObject
castToHTMLFieldSetElement :: IsGObject obj => obj -> HTMLFieldSetElement
castToHTMLFieldSetElement = castTo gTypeHTMLFieldSetElement "HTMLFieldSetElement"
foreign import javascript unsafe "window[\"HTMLFieldSetElement\"]" gTypeHTMLFieldSetElement :: GType
#else
type IsHTMLFieldSetElement o = HTMLFieldSetElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLFontElement
unsafeCastGObject = HTMLFontElement . unGObject
castToHTMLFontElement :: IsGObject obj => obj -> HTMLFontElement
castToHTMLFontElement = castTo gTypeHTMLFontElement "HTMLFontElement"
foreign import javascript unsafe "window[\"HTMLFontElement\"]" gTypeHTMLFontElement :: GType
#else
type IsHTMLFontElement o = HTMLFontElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLFormControlsCollection
unsafeCastGObject = HTMLFormControlsCollection . unGObject
castToHTMLFormControlsCollection :: IsGObject obj => obj -> HTMLFormControlsCollection
castToHTMLFormControlsCollection = castTo gTypeHTMLFormControlsCollection "HTMLFormControlsCollection"
foreign import javascript unsafe "window[\"HTMLFormControlsCollection\"]" gTypeHTMLFormControlsCollection :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLFormElement
unsafeCastGObject = HTMLFormElement . unGObject
castToHTMLFormElement :: IsGObject obj => obj -> HTMLFormElement
castToHTMLFormElement = castTo gTypeHTMLFormElement "HTMLFormElement"
foreign import javascript unsafe "window[\"HTMLFormElement\"]" gTypeHTMLFormElement :: GType
#else
type IsHTMLFormElement o = HTMLFormElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLFrameElement
unsafeCastGObject = HTMLFrameElement . unGObject
castToHTMLFrameElement :: IsGObject obj => obj -> HTMLFrameElement
castToHTMLFrameElement = castTo gTypeHTMLFrameElement "HTMLFrameElement"
foreign import javascript unsafe "window[\"HTMLFrameElement\"]" gTypeHTMLFrameElement :: GType
#else
type IsHTMLFrameElement o = HTMLFrameElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLFrameSetElement
unsafeCastGObject = HTMLFrameSetElement . unGObject
castToHTMLFrameSetElement :: IsGObject obj => obj -> HTMLFrameSetElement
castToHTMLFrameSetElement = castTo gTypeHTMLFrameSetElement "HTMLFrameSetElement"
foreign import javascript unsafe "window[\"HTMLFrameSetElement\"]" gTypeHTMLFrameSetElement :: GType
#else
type IsHTMLFrameSetElement o = HTMLFrameSetElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLHRElement
unsafeCastGObject = HTMLHRElement . unGObject
castToHTMLHRElement :: IsGObject obj => obj -> HTMLHRElement
castToHTMLHRElement = castTo gTypeHTMLHRElement "HTMLHRElement"
foreign import javascript unsafe "window[\"HTMLHRElement\"]" gTypeHTMLHRElement :: GType
#else
type IsHTMLHRElement o = HTMLHRElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLHeadElement
unsafeCastGObject = HTMLHeadElement . unGObject
castToHTMLHeadElement :: IsGObject obj => obj -> HTMLHeadElement
castToHTMLHeadElement = castTo gTypeHTMLHeadElement "HTMLHeadElement"
foreign import javascript unsafe "window[\"HTMLHeadElement\"]" gTypeHTMLHeadElement :: GType
#else
type IsHTMLHeadElement o = HTMLHeadElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLHeadingElement
unsafeCastGObject = HTMLHeadingElement . unGObject
castToHTMLHeadingElement :: IsGObject obj => obj -> HTMLHeadingElement
castToHTMLHeadingElement = castTo gTypeHTMLHeadingElement "HTMLHeadingElement"
foreign import javascript unsafe "window[\"HTMLHeadingElement\"]" gTypeHTMLHeadingElement :: GType
#else
type IsHTMLHeadingElement o = HTMLHeadingElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLHtmlElement
unsafeCastGObject = HTMLHtmlElement . unGObject
castToHTMLHtmlElement :: IsGObject obj => obj -> HTMLHtmlElement
castToHTMLHtmlElement = castTo gTypeHTMLHtmlElement "HTMLHtmlElement"
foreign import javascript unsafe "window[\"HTMLHtmlElement\"]" gTypeHTMLHtmlElement :: GType
#else
type IsHTMLHtmlElement o = HTMLHtmlElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLIFrameElement
unsafeCastGObject = HTMLIFrameElement . unGObject
castToHTMLIFrameElement :: IsGObject obj => obj -> HTMLIFrameElement
castToHTMLIFrameElement = castTo gTypeHTMLIFrameElement "HTMLIFrameElement"
foreign import javascript unsafe "window[\"HTMLIFrameElement\"]" gTypeHTMLIFrameElement :: GType
#else
type IsHTMLIFrameElement o = HTMLIFrameElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLImageElement
unsafeCastGObject = HTMLImageElement . unGObject
castToHTMLImageElement :: IsGObject obj => obj -> HTMLImageElement
castToHTMLImageElement = castTo gTypeHTMLImageElement "HTMLImageElement"
foreign import javascript unsafe "window[\"HTMLImageElement\"]" gTypeHTMLImageElement :: GType
#else
type IsHTMLImageElement o = HTMLImageElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLInputElement
unsafeCastGObject = HTMLInputElement . unGObject
castToHTMLInputElement :: IsGObject obj => obj -> HTMLInputElement
castToHTMLInputElement = castTo gTypeHTMLInputElement "HTMLInputElement"
foreign import javascript unsafe "window[\"HTMLInputElement\"]" gTypeHTMLInputElement :: GType
#else
type IsHTMLInputElement o = HTMLInputElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLKeygenElement
unsafeCastGObject = HTMLKeygenElement . unGObject
castToHTMLKeygenElement :: IsGObject obj => obj -> HTMLKeygenElement
castToHTMLKeygenElement = castTo gTypeHTMLKeygenElement "HTMLKeygenElement"
foreign import javascript unsafe "window[\"HTMLKeygenElement\"]" gTypeHTMLKeygenElement :: GType
#else
type IsHTMLKeygenElement o = HTMLKeygenElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLLIElement
unsafeCastGObject = HTMLLIElement . unGObject
castToHTMLLIElement :: IsGObject obj => obj -> HTMLLIElement
castToHTMLLIElement = castTo gTypeHTMLLIElement "HTMLLIElement"
foreign import javascript unsafe "window[\"HTMLLIElement\"]" gTypeHTMLLIElement :: GType
#else
type IsHTMLLIElement o = HTMLLIElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLLabelElement
unsafeCastGObject = HTMLLabelElement . unGObject
castToHTMLLabelElement :: IsGObject obj => obj -> HTMLLabelElement
castToHTMLLabelElement = castTo gTypeHTMLLabelElement "HTMLLabelElement"
foreign import javascript unsafe "window[\"HTMLLabelElement\"]" gTypeHTMLLabelElement :: GType
#else
type IsHTMLLabelElement o = HTMLLabelElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLLegendElement
unsafeCastGObject = HTMLLegendElement . unGObject
castToHTMLLegendElement :: IsGObject obj => obj -> HTMLLegendElement
castToHTMLLegendElement = castTo gTypeHTMLLegendElement "HTMLLegendElement"
foreign import javascript unsafe "window[\"HTMLLegendElement\"]" gTypeHTMLLegendElement :: GType
#else
type IsHTMLLegendElement o = HTMLLegendElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLLinkElement
unsafeCastGObject = HTMLLinkElement . unGObject
castToHTMLLinkElement :: IsGObject obj => obj -> HTMLLinkElement
castToHTMLLinkElement = castTo gTypeHTMLLinkElement "HTMLLinkElement"
foreign import javascript unsafe "window[\"HTMLLinkElement\"]" gTypeHTMLLinkElement :: GType
#else
type IsHTMLLinkElement o = HTMLLinkElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLMapElement
unsafeCastGObject = HTMLMapElement . unGObject
castToHTMLMapElement :: IsGObject obj => obj -> HTMLMapElement
castToHTMLMapElement = castTo gTypeHTMLMapElement "HTMLMapElement"
foreign import javascript unsafe "window[\"HTMLMapElement\"]" gTypeHTMLMapElement :: GType
#else
type IsHTMLMapElement o = HTMLMapElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLMarqueeElement
unsafeCastGObject = HTMLMarqueeElement . unGObject
castToHTMLMarqueeElement :: IsGObject obj => obj -> HTMLMarqueeElement
castToHTMLMarqueeElement = castTo gTypeHTMLMarqueeElement "HTMLMarqueeElement"
foreign import javascript unsafe "window[\"HTMLMarqueeElement\"]" gTypeHTMLMarqueeElement :: GType
#else
type IsHTMLMarqueeElement o = HTMLMarqueeElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsHTMLMediaElement HTMLMediaElement
instance IsHTMLElement HTMLMediaElement
instance IsElement HTMLMediaElement
instance IsNode HTMLMediaElement
instance IsEventTarget HTMLMediaElement
instance IsGObject HTMLMediaElement where
toGObject = GObject . unHTMLMediaElement
unsafeCastGObject = HTMLMediaElement . unGObject
castToHTMLMediaElement :: IsGObject obj => obj -> HTMLMediaElement
castToHTMLMediaElement = castTo gTypeHTMLMediaElement "HTMLMediaElement"
foreign import javascript unsafe "window[\"HTMLMediaElement\"]" gTypeHTMLMediaElement :: GType
#else
type IsHTMLMediaElement o = HTMLMediaElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLMenuElement
unsafeCastGObject = HTMLMenuElement . unGObject
castToHTMLMenuElement :: IsGObject obj => obj -> HTMLMenuElement
castToHTMLMenuElement = castTo gTypeHTMLMenuElement "HTMLMenuElement"
foreign import javascript unsafe "window[\"HTMLMenuElement\"]" gTypeHTMLMenuElement :: GType
#else
type IsHTMLMenuElement o = HTMLMenuElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLMetaElement
unsafeCastGObject = HTMLMetaElement . unGObject
castToHTMLMetaElement :: IsGObject obj => obj -> HTMLMetaElement
castToHTMLMetaElement = castTo gTypeHTMLMetaElement "HTMLMetaElement"
foreign import javascript unsafe "window[\"HTMLMetaElement\"]" gTypeHTMLMetaElement :: GType
#else
type IsHTMLMetaElement o = HTMLMetaElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLMeterElement
unsafeCastGObject = HTMLMeterElement . unGObject
castToHTMLMeterElement :: IsGObject obj => obj -> HTMLMeterElement
castToHTMLMeterElement = castTo gTypeHTMLMeterElement "HTMLMeterElement"
foreign import javascript unsafe "window[\"HTMLMeterElement\"]" gTypeHTMLMeterElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLModElement
unsafeCastGObject = HTMLModElement . unGObject
castToHTMLModElement :: IsGObject obj => obj -> HTMLModElement
castToHTMLModElement = castTo gTypeHTMLModElement "HTMLModElement"
foreign import javascript unsafe "window[\"HTMLModElement\"]" gTypeHTMLModElement :: GType
#else
type IsHTMLModElement o = HTMLModElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLOListElement
unsafeCastGObject = HTMLOListElement . unGObject
castToHTMLOListElement :: IsGObject obj => obj -> HTMLOListElement
castToHTMLOListElement = castTo gTypeHTMLOListElement "HTMLOListElement"
foreign import javascript unsafe "window[\"HTMLOListElement\"]" gTypeHTMLOListElement :: GType
#else
type IsHTMLOListElement o = HTMLOListElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLObjectElement
unsafeCastGObject = HTMLObjectElement . unGObject
castToHTMLObjectElement :: IsGObject obj => obj -> HTMLObjectElement
castToHTMLObjectElement = castTo gTypeHTMLObjectElement "HTMLObjectElement"
foreign import javascript unsafe "window[\"HTMLObjectElement\"]" gTypeHTMLObjectElement :: GType
#else
type IsHTMLObjectElement o = HTMLObjectElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLOptGroupElement
unsafeCastGObject = HTMLOptGroupElement . unGObject
castToHTMLOptGroupElement :: IsGObject obj => obj -> HTMLOptGroupElement
castToHTMLOptGroupElement = castTo gTypeHTMLOptGroupElement "HTMLOptGroupElement"
foreign import javascript unsafe "window[\"HTMLOptGroupElement\"]" gTypeHTMLOptGroupElement :: GType
#else
type IsHTMLOptGroupElement o = HTMLOptGroupElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLOptionElement
unsafeCastGObject = HTMLOptionElement . unGObject
castToHTMLOptionElement :: IsGObject obj => obj -> HTMLOptionElement
castToHTMLOptionElement = castTo gTypeHTMLOptionElement "HTMLOptionElement"
foreign import javascript unsafe "window[\"HTMLOptionElement\"]" gTypeHTMLOptionElement :: GType
#else
type IsHTMLOptionElement o = HTMLOptionElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLOptionsCollection
unsafeCastGObject = HTMLOptionsCollection . unGObject
castToHTMLOptionsCollection :: IsGObject obj => obj -> HTMLOptionsCollection
castToHTMLOptionsCollection = castTo gTypeHTMLOptionsCollection "HTMLOptionsCollection"
foreign import javascript unsafe "window[\"HTMLOptionsCollection\"]" gTypeHTMLOptionsCollection :: GType
#else
type IsHTMLOptionsCollection o = HTMLOptionsCollectionClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLOutputElement
unsafeCastGObject = HTMLOutputElement . unGObject
castToHTMLOutputElement :: IsGObject obj => obj -> HTMLOutputElement
castToHTMLOutputElement = castTo gTypeHTMLOutputElement "HTMLOutputElement"
foreign import javascript unsafe "window[\"HTMLOutputElement\"]" gTypeHTMLOutputElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLParagraphElement
unsafeCastGObject = HTMLParagraphElement . unGObject
castToHTMLParagraphElement :: IsGObject obj => obj -> HTMLParagraphElement
castToHTMLParagraphElement = castTo gTypeHTMLParagraphElement "HTMLParagraphElement"
foreign import javascript unsafe "window[\"HTMLParagraphElement\"]" gTypeHTMLParagraphElement :: GType
#else
type IsHTMLParagraphElement o = HTMLParagraphElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLParamElement
unsafeCastGObject = HTMLParamElement . unGObject
castToHTMLParamElement :: IsGObject obj => obj -> HTMLParamElement
castToHTMLParamElement = castTo gTypeHTMLParamElement "HTMLParamElement"
foreign import javascript unsafe "window[\"HTMLParamElement\"]" gTypeHTMLParamElement :: GType
#else
type IsHTMLParamElement o = HTMLParamElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLPreElement
unsafeCastGObject = HTMLPreElement . unGObject
castToHTMLPreElement :: IsGObject obj => obj -> HTMLPreElement
castToHTMLPreElement = castTo gTypeHTMLPreElement "HTMLPreElement"
foreign import javascript unsafe "window[\"HTMLPreElement\"]" gTypeHTMLPreElement :: GType
#else
type IsHTMLPreElement o = HTMLPreElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLProgressElement
unsafeCastGObject = HTMLProgressElement . unGObject
castToHTMLProgressElement :: IsGObject obj => obj -> HTMLProgressElement
castToHTMLProgressElement = castTo gTypeHTMLProgressElement "HTMLProgressElement"
foreign import javascript unsafe "window[\"HTMLProgressElement\"]" gTypeHTMLProgressElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLQuoteElement
unsafeCastGObject = HTMLQuoteElement . unGObject
castToHTMLQuoteElement :: IsGObject obj => obj -> HTMLQuoteElement
castToHTMLQuoteElement = castTo gTypeHTMLQuoteElement "HTMLQuoteElement"
foreign import javascript unsafe "window[\"HTMLQuoteElement\"]" gTypeHTMLQuoteElement :: GType
#else
type IsHTMLQuoteElement o = HTMLQuoteElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLScriptElement
unsafeCastGObject = HTMLScriptElement . unGObject
castToHTMLScriptElement :: IsGObject obj => obj -> HTMLScriptElement
castToHTMLScriptElement = castTo gTypeHTMLScriptElement "HTMLScriptElement"
foreign import javascript unsafe "window[\"HTMLScriptElement\"]" gTypeHTMLScriptElement :: GType
#else
type IsHTMLScriptElement o = HTMLScriptElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLSelectElement
unsafeCastGObject = HTMLSelectElement . unGObject
castToHTMLSelectElement :: IsGObject obj => obj -> HTMLSelectElement
castToHTMLSelectElement = castTo gTypeHTMLSelectElement "HTMLSelectElement"
foreign import javascript unsafe "window[\"HTMLSelectElement\"]" gTypeHTMLSelectElement :: GType
#else
type IsHTMLSelectElement o = HTMLSelectElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLSourceElement
unsafeCastGObject = HTMLSourceElement . unGObject
castToHTMLSourceElement :: IsGObject obj => obj -> HTMLSourceElement
castToHTMLSourceElement = castTo gTypeHTMLSourceElement "HTMLSourceElement"
foreign import javascript unsafe "window[\"HTMLSourceElement\"]" gTypeHTMLSourceElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLSpanElement
unsafeCastGObject = HTMLSpanElement . unGObject
castToHTMLSpanElement :: IsGObject obj => obj -> HTMLSpanElement
castToHTMLSpanElement = castTo gTypeHTMLSpanElement "HTMLSpanElement"
foreign import javascript unsafe "window[\"HTMLSpanElement\"]" gTypeHTMLSpanElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLStyleElement
unsafeCastGObject = HTMLStyleElement . unGObject
castToHTMLStyleElement :: IsGObject obj => obj -> HTMLStyleElement
castToHTMLStyleElement = castTo gTypeHTMLStyleElement "HTMLStyleElement"
foreign import javascript unsafe "window[\"HTMLStyleElement\"]" gTypeHTMLStyleElement :: GType
#else
type IsHTMLStyleElement o = HTMLStyleElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLTableCaptionElement
unsafeCastGObject = HTMLTableCaptionElement . unGObject
castToHTMLTableCaptionElement :: IsGObject obj => obj -> HTMLTableCaptionElement
castToHTMLTableCaptionElement = castTo gTypeHTMLTableCaptionElement "HTMLTableCaptionElement"
foreign import javascript unsafe "window[\"HTMLTableCaptionElement\"]" gTypeHTMLTableCaptionElement :: GType
#else
type IsHTMLTableCaptionElement o = HTMLTableCaptionElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLTableCellElement
unsafeCastGObject = HTMLTableCellElement . unGObject
castToHTMLTableCellElement :: IsGObject obj => obj -> HTMLTableCellElement
castToHTMLTableCellElement = castTo gTypeHTMLTableCellElement "HTMLTableCellElement"
foreign import javascript unsafe "window[\"HTMLTableCellElement\"]" gTypeHTMLTableCellElement :: GType
#else
type IsHTMLTableCellElement o = HTMLTableCellElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLTableColElement
unsafeCastGObject = HTMLTableColElement . unGObject
castToHTMLTableColElement :: IsGObject obj => obj -> HTMLTableColElement
castToHTMLTableColElement = castTo gTypeHTMLTableColElement "HTMLTableColElement"
foreign import javascript unsafe "window[\"HTMLTableColElement\"]" gTypeHTMLTableColElement :: GType
#else
type IsHTMLTableColElement o = HTMLTableColElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLTableElement
unsafeCastGObject = HTMLTableElement . unGObject
castToHTMLTableElement :: IsGObject obj => obj -> HTMLTableElement
castToHTMLTableElement = castTo gTypeHTMLTableElement "HTMLTableElement"
foreign import javascript unsafe "window[\"HTMLTableElement\"]" gTypeHTMLTableElement :: GType
#else
type IsHTMLTableElement o = HTMLTableElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLTableRowElement
unsafeCastGObject = HTMLTableRowElement . unGObject
castToHTMLTableRowElement :: IsGObject obj => obj -> HTMLTableRowElement
castToHTMLTableRowElement = castTo gTypeHTMLTableRowElement "HTMLTableRowElement"
foreign import javascript unsafe "window[\"HTMLTableRowElement\"]" gTypeHTMLTableRowElement :: GType
#else
type IsHTMLTableRowElement o = HTMLTableRowElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLTableSectionElement
unsafeCastGObject = HTMLTableSectionElement . unGObject
castToHTMLTableSectionElement :: IsGObject obj => obj -> HTMLTableSectionElement
castToHTMLTableSectionElement = castTo gTypeHTMLTableSectionElement "HTMLTableSectionElement"
foreign import javascript unsafe "window[\"HTMLTableSectionElement\"]" gTypeHTMLTableSectionElement :: GType
#else
type IsHTMLTableSectionElement o = HTMLTableSectionElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLTemplateElement
unsafeCastGObject = HTMLTemplateElement . unGObject
castToHTMLTemplateElement :: IsGObject obj => obj -> HTMLTemplateElement
castToHTMLTemplateElement = castTo gTypeHTMLTemplateElement "HTMLTemplateElement"
foreign import javascript unsafe "window[\"HTMLTemplateElement\"]" gTypeHTMLTemplateElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLTextAreaElement
unsafeCastGObject = HTMLTextAreaElement . unGObject
castToHTMLTextAreaElement :: IsGObject obj => obj -> HTMLTextAreaElement
castToHTMLTextAreaElement = castTo gTypeHTMLTextAreaElement "HTMLTextAreaElement"
foreign import javascript unsafe "window[\"HTMLTextAreaElement\"]" gTypeHTMLTextAreaElement :: GType
#else
type IsHTMLTextAreaElement o = HTMLTextAreaElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLTitleElement
unsafeCastGObject = HTMLTitleElement . unGObject
castToHTMLTitleElement :: IsGObject obj => obj -> HTMLTitleElement
castToHTMLTitleElement = castTo gTypeHTMLTitleElement "HTMLTitleElement"
foreign import javascript unsafe "window[\"HTMLTitleElement\"]" gTypeHTMLTitleElement :: GType
#else
type IsHTMLTitleElement o = HTMLTitleElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLTrackElement
unsafeCastGObject = HTMLTrackElement . unGObject
castToHTMLTrackElement :: IsGObject obj => obj -> HTMLTrackElement
castToHTMLTrackElement = castTo gTypeHTMLTrackElement "HTMLTrackElement"
foreign import javascript unsafe "window[\"HTMLTrackElement\"]" gTypeHTMLTrackElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLUListElement
unsafeCastGObject = HTMLUListElement . unGObject
castToHTMLUListElement :: IsGObject obj => obj -> HTMLUListElement
castToHTMLUListElement = castTo gTypeHTMLUListElement "HTMLUListElement"
foreign import javascript unsafe "window[\"HTMLUListElement\"]" gTypeHTMLUListElement :: GType
#else
type IsHTMLUListElement o = HTMLUListElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLUnknownElement
unsafeCastGObject = HTMLUnknownElement . unGObject
castToHTMLUnknownElement :: IsGObject obj => obj -> HTMLUnknownElement
castToHTMLUnknownElement = castTo gTypeHTMLUnknownElement "HTMLUnknownElement"
foreign import javascript unsafe "window[\"HTMLUnknownElement\"]" gTypeHTMLUnknownElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHTMLVideoElement
unsafeCastGObject = HTMLVideoElement . unGObject
castToHTMLVideoElement :: IsGObject obj => obj -> HTMLVideoElement
castToHTMLVideoElement = castTo gTypeHTMLVideoElement "HTMLVideoElement"
foreign import javascript unsafe "window[\"HTMLVideoElement\"]" gTypeHTMLVideoElement :: GType
#else
type IsHTMLVideoElement o = HTMLVideoElementClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHashChangeEvent
unsafeCastGObject = HashChangeEvent . unGObject
castToHashChangeEvent :: IsGObject obj => obj -> HashChangeEvent
castToHashChangeEvent = castTo gTypeHashChangeEvent "HashChangeEvent"
foreign import javascript unsafe "window[\"HashChangeEvent\"]" gTypeHashChangeEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unHistory
unsafeCastGObject = History . unGObject
castToHistory :: IsGObject obj => obj -> History
castToHistory = castTo gTypeHistory "History"
foreign import javascript unsafe "window[\"History\"]" gTypeHistory :: GType
#else
type IsHistory o = HistoryClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unIDBAny
unsafeCastGObject = IDBAny . unGObject
castToIDBAny :: IsGObject obj => obj -> IDBAny
castToIDBAny = castTo gTypeIDBAny "IDBAny"
foreign import javascript unsafe "window[\"IDBAny\"]" gTypeIDBAny :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsIDBCursor IDBCursor
instance IsGObject IDBCursor where
toGObject = GObject . unIDBCursor
unsafeCastGObject = IDBCursor . unGObject
castToIDBCursor :: IsGObject obj => obj -> IDBCursor
castToIDBCursor = castTo gTypeIDBCursor "IDBCursor"
foreign import javascript unsafe "window[\"IDBCursor\"]" gTypeIDBCursor :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unIDBCursorWithValue
unsafeCastGObject = IDBCursorWithValue . unGObject
castToIDBCursorWithValue :: IsGObject obj => obj -> IDBCursorWithValue
castToIDBCursorWithValue = castTo gTypeIDBCursorWithValue "IDBCursorWithValue"
foreign import javascript unsafe "window[\"IDBCursorWithValue\"]" gTypeIDBCursorWithValue :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unIDBDatabase
unsafeCastGObject = IDBDatabase . unGObject
castToIDBDatabase :: IsGObject obj => obj -> IDBDatabase
castToIDBDatabase = castTo gTypeIDBDatabase "IDBDatabase"
foreign import javascript unsafe "window[\"IDBDatabase\"]" gTypeIDBDatabase :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unIDBFactory
unsafeCastGObject = IDBFactory . unGObject
castToIDBFactory :: IsGObject obj => obj -> IDBFactory
castToIDBFactory = castTo gTypeIDBFactory "IDBFactory"
foreign import javascript unsafe "window[\"IDBFactory\"]" gTypeIDBFactory :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unIDBIndex
unsafeCastGObject = IDBIndex . unGObject
castToIDBIndex :: IsGObject obj => obj -> IDBIndex
castToIDBIndex = castTo gTypeIDBIndex "IDBIndex"
foreign import javascript unsafe "window[\"IDBIndex\"]" gTypeIDBIndex :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unIDBKeyRange
unsafeCastGObject = IDBKeyRange . unGObject
castToIDBKeyRange :: IsGObject obj => obj -> IDBKeyRange
castToIDBKeyRange = castTo gTypeIDBKeyRange "IDBKeyRange"
foreign import javascript unsafe "window[\"IDBKeyRange\"]" gTypeIDBKeyRange :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unIDBObjectStore
unsafeCastGObject = IDBObjectStore . unGObject
castToIDBObjectStore :: IsGObject obj => obj -> IDBObjectStore
castToIDBObjectStore = castTo gTypeIDBObjectStore "IDBObjectStore"
foreign import javascript unsafe "window[\"IDBObjectStore\"]" gTypeIDBObjectStore :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unIDBOpenDBRequest
unsafeCastGObject = IDBOpenDBRequest . unGObject
castToIDBOpenDBRequest :: IsGObject obj => obj -> IDBOpenDBRequest
castToIDBOpenDBRequest = castTo gTypeIDBOpenDBRequest "IDBOpenDBRequest"
foreign import javascript unsafe "window[\"IDBOpenDBRequest\"]" gTypeIDBOpenDBRequest :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsIDBRequest IDBRequest
instance IsEventTarget IDBRequest
instance IsGObject IDBRequest where
toGObject = GObject . unIDBRequest
unsafeCastGObject = IDBRequest . unGObject
castToIDBRequest :: IsGObject obj => obj -> IDBRequest
castToIDBRequest = castTo gTypeIDBRequest "IDBRequest"
foreign import javascript unsafe "window[\"IDBRequest\"]" gTypeIDBRequest :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unIDBTransaction
unsafeCastGObject = IDBTransaction . unGObject
castToIDBTransaction :: IsGObject obj => obj -> IDBTransaction
castToIDBTransaction = castTo gTypeIDBTransaction "IDBTransaction"
foreign import javascript unsafe "window[\"IDBTransaction\"]" gTypeIDBTransaction :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unIDBVersionChangeEvent
unsafeCastGObject = IDBVersionChangeEvent . unGObject
castToIDBVersionChangeEvent :: IsGObject obj => obj -> IDBVersionChangeEvent
castToIDBVersionChangeEvent = castTo gTypeIDBVersionChangeEvent "IDBVersionChangeEvent"
foreign import javascript unsafe "window[\"IDBVersionChangeEvent\"]" gTypeIDBVersionChangeEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unImageData
unsafeCastGObject = ImageData . unGObject
castToImageData :: IsGObject obj => obj -> ImageData
castToImageData = castTo gTypeImageData "ImageData"
foreign import javascript unsafe "window[\"ImageData\"]" gTypeImageData :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unInspectorFrontendHost
unsafeCastGObject = InspectorFrontendHost . unGObject
castToInspectorFrontendHost :: IsGObject obj => obj -> InspectorFrontendHost
castToInspectorFrontendHost = castTo gTypeInspectorFrontendHost "InspectorFrontendHost"
foreign import javascript unsafe "window[\"InspectorFrontendHost\"]" gTypeInspectorFrontendHost :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unInternalSettings
unsafeCastGObject = InternalSettings . unGObject
castToInternalSettings :: IsGObject obj => obj -> InternalSettings
castToInternalSettings = castTo gTypeInternalSettings "InternalSettings"
foreign import javascript unsafe "window[\"InternalSettings\"]" gTypeInternalSettings :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unInternals
unsafeCastGObject = Internals . unGObject
castToInternals :: IsGObject obj => obj -> Internals
castToInternals = castTo gTypeInternals "Internals"
foreign import javascript unsafe "window[\"Internals\"]" gTypeInternals :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unKeyboardEvent
unsafeCastGObject = KeyboardEvent . unGObject
castToKeyboardEvent :: IsGObject obj => obj -> KeyboardEvent
castToKeyboardEvent = castTo gTypeKeyboardEvent "KeyboardEvent"
foreign import javascript unsafe "window[\"KeyboardEvent\"]" gTypeKeyboardEvent :: GType
#else
#ifndef USE_OLD_WEBKIT
type IsKeyboardEvent o = KeyboardEventClass o
#endif
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unLocation
unsafeCastGObject = Location . unGObject
castToLocation :: IsGObject obj => obj -> Location
castToLocation = castTo gTypeLocation "Location"
foreign import javascript unsafe "window[\"Location\"]" gTypeLocation :: GType
#else
type IsLocation o = LocationClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMallocStatistics
unsafeCastGObject = MallocStatistics . unGObject
castToMallocStatistics :: IsGObject obj => obj -> MallocStatistics
castToMallocStatistics = castTo gTypeMallocStatistics "MallocStatistics"
foreign import javascript unsafe "window[\"MallocStatistics\"]" gTypeMallocStatistics :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMediaController
unsafeCastGObject = MediaController . unGObject
castToMediaController :: IsGObject obj => obj -> MediaController
castToMediaController = castTo gTypeMediaController "MediaController"
foreign import javascript unsafe "window[\"MediaController\"]" gTypeMediaController :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMediaControlsHost
unsafeCastGObject = MediaControlsHost . unGObject
castToMediaControlsHost :: IsGObject obj => obj -> MediaControlsHost
castToMediaControlsHost = castTo gTypeMediaControlsHost "MediaControlsHost"
foreign import javascript unsafe "window[\"MediaControlsHost\"]" gTypeMediaControlsHost :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMediaElementAudioSourceNode
unsafeCastGObject = MediaElementAudioSourceNode . unGObject
castToMediaElementAudioSourceNode :: IsGObject obj => obj -> MediaElementAudioSourceNode
castToMediaElementAudioSourceNode = castTo gTypeMediaElementAudioSourceNode "MediaElementAudioSourceNode"
foreign import javascript unsafe "window[\"MediaElementAudioSourceNode\"]" gTypeMediaElementAudioSourceNode :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMediaError
unsafeCastGObject = MediaError . unGObject
castToMediaError :: IsGObject obj => obj -> MediaError
castToMediaError = castTo gTypeMediaError "MediaError"
foreign import javascript unsafe "window[\"MediaError\"]" gTypeMediaError :: GType
#else
type IsMediaError o = MediaErrorClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMediaKeyError
unsafeCastGObject = MediaKeyError . unGObject
castToMediaKeyError :: IsGObject obj => obj -> MediaKeyError
castToMediaKeyError = castTo gTypeMediaKeyError "MediaKeyError"
foreign import javascript unsafe "window[\"WebKitMediaKeyError\"]" gTypeMediaKeyError :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMediaKeyEvent
unsafeCastGObject = MediaKeyEvent . unGObject
castToMediaKeyEvent :: IsGObject obj => obj -> MediaKeyEvent
castToMediaKeyEvent = castTo gTypeMediaKeyEvent "MediaKeyEvent"
foreign import javascript unsafe "window[\"MediaKeyEvent\"]" gTypeMediaKeyEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMediaKeyMessageEvent
unsafeCastGObject = MediaKeyMessageEvent . unGObject
castToMediaKeyMessageEvent :: IsGObject obj => obj -> MediaKeyMessageEvent
castToMediaKeyMessageEvent = castTo gTypeMediaKeyMessageEvent "MediaKeyMessageEvent"
foreign import javascript unsafe "window[\"WebKitMediaKeyMessageEvent\"]" gTypeMediaKeyMessageEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMediaKeyNeededEvent
unsafeCastGObject = MediaKeyNeededEvent . unGObject
castToMediaKeyNeededEvent :: IsGObject obj => obj -> MediaKeyNeededEvent
castToMediaKeyNeededEvent = castTo gTypeMediaKeyNeededEvent "MediaKeyNeededEvent"
foreign import javascript unsafe "window[\"MediaKeyNeededEvent\"]" gTypeMediaKeyNeededEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMediaKeySession
unsafeCastGObject = MediaKeySession . unGObject
castToMediaKeySession :: IsGObject obj => obj -> MediaKeySession
castToMediaKeySession = castTo gTypeMediaKeySession "MediaKeySession"
foreign import javascript unsafe "window[\"WebKitMediaKeySession\"]" gTypeMediaKeySession :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMediaKeys
unsafeCastGObject = MediaKeys . unGObject
castToMediaKeys :: IsGObject obj => obj -> MediaKeys
castToMediaKeys = castTo gTypeMediaKeys "MediaKeys"
foreign import javascript unsafe "window[\"WebKitMediaKeys\"]" gTypeMediaKeys :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMediaList
unsafeCastGObject = MediaList . unGObject
castToMediaList :: IsGObject obj => obj -> MediaList
castToMediaList = castTo gTypeMediaList "MediaList"
foreign import javascript unsafe "window[\"MediaList\"]" gTypeMediaList :: GType
#else
type IsMediaList o = MediaListClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMediaQueryList
unsafeCastGObject = MediaQueryList . unGObject
castToMediaQueryList :: IsGObject obj => obj -> MediaQueryList
castToMediaQueryList = castTo gTypeMediaQueryList "MediaQueryList"
foreign import javascript unsafe "window[\"MediaQueryList\"]" gTypeMediaQueryList :: GType
#else
type IsMediaQueryList o = MediaQueryListClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMediaSource
unsafeCastGObject = MediaSource . unGObject
castToMediaSource :: IsGObject obj => obj -> MediaSource
castToMediaSource = castTo gTypeMediaSource "MediaSource"
foreign import javascript unsafe "window[\"MediaSource\"]" gTypeMediaSource :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMediaSourceStates
unsafeCastGObject = MediaSourceStates . unGObject
castToMediaSourceStates :: IsGObject obj => obj -> MediaSourceStates
castToMediaSourceStates = castTo gTypeMediaSourceStates "MediaSourceStates"
foreign import javascript unsafe "window[\"MediaSourceStates\"]" gTypeMediaSourceStates :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMediaStream
unsafeCastGObject = MediaStream . unGObject
castToMediaStream :: IsGObject obj => obj -> MediaStream
castToMediaStream = castTo gTypeMediaStream "MediaStream"
foreign import javascript unsafe "window[\"webkitMediaStream\"]" gTypeMediaStream :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMediaStreamAudioDestinationNode
unsafeCastGObject = MediaStreamAudioDestinationNode . unGObject
castToMediaStreamAudioDestinationNode :: IsGObject obj => obj -> MediaStreamAudioDestinationNode
castToMediaStreamAudioDestinationNode = castTo gTypeMediaStreamAudioDestinationNode "MediaStreamAudioDestinationNode"
foreign import javascript unsafe "window[\"MediaStreamAudioDestinationNode\"]" gTypeMediaStreamAudioDestinationNode :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMediaStreamAudioSourceNode
unsafeCastGObject = MediaStreamAudioSourceNode . unGObject
castToMediaStreamAudioSourceNode :: IsGObject obj => obj -> MediaStreamAudioSourceNode
castToMediaStreamAudioSourceNode = castTo gTypeMediaStreamAudioSourceNode "MediaStreamAudioSourceNode"
foreign import javascript unsafe "window[\"MediaStreamAudioSourceNode\"]" gTypeMediaStreamAudioSourceNode :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsMediaStreamCapabilities MediaStreamCapabilities
instance IsGObject MediaStreamCapabilities where
toGObject = GObject . unMediaStreamCapabilities
unsafeCastGObject = MediaStreamCapabilities . unGObject
castToMediaStreamCapabilities :: IsGObject obj => obj -> MediaStreamCapabilities
castToMediaStreamCapabilities = castTo gTypeMediaStreamCapabilities "MediaStreamCapabilities"
foreign import javascript unsafe "window[\"MediaStreamCapabilities\"]" gTypeMediaStreamCapabilities :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMediaStreamEvent
unsafeCastGObject = MediaStreamEvent . unGObject
castToMediaStreamEvent :: IsGObject obj => obj -> MediaStreamEvent
castToMediaStreamEvent = castTo gTypeMediaStreamEvent "MediaStreamEvent"
foreign import javascript unsafe "window[\"MediaStreamEvent\"]" gTypeMediaStreamEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsMediaStreamTrack MediaStreamTrack
instance IsEventTarget MediaStreamTrack
instance IsGObject MediaStreamTrack where
toGObject = GObject . unMediaStreamTrack
unsafeCastGObject = MediaStreamTrack . unGObject
castToMediaStreamTrack :: IsGObject obj => obj -> MediaStreamTrack
castToMediaStreamTrack = castTo gTypeMediaStreamTrack "MediaStreamTrack"
foreign import javascript unsafe "window[\"MediaStreamTrack\"]" gTypeMediaStreamTrack :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMediaStreamTrackEvent
unsafeCastGObject = MediaStreamTrackEvent . unGObject
castToMediaStreamTrackEvent :: IsGObject obj => obj -> MediaStreamTrackEvent
castToMediaStreamTrackEvent = castTo gTypeMediaStreamTrackEvent "MediaStreamTrackEvent"
foreign import javascript unsafe "window[\"MediaStreamTrackEvent\"]" gTypeMediaStreamTrackEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMediaTrackConstraint
unsafeCastGObject = MediaTrackConstraint . unGObject
castToMediaTrackConstraint :: IsGObject obj => obj -> MediaTrackConstraint
castToMediaTrackConstraint = castTo gTypeMediaTrackConstraint "MediaTrackConstraint"
foreign import javascript unsafe "window[\"MediaTrackConstraint\"]" gTypeMediaTrackConstraint :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMediaTrackConstraintSet
unsafeCastGObject = MediaTrackConstraintSet . unGObject
castToMediaTrackConstraintSet :: IsGObject obj => obj -> MediaTrackConstraintSet
castToMediaTrackConstraintSet = castTo gTypeMediaTrackConstraintSet "MediaTrackConstraintSet"
foreign import javascript unsafe "window[\"MediaTrackConstraintSet\"]" gTypeMediaTrackConstraintSet :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMediaTrackConstraints
unsafeCastGObject = MediaTrackConstraints . unGObject
castToMediaTrackConstraints :: IsGObject obj => obj -> MediaTrackConstraints
castToMediaTrackConstraints = castTo gTypeMediaTrackConstraints "MediaTrackConstraints"
foreign import javascript unsafe "window[\"MediaTrackConstraints\"]" gTypeMediaTrackConstraints :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMemoryInfo
unsafeCastGObject = MemoryInfo . unGObject
castToMemoryInfo :: IsGObject obj => obj -> MemoryInfo
castToMemoryInfo = castTo gTypeMemoryInfo "MemoryInfo"
foreign import javascript unsafe "window[\"MemoryInfo\"]" gTypeMemoryInfo :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMessageChannel
unsafeCastGObject = MessageChannel . unGObject
castToMessageChannel :: IsGObject obj => obj -> MessageChannel
castToMessageChannel = castTo gTypeMessageChannel "MessageChannel"
foreign import javascript unsafe "window[\"MessageChannel\"]" gTypeMessageChannel :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMessageEvent
unsafeCastGObject = MessageEvent . unGObject
castToMessageEvent :: IsGObject obj => obj -> MessageEvent
castToMessageEvent = castTo gTypeMessageEvent "MessageEvent"
foreign import javascript unsafe "window[\"MessageEvent\"]" gTypeMessageEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMessagePort
unsafeCastGObject = MessagePort . unGObject
castToMessagePort :: IsGObject obj => obj -> MessagePort
castToMessagePort = castTo gTypeMessagePort "MessagePort"
foreign import javascript unsafe "window[\"MessagePort\"]" gTypeMessagePort :: GType
#else
type IsMessagePort o = MessagePortClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMimeType
unsafeCastGObject = MimeType . unGObject
castToMimeType :: IsGObject obj => obj -> MimeType
castToMimeType = castTo gTypeMimeType "MimeType"
foreign import javascript unsafe "window[\"MimeType\"]" gTypeMimeType :: GType
#else
type IsMimeType o = MimeTypeClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMimeTypeArray
unsafeCastGObject = MimeTypeArray . unGObject
castToMimeTypeArray :: IsGObject obj => obj -> MimeTypeArray
castToMimeTypeArray = castTo gTypeMimeTypeArray "MimeTypeArray"
foreign import javascript unsafe "window[\"MimeTypeArray\"]" gTypeMimeTypeArray :: GType
#else
type IsMimeTypeArray o = MimeTypeArrayClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsMouseEvent MouseEvent
instance IsUIEvent MouseEvent
instance IsEvent MouseEvent
instance IsGObject MouseEvent where
toGObject = GObject . unMouseEvent
unsafeCastGObject = MouseEvent . unGObject
castToMouseEvent :: IsGObject obj => obj -> MouseEvent
castToMouseEvent = castTo gTypeMouseEvent "MouseEvent"
foreign import javascript unsafe "window[\"MouseEvent\"]" gTypeMouseEvent :: GType
#else
type IsMouseEvent o = MouseEventClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMutationEvent
unsafeCastGObject = MutationEvent . unGObject
castToMutationEvent :: IsGObject obj => obj -> MutationEvent
castToMutationEvent = castTo gTypeMutationEvent "MutationEvent"
foreign import javascript unsafe "window[\"MutationEvent\"]" gTypeMutationEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMutationObserver
unsafeCastGObject = MutationObserver . unGObject
castToMutationObserver :: IsGObject obj => obj -> MutationObserver
castToMutationObserver = castTo gTypeMutationObserver "MutationObserver"
foreign import javascript unsafe "window[\"MutationObserver\"]" gTypeMutationObserver :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unMutationRecord
unsafeCastGObject = MutationRecord . unGObject
castToMutationRecord :: IsGObject obj => obj -> MutationRecord
castToMutationRecord = castTo gTypeMutationRecord "MutationRecord"
foreign import javascript unsafe "window[\"MutationRecord\"]" gTypeMutationRecord :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unNamedNodeMap
unsafeCastGObject = NamedNodeMap . unGObject
castToNamedNodeMap :: IsGObject obj => obj -> NamedNodeMap
castToNamedNodeMap = castTo gTypeNamedNodeMap "NamedNodeMap"
foreign import javascript unsafe "window[\"NamedNodeMap\"]" gTypeNamedNodeMap :: GType
#else
type IsNamedNodeMap o = NamedNodeMapClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unNavigator
unsafeCastGObject = Navigator . unGObject
castToNavigator :: IsGObject obj => obj -> Navigator
castToNavigator = castTo gTypeNavigator "Navigator"
foreign import javascript unsafe "window[\"Navigator\"]" gTypeNavigator :: GType
#else
type IsNavigator o = NavigatorClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unNavigatorUserMediaError
unsafeCastGObject = NavigatorUserMediaError . unGObject
castToNavigatorUserMediaError :: IsGObject obj => obj -> NavigatorUserMediaError
castToNavigatorUserMediaError = castTo gTypeNavigatorUserMediaError "NavigatorUserMediaError"
foreign import javascript unsafe "window[\"NavigatorUserMediaError\"]" gTypeNavigatorUserMediaError :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsNode Node
instance IsEventTarget Node
instance IsGObject Node where
toGObject = GObject . unNode
unsafeCastGObject = Node . unGObject
castToNode :: IsGObject obj => obj -> Node
castToNode = castTo gTypeNode "Node"
foreign import javascript unsafe "window[\"Node\"]" gTypeNode :: GType
#else
type IsNode o = NodeClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unNodeFilter
unsafeCastGObject = NodeFilter . unGObject
castToNodeFilter :: IsGObject obj => obj -> NodeFilter
castToNodeFilter = castTo gTypeNodeFilter "NodeFilter"
foreign import javascript unsafe "window[\"NodeFilter\"]" gTypeNodeFilter :: GType
#else
type IsNodeFilter o = NodeFilterClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unNodeIterator
unsafeCastGObject = NodeIterator . unGObject
castToNodeIterator :: IsGObject obj => obj -> NodeIterator
castToNodeIterator = castTo gTypeNodeIterator "NodeIterator"
foreign import javascript unsafe "window[\"NodeIterator\"]" gTypeNodeIterator :: GType
#else
type IsNodeIterator o = NodeIteratorClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsNodeList NodeList
instance IsGObject NodeList where
toGObject = GObject . unNodeList
unsafeCastGObject = NodeList . unGObject
castToNodeList :: IsGObject obj => obj -> NodeList
castToNodeList = castTo gTypeNodeList "NodeList"
foreign import javascript unsafe "window[\"NodeList\"]" gTypeNodeList :: GType
#else
type IsNodeList o = NodeListClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unNotification
unsafeCastGObject = Notification . unGObject
castToNotification :: IsGObject obj => obj -> Notification
castToNotification = castTo gTypeNotification "Notification"
foreign import javascript unsafe "window[\"Notification\"]" gTypeNotification :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unNotificationCenter
unsafeCastGObject = NotificationCenter . unGObject
castToNotificationCenter :: IsGObject obj => obj -> NotificationCenter
castToNotificationCenter = castTo gTypeNotificationCenter "NotificationCenter"
foreign import javascript unsafe "window[\"NotificationCenter\"]" gTypeNotificationCenter :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unOESElementIndexUint
unsafeCastGObject = OESElementIndexUint . unGObject
castToOESElementIndexUint :: IsGObject obj => obj -> OESElementIndexUint
castToOESElementIndexUint = castTo gTypeOESElementIndexUint "OESElementIndexUint"
foreign import javascript unsafe "window[\"OESElementIndexUint\"]" gTypeOESElementIndexUint :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unOESStandardDerivatives
unsafeCastGObject = OESStandardDerivatives . unGObject
castToOESStandardDerivatives :: IsGObject obj => obj -> OESStandardDerivatives
castToOESStandardDerivatives = castTo gTypeOESStandardDerivatives "OESStandardDerivatives"
foreign import javascript unsafe "window[\"OESStandardDerivatives\"]" gTypeOESStandardDerivatives :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unOESTextureFloat
unsafeCastGObject = OESTextureFloat . unGObject
castToOESTextureFloat :: IsGObject obj => obj -> OESTextureFloat
castToOESTextureFloat = castTo gTypeOESTextureFloat "OESTextureFloat"
foreign import javascript unsafe "window[\"OESTextureFloat\"]" gTypeOESTextureFloat :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unOESTextureFloatLinear
unsafeCastGObject = OESTextureFloatLinear . unGObject
castToOESTextureFloatLinear :: IsGObject obj => obj -> OESTextureFloatLinear
castToOESTextureFloatLinear = castTo gTypeOESTextureFloatLinear "OESTextureFloatLinear"
foreign import javascript unsafe "window[\"OESTextureFloatLinear\"]" gTypeOESTextureFloatLinear :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unOESTextureHalfFloat
unsafeCastGObject = OESTextureHalfFloat . unGObject
castToOESTextureHalfFloat :: IsGObject obj => obj -> OESTextureHalfFloat
castToOESTextureHalfFloat = castTo gTypeOESTextureHalfFloat "OESTextureHalfFloat"
foreign import javascript unsafe "window[\"OESTextureHalfFloat\"]" gTypeOESTextureHalfFloat :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unOESTextureHalfFloatLinear
unsafeCastGObject = OESTextureHalfFloatLinear . unGObject
castToOESTextureHalfFloatLinear :: IsGObject obj => obj -> OESTextureHalfFloatLinear
castToOESTextureHalfFloatLinear = castTo gTypeOESTextureHalfFloatLinear "OESTextureHalfFloatLinear"
foreign import javascript unsafe "window[\"OESTextureHalfFloatLinear\"]" gTypeOESTextureHalfFloatLinear :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unOESVertexArrayObject
unsafeCastGObject = OESVertexArrayObject . unGObject
castToOESVertexArrayObject :: IsGObject obj => obj -> OESVertexArrayObject
castToOESVertexArrayObject = castTo gTypeOESVertexArrayObject "OESVertexArrayObject"
foreign import javascript unsafe "window[\"OESVertexArrayObject\"]" gTypeOESVertexArrayObject :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unOfflineAudioCompletionEvent
unsafeCastGObject = OfflineAudioCompletionEvent . unGObject
castToOfflineAudioCompletionEvent :: IsGObject obj => obj -> OfflineAudioCompletionEvent
castToOfflineAudioCompletionEvent = castTo gTypeOfflineAudioCompletionEvent "OfflineAudioCompletionEvent"
foreign import javascript unsafe "window[\"OfflineAudioCompletionEvent\"]" gTypeOfflineAudioCompletionEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unOfflineAudioContext
unsafeCastGObject = OfflineAudioContext . unGObject
castToOfflineAudioContext :: IsGObject obj => obj -> OfflineAudioContext
castToOfflineAudioContext = castTo gTypeOfflineAudioContext "OfflineAudioContext"
foreign import javascript unsafe "window[\"OfflineAudioContext\"]" gTypeOfflineAudioContext :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unOscillatorNode
unsafeCastGObject = OscillatorNode . unGObject
castToOscillatorNode :: IsGObject obj => obj -> OscillatorNode
castToOscillatorNode = castTo gTypeOscillatorNode "OscillatorNode"
foreign import javascript unsafe "window[\"OscillatorNode\"]" gTypeOscillatorNode :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unOverflowEvent
unsafeCastGObject = OverflowEvent . unGObject
castToOverflowEvent :: IsGObject obj => obj -> OverflowEvent
castToOverflowEvent = castTo gTypeOverflowEvent "OverflowEvent"
foreign import javascript unsafe "window[\"OverflowEvent\"]" gTypeOverflowEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unPageTransitionEvent
unsafeCastGObject = PageTransitionEvent . unGObject
castToPageTransitionEvent :: IsGObject obj => obj -> PageTransitionEvent
castToPageTransitionEvent = castTo gTypePageTransitionEvent "PageTransitionEvent"
foreign import javascript unsafe "window[\"PageTransitionEvent\"]" gTypePageTransitionEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unPannerNode
unsafeCastGObject = PannerNode . unGObject
castToPannerNode :: IsGObject obj => obj -> PannerNode
castToPannerNode = castTo gTypePannerNode "PannerNode"
foreign import javascript unsafe "window[\"webkitAudioPannerNode\"]" gTypePannerNode :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unPath2D
unsafeCastGObject = Path2D . unGObject
castToPath2D :: IsGObject obj => obj -> Path2D
castToPath2D = castTo gTypePath2D "Path2D"
foreign import javascript unsafe "window[\"Path2D\"]" gTypePath2D :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unPerformance
unsafeCastGObject = Performance . unGObject
castToPerformance :: IsGObject obj => obj -> Performance
castToPerformance = castTo gTypePerformance "Performance"
foreign import javascript unsafe "window[\"Performance\"]" gTypePerformance :: GType
#else
#ifndef USE_OLD_WEBKIT
type IsPerformance o = PerformanceClass o
#endif
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsPerformanceEntry PerformanceEntry
instance IsGObject PerformanceEntry where
toGObject = GObject . unPerformanceEntry
unsafeCastGObject = PerformanceEntry . unGObject
castToPerformanceEntry :: IsGObject obj => obj -> PerformanceEntry
castToPerformanceEntry = castTo gTypePerformanceEntry "PerformanceEntry"
foreign import javascript unsafe "window[\"PerformanceEntry\"]" gTypePerformanceEntry :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unPerformanceEntryList
unsafeCastGObject = PerformanceEntryList . unGObject
castToPerformanceEntryList :: IsGObject obj => obj -> PerformanceEntryList
castToPerformanceEntryList = castTo gTypePerformanceEntryList "PerformanceEntryList"
foreign import javascript unsafe "window[\"PerformanceEntryList\"]" gTypePerformanceEntryList :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unPerformanceMark
unsafeCastGObject = PerformanceMark . unGObject
castToPerformanceMark :: IsGObject obj => obj -> PerformanceMark
castToPerformanceMark = castTo gTypePerformanceMark "PerformanceMark"
foreign import javascript unsafe "window[\"PerformanceMark\"]" gTypePerformanceMark :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unPerformanceMeasure
unsafeCastGObject = PerformanceMeasure . unGObject
castToPerformanceMeasure :: IsGObject obj => obj -> PerformanceMeasure
castToPerformanceMeasure = castTo gTypePerformanceMeasure "PerformanceMeasure"
foreign import javascript unsafe "window[\"PerformanceMeasure\"]" gTypePerformanceMeasure :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unPerformanceNavigation
unsafeCastGObject = PerformanceNavigation . unGObject
castToPerformanceNavigation :: IsGObject obj => obj -> PerformanceNavigation
castToPerformanceNavigation = castTo gTypePerformanceNavigation "PerformanceNavigation"
foreign import javascript unsafe "window[\"PerformanceNavigation\"]" gTypePerformanceNavigation :: GType
#else
#ifndef USE_OLD_WEBKIT
type IsPerformanceNavigation o = PerformanceNavigationClass o
#endif
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unPerformanceResourceTiming
unsafeCastGObject = PerformanceResourceTiming . unGObject
castToPerformanceResourceTiming :: IsGObject obj => obj -> PerformanceResourceTiming
castToPerformanceResourceTiming = castTo gTypePerformanceResourceTiming "PerformanceResourceTiming"
foreign import javascript unsafe "window[\"PerformanceResourceTiming\"]" gTypePerformanceResourceTiming :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unPerformanceTiming
unsafeCastGObject = PerformanceTiming . unGObject
castToPerformanceTiming :: IsGObject obj => obj -> PerformanceTiming
castToPerformanceTiming = castTo gTypePerformanceTiming "PerformanceTiming"
foreign import javascript unsafe "window[\"PerformanceTiming\"]" gTypePerformanceTiming :: GType
#else
#ifndef USE_OLD_WEBKIT
type IsPerformanceTiming o = PerformanceTimingClass o
#endif
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unPeriodicWave
unsafeCastGObject = PeriodicWave . unGObject
castToPeriodicWave :: IsGObject obj => obj -> PeriodicWave
castToPeriodicWave = castTo gTypePeriodicWave "PeriodicWave"
foreign import javascript unsafe "window[\"PeriodicWave\"]" gTypePeriodicWave :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unPlugin
unsafeCastGObject = Plugin . unGObject
castToPlugin :: IsGObject obj => obj -> Plugin
castToPlugin = castTo gTypePlugin "Plugin"
foreign import javascript unsafe "window[\"Plugin\"]" gTypePlugin :: GType
#else
type IsPlugin o = PluginClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unPluginArray
unsafeCastGObject = PluginArray . unGObject
castToPluginArray :: IsGObject obj => obj -> PluginArray
castToPluginArray = castTo gTypePluginArray "PluginArray"
foreign import javascript unsafe "window[\"PluginArray\"]" gTypePluginArray :: GType
#else
type IsPluginArray o = PluginArrayClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unPopStateEvent
unsafeCastGObject = PopStateEvent . unGObject
castToPopStateEvent :: IsGObject obj => obj -> PopStateEvent
castToPopStateEvent = castTo gTypePopStateEvent "PopStateEvent"
foreign import javascript unsafe "window[\"PopStateEvent\"]" gTypePopStateEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unPositionError
unsafeCastGObject = PositionError . unGObject
castToPositionError :: IsGObject obj => obj -> PositionError
castToPositionError = castTo gTypePositionError "PositionError"
foreign import javascript unsafe "window[\"PositionError\"]" gTypePositionError :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unProcessingInstruction
unsafeCastGObject = ProcessingInstruction . unGObject
castToProcessingInstruction :: IsGObject obj => obj -> ProcessingInstruction
castToProcessingInstruction = castTo gTypeProcessingInstruction "ProcessingInstruction"
foreign import javascript unsafe "window[\"ProcessingInstruction\"]" gTypeProcessingInstruction :: GType
#else
type IsProcessingInstruction o = ProcessingInstructionClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsProgressEvent ProgressEvent
instance IsEvent ProgressEvent
instance IsGObject ProgressEvent where
toGObject = GObject . unProgressEvent
unsafeCastGObject = ProgressEvent . unGObject
castToProgressEvent :: IsGObject obj => obj -> ProgressEvent
castToProgressEvent = castTo gTypeProgressEvent "ProgressEvent"
foreign import javascript unsafe "window[\"ProgressEvent\"]" gTypeProgressEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unQuickTimePluginReplacement
unsafeCastGObject = QuickTimePluginReplacement . unGObject
castToQuickTimePluginReplacement :: IsGObject obj => obj -> QuickTimePluginReplacement
castToQuickTimePluginReplacement = castTo gTypeQuickTimePluginReplacement "QuickTimePluginReplacement"
foreign import javascript unsafe "window[\"QuickTimePluginReplacement\"]" gTypeQuickTimePluginReplacement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unRGBColor
unsafeCastGObject = RGBColor . unGObject
castToRGBColor :: IsGObject obj => obj -> RGBColor
castToRGBColor = castTo gTypeRGBColor "RGBColor"
foreign import javascript unsafe "window[\"RGBColor\"]" gTypeRGBColor :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unRTCConfiguration
unsafeCastGObject = RTCConfiguration . unGObject
castToRTCConfiguration :: IsGObject obj => obj -> RTCConfiguration
castToRTCConfiguration = castTo gTypeRTCConfiguration "RTCConfiguration"
foreign import javascript unsafe "window[\"RTCConfiguration\"]" gTypeRTCConfiguration :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unRTCDTMFSender
unsafeCastGObject = RTCDTMFSender . unGObject
castToRTCDTMFSender :: IsGObject obj => obj -> RTCDTMFSender
castToRTCDTMFSender = castTo gTypeRTCDTMFSender "RTCDTMFSender"
foreign import javascript unsafe "window[\"RTCDTMFSender\"]" gTypeRTCDTMFSender :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unRTCDTMFToneChangeEvent
unsafeCastGObject = RTCDTMFToneChangeEvent . unGObject
castToRTCDTMFToneChangeEvent :: IsGObject obj => obj -> RTCDTMFToneChangeEvent
castToRTCDTMFToneChangeEvent = castTo gTypeRTCDTMFToneChangeEvent "RTCDTMFToneChangeEvent"
foreign import javascript unsafe "window[\"RTCDTMFToneChangeEvent\"]" gTypeRTCDTMFToneChangeEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unRTCDataChannel
unsafeCastGObject = RTCDataChannel . unGObject
castToRTCDataChannel :: IsGObject obj => obj -> RTCDataChannel
castToRTCDataChannel = castTo gTypeRTCDataChannel "RTCDataChannel"
foreign import javascript unsafe "window[\"RTCDataChannel\"]" gTypeRTCDataChannel :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unRTCDataChannelEvent
unsafeCastGObject = RTCDataChannelEvent . unGObject
castToRTCDataChannelEvent :: IsGObject obj => obj -> RTCDataChannelEvent
castToRTCDataChannelEvent = castTo gTypeRTCDataChannelEvent "RTCDataChannelEvent"
foreign import javascript unsafe "window[\"RTCDataChannelEvent\"]" gTypeRTCDataChannelEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unRTCIceCandidate
unsafeCastGObject = RTCIceCandidate . unGObject
castToRTCIceCandidate :: IsGObject obj => obj -> RTCIceCandidate
castToRTCIceCandidate = castTo gTypeRTCIceCandidate "RTCIceCandidate"
foreign import javascript unsafe "window[\"RTCIceCandidate\"]" gTypeRTCIceCandidate :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unRTCIceCandidateEvent
unsafeCastGObject = RTCIceCandidateEvent . unGObject
castToRTCIceCandidateEvent :: IsGObject obj => obj -> RTCIceCandidateEvent
castToRTCIceCandidateEvent = castTo gTypeRTCIceCandidateEvent "RTCIceCandidateEvent"
foreign import javascript unsafe "window[\"RTCIceCandidateEvent\"]" gTypeRTCIceCandidateEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unRTCIceServer
unsafeCastGObject = RTCIceServer . unGObject
castToRTCIceServer :: IsGObject obj => obj -> RTCIceServer
castToRTCIceServer = castTo gTypeRTCIceServer "RTCIceServer"
foreign import javascript unsafe "window[\"RTCIceServer\"]" gTypeRTCIceServer :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unRTCPeerConnection
unsafeCastGObject = RTCPeerConnection . unGObject
castToRTCPeerConnection :: IsGObject obj => obj -> RTCPeerConnection
castToRTCPeerConnection = castTo gTypeRTCPeerConnection "RTCPeerConnection"
foreign import javascript unsafe "window[\"webkitRTCPeerConnection\"]" gTypeRTCPeerConnection :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unRTCSessionDescription
unsafeCastGObject = RTCSessionDescription . unGObject
castToRTCSessionDescription :: IsGObject obj => obj -> RTCSessionDescription
castToRTCSessionDescription = castTo gTypeRTCSessionDescription "RTCSessionDescription"
foreign import javascript unsafe "window[\"RTCSessionDescription\"]" gTypeRTCSessionDescription :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unRTCStatsReport
unsafeCastGObject = RTCStatsReport . unGObject
castToRTCStatsReport :: IsGObject obj => obj -> RTCStatsReport
castToRTCStatsReport = castTo gTypeRTCStatsReport "RTCStatsReport"
foreign import javascript unsafe "window[\"RTCStatsReport\"]" gTypeRTCStatsReport :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unRTCStatsResponse
unsafeCastGObject = RTCStatsResponse . unGObject
castToRTCStatsResponse :: IsGObject obj => obj -> RTCStatsResponse
castToRTCStatsResponse = castTo gTypeRTCStatsResponse "RTCStatsResponse"
foreign import javascript unsafe "window[\"RTCStatsResponse\"]" gTypeRTCStatsResponse :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unRadioNodeList
unsafeCastGObject = RadioNodeList . unGObject
castToRadioNodeList :: IsGObject obj => obj -> RadioNodeList
castToRadioNodeList = castTo gTypeRadioNodeList "RadioNodeList"
foreign import javascript unsafe "window[\"RadioNodeList\"]" gTypeRadioNodeList :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unRange
unsafeCastGObject = Range . unGObject
castToRange :: IsGObject obj => obj -> Range
castToRange = castTo gTypeRange "Range"
foreign import javascript unsafe "window[\"Range\"]" gTypeRange :: GType
#else
type IsRange o = RangeClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unReadableStream
unsafeCastGObject = ReadableStream . unGObject
castToReadableStream :: IsGObject obj => obj -> ReadableStream
castToReadableStream = castTo gTypeReadableStream "ReadableStream"
foreign import javascript unsafe "window[\"ReadableStream\"]" gTypeReadableStream :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unRect
unsafeCastGObject = Rect . unGObject
castToRect :: IsGObject obj => obj -> Rect
castToRect = castTo gTypeRect "Rect"
foreign import javascript unsafe "window[\"Rect\"]" gTypeRect :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSQLError
unsafeCastGObject = SQLError . unGObject
castToSQLError :: IsGObject obj => obj -> SQLError
castToSQLError = castTo gTypeSQLError "SQLError"
foreign import javascript unsafe "window[\"SQLError\"]" gTypeSQLError :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSQLResultSet
unsafeCastGObject = SQLResultSet . unGObject
castToSQLResultSet :: IsGObject obj => obj -> SQLResultSet
castToSQLResultSet = castTo gTypeSQLResultSet "SQLResultSet"
foreign import javascript unsafe "window[\"SQLResultSet\"]" gTypeSQLResultSet :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSQLResultSetRowList
unsafeCastGObject = SQLResultSetRowList . unGObject
castToSQLResultSetRowList :: IsGObject obj => obj -> SQLResultSetRowList
castToSQLResultSetRowList = castTo gTypeSQLResultSetRowList "SQLResultSetRowList"
foreign import javascript unsafe "window[\"SQLResultSetRowList\"]" gTypeSQLResultSetRowList :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSQLTransaction
unsafeCastGObject = SQLTransaction . unGObject
castToSQLTransaction :: IsGObject obj => obj -> SQLTransaction
castToSQLTransaction = castTo gTypeSQLTransaction "SQLTransaction"
foreign import javascript unsafe "window[\"SQLTransaction\"]" gTypeSQLTransaction :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGAElement
unsafeCastGObject = SVGAElement . unGObject
castToSVGAElement :: IsGObject obj => obj -> SVGAElement
castToSVGAElement = castTo gTypeSVGAElement "SVGAElement"
foreign import javascript unsafe "window[\"SVGAElement\"]" gTypeSVGAElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGAltGlyphDefElement
unsafeCastGObject = SVGAltGlyphDefElement . unGObject
castToSVGAltGlyphDefElement :: IsGObject obj => obj -> SVGAltGlyphDefElement
castToSVGAltGlyphDefElement = castTo gTypeSVGAltGlyphDefElement "SVGAltGlyphDefElement"
foreign import javascript unsafe "window[\"SVGAltGlyphDefElement\"]" gTypeSVGAltGlyphDefElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGAltGlyphElement
unsafeCastGObject = SVGAltGlyphElement . unGObject
castToSVGAltGlyphElement :: IsGObject obj => obj -> SVGAltGlyphElement
castToSVGAltGlyphElement = castTo gTypeSVGAltGlyphElement "SVGAltGlyphElement"
foreign import javascript unsafe "window[\"SVGAltGlyphElement\"]" gTypeSVGAltGlyphElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGAltGlyphItemElement
unsafeCastGObject = SVGAltGlyphItemElement . unGObject
castToSVGAltGlyphItemElement :: IsGObject obj => obj -> SVGAltGlyphItemElement
castToSVGAltGlyphItemElement = castTo gTypeSVGAltGlyphItemElement "SVGAltGlyphItemElement"
foreign import javascript unsafe "window[\"SVGAltGlyphItemElement\"]" gTypeSVGAltGlyphItemElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGAngle
unsafeCastGObject = SVGAngle . unGObject
castToSVGAngle :: IsGObject obj => obj -> SVGAngle
castToSVGAngle = castTo gTypeSVGAngle "SVGAngle"
foreign import javascript unsafe "window[\"SVGAngle\"]" gTypeSVGAngle :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGAnimateColorElement
unsafeCastGObject = SVGAnimateColorElement . unGObject
castToSVGAnimateColorElement :: IsGObject obj => obj -> SVGAnimateColorElement
castToSVGAnimateColorElement = castTo gTypeSVGAnimateColorElement "SVGAnimateColorElement"
foreign import javascript unsafe "window[\"SVGAnimateColorElement\"]" gTypeSVGAnimateColorElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGAnimateElement
unsafeCastGObject = SVGAnimateElement . unGObject
castToSVGAnimateElement :: IsGObject obj => obj -> SVGAnimateElement
castToSVGAnimateElement = castTo gTypeSVGAnimateElement "SVGAnimateElement"
foreign import javascript unsafe "window[\"SVGAnimateElement\"]" gTypeSVGAnimateElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGAnimateMotionElement
unsafeCastGObject = SVGAnimateMotionElement . unGObject
castToSVGAnimateMotionElement :: IsGObject obj => obj -> SVGAnimateMotionElement
castToSVGAnimateMotionElement = castTo gTypeSVGAnimateMotionElement "SVGAnimateMotionElement"
foreign import javascript unsafe "window[\"SVGAnimateMotionElement\"]" gTypeSVGAnimateMotionElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGAnimateTransformElement
unsafeCastGObject = SVGAnimateTransformElement . unGObject
castToSVGAnimateTransformElement :: IsGObject obj => obj -> SVGAnimateTransformElement
castToSVGAnimateTransformElement = castTo gTypeSVGAnimateTransformElement "SVGAnimateTransformElement"
foreign import javascript unsafe "window[\"SVGAnimateTransformElement\"]" gTypeSVGAnimateTransformElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGAnimatedAngle
unsafeCastGObject = SVGAnimatedAngle . unGObject
castToSVGAnimatedAngle :: IsGObject obj => obj -> SVGAnimatedAngle
castToSVGAnimatedAngle = castTo gTypeSVGAnimatedAngle "SVGAnimatedAngle"
foreign import javascript unsafe "window[\"SVGAnimatedAngle\"]" gTypeSVGAnimatedAngle :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGAnimatedBoolean
unsafeCastGObject = SVGAnimatedBoolean . unGObject
castToSVGAnimatedBoolean :: IsGObject obj => obj -> SVGAnimatedBoolean
castToSVGAnimatedBoolean = castTo gTypeSVGAnimatedBoolean "SVGAnimatedBoolean"
foreign import javascript unsafe "window[\"SVGAnimatedBoolean\"]" gTypeSVGAnimatedBoolean :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGAnimatedEnumeration
unsafeCastGObject = SVGAnimatedEnumeration . unGObject
castToSVGAnimatedEnumeration :: IsGObject obj => obj -> SVGAnimatedEnumeration
castToSVGAnimatedEnumeration = castTo gTypeSVGAnimatedEnumeration "SVGAnimatedEnumeration"
foreign import javascript unsafe "window[\"SVGAnimatedEnumeration\"]" gTypeSVGAnimatedEnumeration :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGAnimatedInteger
unsafeCastGObject = SVGAnimatedInteger . unGObject
castToSVGAnimatedInteger :: IsGObject obj => obj -> SVGAnimatedInteger
castToSVGAnimatedInteger = castTo gTypeSVGAnimatedInteger "SVGAnimatedInteger"
foreign import javascript unsafe "window[\"SVGAnimatedInteger\"]" gTypeSVGAnimatedInteger :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGAnimatedLength
unsafeCastGObject = SVGAnimatedLength . unGObject
castToSVGAnimatedLength :: IsGObject obj => obj -> SVGAnimatedLength
castToSVGAnimatedLength = castTo gTypeSVGAnimatedLength "SVGAnimatedLength"
foreign import javascript unsafe "window[\"SVGAnimatedLength\"]" gTypeSVGAnimatedLength :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGAnimatedLengthList
unsafeCastGObject = SVGAnimatedLengthList . unGObject
castToSVGAnimatedLengthList :: IsGObject obj => obj -> SVGAnimatedLengthList
castToSVGAnimatedLengthList = castTo gTypeSVGAnimatedLengthList "SVGAnimatedLengthList"
foreign import javascript unsafe "window[\"SVGAnimatedLengthList\"]" gTypeSVGAnimatedLengthList :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGAnimatedNumber
unsafeCastGObject = SVGAnimatedNumber . unGObject
castToSVGAnimatedNumber :: IsGObject obj => obj -> SVGAnimatedNumber
castToSVGAnimatedNumber = castTo gTypeSVGAnimatedNumber "SVGAnimatedNumber"
foreign import javascript unsafe "window[\"SVGAnimatedNumber\"]" gTypeSVGAnimatedNumber :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGAnimatedNumberList
unsafeCastGObject = SVGAnimatedNumberList . unGObject
castToSVGAnimatedNumberList :: IsGObject obj => obj -> SVGAnimatedNumberList
castToSVGAnimatedNumberList = castTo gTypeSVGAnimatedNumberList "SVGAnimatedNumberList"
foreign import javascript unsafe "window[\"SVGAnimatedNumberList\"]" gTypeSVGAnimatedNumberList :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGAnimatedPreserveAspectRatio
unsafeCastGObject = SVGAnimatedPreserveAspectRatio . unGObject
castToSVGAnimatedPreserveAspectRatio :: IsGObject obj => obj -> SVGAnimatedPreserveAspectRatio
castToSVGAnimatedPreserveAspectRatio = castTo gTypeSVGAnimatedPreserveAspectRatio "SVGAnimatedPreserveAspectRatio"
foreign import javascript unsafe "window[\"SVGAnimatedPreserveAspectRatio\"]" gTypeSVGAnimatedPreserveAspectRatio :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGAnimatedRect
unsafeCastGObject = SVGAnimatedRect . unGObject
castToSVGAnimatedRect :: IsGObject obj => obj -> SVGAnimatedRect
castToSVGAnimatedRect = castTo gTypeSVGAnimatedRect "SVGAnimatedRect"
foreign import javascript unsafe "window[\"SVGAnimatedRect\"]" gTypeSVGAnimatedRect :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGAnimatedString
unsafeCastGObject = SVGAnimatedString . unGObject
castToSVGAnimatedString :: IsGObject obj => obj -> SVGAnimatedString
castToSVGAnimatedString = castTo gTypeSVGAnimatedString "SVGAnimatedString"
foreign import javascript unsafe "window[\"SVGAnimatedString\"]" gTypeSVGAnimatedString :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGAnimatedTransformList
unsafeCastGObject = SVGAnimatedTransformList . unGObject
castToSVGAnimatedTransformList :: IsGObject obj => obj -> SVGAnimatedTransformList
castToSVGAnimatedTransformList = castTo gTypeSVGAnimatedTransformList "SVGAnimatedTransformList"
foreign import javascript unsafe "window[\"SVGAnimatedTransformList\"]" gTypeSVGAnimatedTransformList :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsSVGAnimationElement SVGAnimationElement
instance IsSVGElement SVGAnimationElement
instance IsElement SVGAnimationElement
instance IsNode SVGAnimationElement
instance IsEventTarget SVGAnimationElement
instance IsGObject SVGAnimationElement where
toGObject = GObject . unSVGAnimationElement
unsafeCastGObject = SVGAnimationElement . unGObject
castToSVGAnimationElement :: IsGObject obj => obj -> SVGAnimationElement
castToSVGAnimationElement = castTo gTypeSVGAnimationElement "SVGAnimationElement"
foreign import javascript unsafe "window[\"SVGAnimationElement\"]" gTypeSVGAnimationElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGCircleElement
unsafeCastGObject = SVGCircleElement . unGObject
castToSVGCircleElement :: IsGObject obj => obj -> SVGCircleElement
castToSVGCircleElement = castTo gTypeSVGCircleElement "SVGCircleElement"
foreign import javascript unsafe "window[\"SVGCircleElement\"]" gTypeSVGCircleElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGClipPathElement
unsafeCastGObject = SVGClipPathElement . unGObject
castToSVGClipPathElement :: IsGObject obj => obj -> SVGClipPathElement
castToSVGClipPathElement = castTo gTypeSVGClipPathElement "SVGClipPathElement"
foreign import javascript unsafe "window[\"SVGClipPathElement\"]" gTypeSVGClipPathElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsSVGColor SVGColor
instance IsCSSValue SVGColor
instance IsGObject SVGColor where
toGObject = GObject . unSVGColor
unsafeCastGObject = SVGColor . unGObject
castToSVGColor :: IsGObject obj => obj -> SVGColor
castToSVGColor = castTo gTypeSVGColor "SVGColor"
foreign import javascript unsafe "window[\"SVGColor\"]" gTypeSVGColor :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsSVGComponentTransferFunctionElement SVGComponentTransferFunctionElement
instance IsSVGElement SVGComponentTransferFunctionElement
instance IsElement SVGComponentTransferFunctionElement
instance IsNode SVGComponentTransferFunctionElement
instance IsEventTarget SVGComponentTransferFunctionElement
instance IsGObject SVGComponentTransferFunctionElement where
toGObject = GObject . unSVGComponentTransferFunctionElement
unsafeCastGObject = SVGComponentTransferFunctionElement . unGObject
castToSVGComponentTransferFunctionElement :: IsGObject obj => obj -> SVGComponentTransferFunctionElement
castToSVGComponentTransferFunctionElement = castTo gTypeSVGComponentTransferFunctionElement "SVGComponentTransferFunctionElement"
foreign import javascript unsafe "window[\"SVGComponentTransferFunctionElement\"]" gTypeSVGComponentTransferFunctionElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGCursorElement
unsafeCastGObject = SVGCursorElement . unGObject
castToSVGCursorElement :: IsGObject obj => obj -> SVGCursorElement
castToSVGCursorElement = castTo gTypeSVGCursorElement "SVGCursorElement"
foreign import javascript unsafe "window[\"SVGCursorElement\"]" gTypeSVGCursorElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGDefsElement
unsafeCastGObject = SVGDefsElement . unGObject
castToSVGDefsElement :: IsGObject obj => obj -> SVGDefsElement
castToSVGDefsElement = castTo gTypeSVGDefsElement "SVGDefsElement"
foreign import javascript unsafe "window[\"SVGDefsElement\"]" gTypeSVGDefsElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGDescElement
unsafeCastGObject = SVGDescElement . unGObject
castToSVGDescElement :: IsGObject obj => obj -> SVGDescElement
castToSVGDescElement = castTo gTypeSVGDescElement "SVGDescElement"
foreign import javascript unsafe "window[\"SVGDescElement\"]" gTypeSVGDescElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGDocument
unsafeCastGObject = SVGDocument . unGObject
castToSVGDocument :: IsGObject obj => obj -> SVGDocument
castToSVGDocument = castTo gTypeSVGDocument "SVGDocument"
foreign import javascript unsafe "window[\"SVGDocument\"]" gTypeSVGDocument :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsSVGElement SVGElement
instance IsElement SVGElement
instance IsNode SVGElement
instance IsEventTarget SVGElement
instance IsGObject SVGElement where
toGObject = GObject . unSVGElement
unsafeCastGObject = SVGElement . unGObject
castToSVGElement :: IsGObject obj => obj -> SVGElement
castToSVGElement = castTo gTypeSVGElement "SVGElement"
foreign import javascript unsafe "window[\"SVGElement\"]" gTypeSVGElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGEllipseElement
unsafeCastGObject = SVGEllipseElement . unGObject
castToSVGEllipseElement :: IsGObject obj => obj -> SVGEllipseElement
castToSVGEllipseElement = castTo gTypeSVGEllipseElement "SVGEllipseElement"
foreign import javascript unsafe "window[\"SVGEllipseElement\"]" gTypeSVGEllipseElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGExternalResourcesRequired
unsafeCastGObject = SVGExternalResourcesRequired . unGObject
castToSVGExternalResourcesRequired :: IsGObject obj => obj -> SVGExternalResourcesRequired
castToSVGExternalResourcesRequired = castTo gTypeSVGExternalResourcesRequired "SVGExternalResourcesRequired"
foreign import javascript unsafe "window[\"SVGExternalResourcesRequired\"]" gTypeSVGExternalResourcesRequired :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFEBlendElement
unsafeCastGObject = SVGFEBlendElement . unGObject
castToSVGFEBlendElement :: IsGObject obj => obj -> SVGFEBlendElement
castToSVGFEBlendElement = castTo gTypeSVGFEBlendElement "SVGFEBlendElement"
foreign import javascript unsafe "window[\"SVGFEBlendElement\"]" gTypeSVGFEBlendElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFEColorMatrixElement
unsafeCastGObject = SVGFEColorMatrixElement . unGObject
castToSVGFEColorMatrixElement :: IsGObject obj => obj -> SVGFEColorMatrixElement
castToSVGFEColorMatrixElement = castTo gTypeSVGFEColorMatrixElement "SVGFEColorMatrixElement"
foreign import javascript unsafe "window[\"SVGFEColorMatrixElement\"]" gTypeSVGFEColorMatrixElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFEComponentTransferElement
unsafeCastGObject = SVGFEComponentTransferElement . unGObject
castToSVGFEComponentTransferElement :: IsGObject obj => obj -> SVGFEComponentTransferElement
castToSVGFEComponentTransferElement = castTo gTypeSVGFEComponentTransferElement "SVGFEComponentTransferElement"
foreign import javascript unsafe "window[\"SVGFEComponentTransferElement\"]" gTypeSVGFEComponentTransferElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFECompositeElement
unsafeCastGObject = SVGFECompositeElement . unGObject
castToSVGFECompositeElement :: IsGObject obj => obj -> SVGFECompositeElement
castToSVGFECompositeElement = castTo gTypeSVGFECompositeElement "SVGFECompositeElement"
foreign import javascript unsafe "window[\"SVGFECompositeElement\"]" gTypeSVGFECompositeElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFEConvolveMatrixElement
unsafeCastGObject = SVGFEConvolveMatrixElement . unGObject
castToSVGFEConvolveMatrixElement :: IsGObject obj => obj -> SVGFEConvolveMatrixElement
castToSVGFEConvolveMatrixElement = castTo gTypeSVGFEConvolveMatrixElement "SVGFEConvolveMatrixElement"
foreign import javascript unsafe "window[\"SVGFEConvolveMatrixElement\"]" gTypeSVGFEConvolveMatrixElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFEDiffuseLightingElement
unsafeCastGObject = SVGFEDiffuseLightingElement . unGObject
castToSVGFEDiffuseLightingElement :: IsGObject obj => obj -> SVGFEDiffuseLightingElement
castToSVGFEDiffuseLightingElement = castTo gTypeSVGFEDiffuseLightingElement "SVGFEDiffuseLightingElement"
foreign import javascript unsafe "window[\"SVGFEDiffuseLightingElement\"]" gTypeSVGFEDiffuseLightingElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFEDisplacementMapElement
unsafeCastGObject = SVGFEDisplacementMapElement . unGObject
castToSVGFEDisplacementMapElement :: IsGObject obj => obj -> SVGFEDisplacementMapElement
castToSVGFEDisplacementMapElement = castTo gTypeSVGFEDisplacementMapElement "SVGFEDisplacementMapElement"
foreign import javascript unsafe "window[\"SVGFEDisplacementMapElement\"]" gTypeSVGFEDisplacementMapElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFEDistantLightElement
unsafeCastGObject = SVGFEDistantLightElement . unGObject
castToSVGFEDistantLightElement :: IsGObject obj => obj -> SVGFEDistantLightElement
castToSVGFEDistantLightElement = castTo gTypeSVGFEDistantLightElement "SVGFEDistantLightElement"
foreign import javascript unsafe "window[\"SVGFEDistantLightElement\"]" gTypeSVGFEDistantLightElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFEDropShadowElement
unsafeCastGObject = SVGFEDropShadowElement . unGObject
castToSVGFEDropShadowElement :: IsGObject obj => obj -> SVGFEDropShadowElement
castToSVGFEDropShadowElement = castTo gTypeSVGFEDropShadowElement "SVGFEDropShadowElement"
foreign import javascript unsafe "window[\"SVGFEDropShadowElement\"]" gTypeSVGFEDropShadowElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFEFloodElement
unsafeCastGObject = SVGFEFloodElement . unGObject
castToSVGFEFloodElement :: IsGObject obj => obj -> SVGFEFloodElement
castToSVGFEFloodElement = castTo gTypeSVGFEFloodElement "SVGFEFloodElement"
foreign import javascript unsafe "window[\"SVGFEFloodElement\"]" gTypeSVGFEFloodElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFEFuncAElement
unsafeCastGObject = SVGFEFuncAElement . unGObject
castToSVGFEFuncAElement :: IsGObject obj => obj -> SVGFEFuncAElement
castToSVGFEFuncAElement = castTo gTypeSVGFEFuncAElement "SVGFEFuncAElement"
foreign import javascript unsafe "window[\"SVGFEFuncAElement\"]" gTypeSVGFEFuncAElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFEFuncBElement
unsafeCastGObject = SVGFEFuncBElement . unGObject
castToSVGFEFuncBElement :: IsGObject obj => obj -> SVGFEFuncBElement
castToSVGFEFuncBElement = castTo gTypeSVGFEFuncBElement "SVGFEFuncBElement"
foreign import javascript unsafe "window[\"SVGFEFuncBElement\"]" gTypeSVGFEFuncBElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFEFuncGElement
unsafeCastGObject = SVGFEFuncGElement . unGObject
castToSVGFEFuncGElement :: IsGObject obj => obj -> SVGFEFuncGElement
castToSVGFEFuncGElement = castTo gTypeSVGFEFuncGElement "SVGFEFuncGElement"
foreign import javascript unsafe "window[\"SVGFEFuncGElement\"]" gTypeSVGFEFuncGElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFEFuncRElement
unsafeCastGObject = SVGFEFuncRElement . unGObject
castToSVGFEFuncRElement :: IsGObject obj => obj -> SVGFEFuncRElement
castToSVGFEFuncRElement = castTo gTypeSVGFEFuncRElement "SVGFEFuncRElement"
foreign import javascript unsafe "window[\"SVGFEFuncRElement\"]" gTypeSVGFEFuncRElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFEGaussianBlurElement
unsafeCastGObject = SVGFEGaussianBlurElement . unGObject
castToSVGFEGaussianBlurElement :: IsGObject obj => obj -> SVGFEGaussianBlurElement
castToSVGFEGaussianBlurElement = castTo gTypeSVGFEGaussianBlurElement "SVGFEGaussianBlurElement"
foreign import javascript unsafe "window[\"SVGFEGaussianBlurElement\"]" gTypeSVGFEGaussianBlurElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFEImageElement
unsafeCastGObject = SVGFEImageElement . unGObject
castToSVGFEImageElement :: IsGObject obj => obj -> SVGFEImageElement
castToSVGFEImageElement = castTo gTypeSVGFEImageElement "SVGFEImageElement"
foreign import javascript unsafe "window[\"SVGFEImageElement\"]" gTypeSVGFEImageElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFEMergeElement
unsafeCastGObject = SVGFEMergeElement . unGObject
castToSVGFEMergeElement :: IsGObject obj => obj -> SVGFEMergeElement
castToSVGFEMergeElement = castTo gTypeSVGFEMergeElement "SVGFEMergeElement"
foreign import javascript unsafe "window[\"SVGFEMergeElement\"]" gTypeSVGFEMergeElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFEMergeNodeElement
unsafeCastGObject = SVGFEMergeNodeElement . unGObject
castToSVGFEMergeNodeElement :: IsGObject obj => obj -> SVGFEMergeNodeElement
castToSVGFEMergeNodeElement = castTo gTypeSVGFEMergeNodeElement "SVGFEMergeNodeElement"
foreign import javascript unsafe "window[\"SVGFEMergeNodeElement\"]" gTypeSVGFEMergeNodeElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFEMorphologyElement
unsafeCastGObject = SVGFEMorphologyElement . unGObject
castToSVGFEMorphologyElement :: IsGObject obj => obj -> SVGFEMorphologyElement
castToSVGFEMorphologyElement = castTo gTypeSVGFEMorphologyElement "SVGFEMorphologyElement"
foreign import javascript unsafe "window[\"SVGFEMorphologyElement\"]" gTypeSVGFEMorphologyElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFEOffsetElement
unsafeCastGObject = SVGFEOffsetElement . unGObject
castToSVGFEOffsetElement :: IsGObject obj => obj -> SVGFEOffsetElement
castToSVGFEOffsetElement = castTo gTypeSVGFEOffsetElement "SVGFEOffsetElement"
foreign import javascript unsafe "window[\"SVGFEOffsetElement\"]" gTypeSVGFEOffsetElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFEPointLightElement
unsafeCastGObject = SVGFEPointLightElement . unGObject
castToSVGFEPointLightElement :: IsGObject obj => obj -> SVGFEPointLightElement
castToSVGFEPointLightElement = castTo gTypeSVGFEPointLightElement "SVGFEPointLightElement"
foreign import javascript unsafe "window[\"SVGFEPointLightElement\"]" gTypeSVGFEPointLightElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFESpecularLightingElement
unsafeCastGObject = SVGFESpecularLightingElement . unGObject
castToSVGFESpecularLightingElement :: IsGObject obj => obj -> SVGFESpecularLightingElement
castToSVGFESpecularLightingElement = castTo gTypeSVGFESpecularLightingElement "SVGFESpecularLightingElement"
foreign import javascript unsafe "window[\"SVGFESpecularLightingElement\"]" gTypeSVGFESpecularLightingElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFESpotLightElement
unsafeCastGObject = SVGFESpotLightElement . unGObject
castToSVGFESpotLightElement :: IsGObject obj => obj -> SVGFESpotLightElement
castToSVGFESpotLightElement = castTo gTypeSVGFESpotLightElement "SVGFESpotLightElement"
foreign import javascript unsafe "window[\"SVGFESpotLightElement\"]" gTypeSVGFESpotLightElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFETileElement
unsafeCastGObject = SVGFETileElement . unGObject
castToSVGFETileElement :: IsGObject obj => obj -> SVGFETileElement
castToSVGFETileElement = castTo gTypeSVGFETileElement "SVGFETileElement"
foreign import javascript unsafe "window[\"SVGFETileElement\"]" gTypeSVGFETileElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFETurbulenceElement
unsafeCastGObject = SVGFETurbulenceElement . unGObject
castToSVGFETurbulenceElement :: IsGObject obj => obj -> SVGFETurbulenceElement
castToSVGFETurbulenceElement = castTo gTypeSVGFETurbulenceElement "SVGFETurbulenceElement"
foreign import javascript unsafe "window[\"SVGFETurbulenceElement\"]" gTypeSVGFETurbulenceElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFilterElement
unsafeCastGObject = SVGFilterElement . unGObject
castToSVGFilterElement :: IsGObject obj => obj -> SVGFilterElement
castToSVGFilterElement = castTo gTypeSVGFilterElement "SVGFilterElement"
foreign import javascript unsafe "window[\"SVGFilterElement\"]" gTypeSVGFilterElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFilterPrimitiveStandardAttributes
unsafeCastGObject = SVGFilterPrimitiveStandardAttributes . unGObject
castToSVGFilterPrimitiveStandardAttributes :: IsGObject obj => obj -> SVGFilterPrimitiveStandardAttributes
castToSVGFilterPrimitiveStandardAttributes = castTo gTypeSVGFilterPrimitiveStandardAttributes "SVGFilterPrimitiveStandardAttributes"
foreign import javascript unsafe "window[\"SVGFilterPrimitiveStandardAttributes\"]" gTypeSVGFilterPrimitiveStandardAttributes :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFitToViewBox
unsafeCastGObject = SVGFitToViewBox . unGObject
castToSVGFitToViewBox :: IsGObject obj => obj -> SVGFitToViewBox
castToSVGFitToViewBox = castTo gTypeSVGFitToViewBox "SVGFitToViewBox"
foreign import javascript unsafe "window[\"SVGFitToViewBox\"]" gTypeSVGFitToViewBox :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFontElement
unsafeCastGObject = SVGFontElement . unGObject
castToSVGFontElement :: IsGObject obj => obj -> SVGFontElement
castToSVGFontElement = castTo gTypeSVGFontElement "SVGFontElement"
foreign import javascript unsafe "window[\"SVGFontElement\"]" gTypeSVGFontElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFontFaceElement
unsafeCastGObject = SVGFontFaceElement . unGObject
castToSVGFontFaceElement :: IsGObject obj => obj -> SVGFontFaceElement
castToSVGFontFaceElement = castTo gTypeSVGFontFaceElement "SVGFontFaceElement"
foreign import javascript unsafe "window[\"SVGFontFaceElement\"]" gTypeSVGFontFaceElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFontFaceFormatElement
unsafeCastGObject = SVGFontFaceFormatElement . unGObject
castToSVGFontFaceFormatElement :: IsGObject obj => obj -> SVGFontFaceFormatElement
castToSVGFontFaceFormatElement = castTo gTypeSVGFontFaceFormatElement "SVGFontFaceFormatElement"
foreign import javascript unsafe "window[\"SVGFontFaceFormatElement\"]" gTypeSVGFontFaceFormatElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFontFaceNameElement
unsafeCastGObject = SVGFontFaceNameElement . unGObject
castToSVGFontFaceNameElement :: IsGObject obj => obj -> SVGFontFaceNameElement
castToSVGFontFaceNameElement = castTo gTypeSVGFontFaceNameElement "SVGFontFaceNameElement"
foreign import javascript unsafe "window[\"SVGFontFaceNameElement\"]" gTypeSVGFontFaceNameElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFontFaceSrcElement
unsafeCastGObject = SVGFontFaceSrcElement . unGObject
castToSVGFontFaceSrcElement :: IsGObject obj => obj -> SVGFontFaceSrcElement
castToSVGFontFaceSrcElement = castTo gTypeSVGFontFaceSrcElement "SVGFontFaceSrcElement"
foreign import javascript unsafe "window[\"SVGFontFaceSrcElement\"]" gTypeSVGFontFaceSrcElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGFontFaceUriElement
unsafeCastGObject = SVGFontFaceUriElement . unGObject
castToSVGFontFaceUriElement :: IsGObject obj => obj -> SVGFontFaceUriElement
castToSVGFontFaceUriElement = castTo gTypeSVGFontFaceUriElement "SVGFontFaceUriElement"
foreign import javascript unsafe "window[\"SVGFontFaceUriElement\"]" gTypeSVGFontFaceUriElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGForeignObjectElement
unsafeCastGObject = SVGForeignObjectElement . unGObject
castToSVGForeignObjectElement :: IsGObject obj => obj -> SVGForeignObjectElement
castToSVGForeignObjectElement = castTo gTypeSVGForeignObjectElement "SVGForeignObjectElement"
foreign import javascript unsafe "window[\"SVGForeignObjectElement\"]" gTypeSVGForeignObjectElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGGElement
unsafeCastGObject = SVGGElement . unGObject
castToSVGGElement :: IsGObject obj => obj -> SVGGElement
castToSVGGElement = castTo gTypeSVGGElement "SVGGElement"
foreign import javascript unsafe "window[\"SVGGElement\"]" gTypeSVGGElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGGlyphElement
unsafeCastGObject = SVGGlyphElement . unGObject
castToSVGGlyphElement :: IsGObject obj => obj -> SVGGlyphElement
castToSVGGlyphElement = castTo gTypeSVGGlyphElement "SVGGlyphElement"
foreign import javascript unsafe "window[\"SVGGlyphElement\"]" gTypeSVGGlyphElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGGlyphRefElement
unsafeCastGObject = SVGGlyphRefElement . unGObject
castToSVGGlyphRefElement :: IsGObject obj => obj -> SVGGlyphRefElement
castToSVGGlyphRefElement = castTo gTypeSVGGlyphRefElement "SVGGlyphRefElement"
foreign import javascript unsafe "window[\"SVGGlyphRefElement\"]" gTypeSVGGlyphRefElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsSVGGradientElement SVGGradientElement
instance IsSVGElement SVGGradientElement
instance IsElement SVGGradientElement
instance IsNode SVGGradientElement
instance IsEventTarget SVGGradientElement
instance IsGObject SVGGradientElement where
toGObject = GObject . unSVGGradientElement
unsafeCastGObject = SVGGradientElement . unGObject
castToSVGGradientElement :: IsGObject obj => obj -> SVGGradientElement
castToSVGGradientElement = castTo gTypeSVGGradientElement "SVGGradientElement"
foreign import javascript unsafe "window[\"SVGGradientElement\"]" gTypeSVGGradientElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsSVGGraphicsElement SVGGraphicsElement
instance IsSVGElement SVGGraphicsElement
instance IsElement SVGGraphicsElement
instance IsNode SVGGraphicsElement
instance IsEventTarget SVGGraphicsElement
instance IsGObject SVGGraphicsElement where
toGObject = GObject . unSVGGraphicsElement
unsafeCastGObject = SVGGraphicsElement . unGObject
castToSVGGraphicsElement :: IsGObject obj => obj -> SVGGraphicsElement
castToSVGGraphicsElement = castTo gTypeSVGGraphicsElement "SVGGraphicsElement"
foreign import javascript unsafe "window[\"SVGGraphicsElement\"]" gTypeSVGGraphicsElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGHKernElement
unsafeCastGObject = SVGHKernElement . unGObject
castToSVGHKernElement :: IsGObject obj => obj -> SVGHKernElement
castToSVGHKernElement = castTo gTypeSVGHKernElement "SVGHKernElement"
foreign import javascript unsafe "window[\"SVGHKernElement\"]" gTypeSVGHKernElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGImageElement
unsafeCastGObject = SVGImageElement . unGObject
castToSVGImageElement :: IsGObject obj => obj -> SVGImageElement
castToSVGImageElement = castTo gTypeSVGImageElement "SVGImageElement"
foreign import javascript unsafe "window[\"SVGImageElement\"]" gTypeSVGImageElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGLength
unsafeCastGObject = SVGLength . unGObject
castToSVGLength :: IsGObject obj => obj -> SVGLength
castToSVGLength = castTo gTypeSVGLength "SVGLength"
foreign import javascript unsafe "window[\"SVGLength\"]" gTypeSVGLength :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGLengthList
unsafeCastGObject = SVGLengthList . unGObject
castToSVGLengthList :: IsGObject obj => obj -> SVGLengthList
castToSVGLengthList = castTo gTypeSVGLengthList "SVGLengthList"
foreign import javascript unsafe "window[\"SVGLengthList\"]" gTypeSVGLengthList :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGLineElement
unsafeCastGObject = SVGLineElement . unGObject
castToSVGLineElement :: IsGObject obj => obj -> SVGLineElement
castToSVGLineElement = castTo gTypeSVGLineElement "SVGLineElement"
foreign import javascript unsafe "window[\"SVGLineElement\"]" gTypeSVGLineElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGLinearGradientElement
unsafeCastGObject = SVGLinearGradientElement . unGObject
castToSVGLinearGradientElement :: IsGObject obj => obj -> SVGLinearGradientElement
castToSVGLinearGradientElement = castTo gTypeSVGLinearGradientElement "SVGLinearGradientElement"
foreign import javascript unsafe "window[\"SVGLinearGradientElement\"]" gTypeSVGLinearGradientElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGMPathElement
unsafeCastGObject = SVGMPathElement . unGObject
castToSVGMPathElement :: IsGObject obj => obj -> SVGMPathElement
castToSVGMPathElement = castTo gTypeSVGMPathElement "SVGMPathElement"
foreign import javascript unsafe "window[\"SVGMPathElement\"]" gTypeSVGMPathElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGMarkerElement
unsafeCastGObject = SVGMarkerElement . unGObject
castToSVGMarkerElement :: IsGObject obj => obj -> SVGMarkerElement
castToSVGMarkerElement = castTo gTypeSVGMarkerElement "SVGMarkerElement"
foreign import javascript unsafe "window[\"SVGMarkerElement\"]" gTypeSVGMarkerElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGMaskElement
unsafeCastGObject = SVGMaskElement . unGObject
castToSVGMaskElement :: IsGObject obj => obj -> SVGMaskElement
castToSVGMaskElement = castTo gTypeSVGMaskElement "SVGMaskElement"
foreign import javascript unsafe "window[\"SVGMaskElement\"]" gTypeSVGMaskElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGMatrix
unsafeCastGObject = SVGMatrix . unGObject
castToSVGMatrix :: IsGObject obj => obj -> SVGMatrix
castToSVGMatrix = castTo gTypeSVGMatrix "SVGMatrix"
foreign import javascript unsafe "window[\"SVGMatrix\"]" gTypeSVGMatrix :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGMetadataElement
unsafeCastGObject = SVGMetadataElement . unGObject
castToSVGMetadataElement :: IsGObject obj => obj -> SVGMetadataElement
castToSVGMetadataElement = castTo gTypeSVGMetadataElement "SVGMetadataElement"
foreign import javascript unsafe "window[\"SVGMetadataElement\"]" gTypeSVGMetadataElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGMissingGlyphElement
unsafeCastGObject = SVGMissingGlyphElement . unGObject
castToSVGMissingGlyphElement :: IsGObject obj => obj -> SVGMissingGlyphElement
castToSVGMissingGlyphElement = castTo gTypeSVGMissingGlyphElement "SVGMissingGlyphElement"
foreign import javascript unsafe "window[\"SVGMissingGlyphElement\"]" gTypeSVGMissingGlyphElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGNumber
unsafeCastGObject = SVGNumber . unGObject
castToSVGNumber :: IsGObject obj => obj -> SVGNumber
castToSVGNumber = castTo gTypeSVGNumber "SVGNumber"
foreign import javascript unsafe "window[\"SVGNumber\"]" gTypeSVGNumber :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGNumberList
unsafeCastGObject = SVGNumberList . unGObject
castToSVGNumberList :: IsGObject obj => obj -> SVGNumberList
castToSVGNumberList = castTo gTypeSVGNumberList "SVGNumberList"
foreign import javascript unsafe "window[\"SVGNumberList\"]" gTypeSVGNumberList :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPaint
unsafeCastGObject = SVGPaint . unGObject
castToSVGPaint :: IsGObject obj => obj -> SVGPaint
castToSVGPaint = castTo gTypeSVGPaint "SVGPaint"
foreign import javascript unsafe "window[\"SVGPaint\"]" gTypeSVGPaint :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPathElement
unsafeCastGObject = SVGPathElement . unGObject
castToSVGPathElement :: IsGObject obj => obj -> SVGPathElement
castToSVGPathElement = castTo gTypeSVGPathElement "SVGPathElement"
foreign import javascript unsafe "window[\"SVGPathElement\"]" gTypeSVGPathElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsSVGPathSeg SVGPathSeg
instance IsGObject SVGPathSeg where
toGObject = GObject . unSVGPathSeg
unsafeCastGObject = SVGPathSeg . unGObject
castToSVGPathSeg :: IsGObject obj => obj -> SVGPathSeg
castToSVGPathSeg = castTo gTypeSVGPathSeg "SVGPathSeg"
foreign import javascript unsafe "window[\"SVGPathSeg\"]" gTypeSVGPathSeg :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPathSegArcAbs
unsafeCastGObject = SVGPathSegArcAbs . unGObject
castToSVGPathSegArcAbs :: IsGObject obj => obj -> SVGPathSegArcAbs
castToSVGPathSegArcAbs = castTo gTypeSVGPathSegArcAbs "SVGPathSegArcAbs"
foreign import javascript unsafe "window[\"SVGPathSegArcAbs\"]" gTypeSVGPathSegArcAbs :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPathSegArcRel
unsafeCastGObject = SVGPathSegArcRel . unGObject
castToSVGPathSegArcRel :: IsGObject obj => obj -> SVGPathSegArcRel
castToSVGPathSegArcRel = castTo gTypeSVGPathSegArcRel "SVGPathSegArcRel"
foreign import javascript unsafe "window[\"SVGPathSegArcRel\"]" gTypeSVGPathSegArcRel :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPathSegClosePath
unsafeCastGObject = SVGPathSegClosePath . unGObject
castToSVGPathSegClosePath :: IsGObject obj => obj -> SVGPathSegClosePath
castToSVGPathSegClosePath = castTo gTypeSVGPathSegClosePath "SVGPathSegClosePath"
foreign import javascript unsafe "window[\"SVGPathSegClosePath\"]" gTypeSVGPathSegClosePath :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPathSegCurvetoCubicAbs
unsafeCastGObject = SVGPathSegCurvetoCubicAbs . unGObject
castToSVGPathSegCurvetoCubicAbs :: IsGObject obj => obj -> SVGPathSegCurvetoCubicAbs
castToSVGPathSegCurvetoCubicAbs = castTo gTypeSVGPathSegCurvetoCubicAbs "SVGPathSegCurvetoCubicAbs"
foreign import javascript unsafe "window[\"SVGPathSegCurvetoCubicAbs\"]" gTypeSVGPathSegCurvetoCubicAbs :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPathSegCurvetoCubicRel
unsafeCastGObject = SVGPathSegCurvetoCubicRel . unGObject
castToSVGPathSegCurvetoCubicRel :: IsGObject obj => obj -> SVGPathSegCurvetoCubicRel
castToSVGPathSegCurvetoCubicRel = castTo gTypeSVGPathSegCurvetoCubicRel "SVGPathSegCurvetoCubicRel"
foreign import javascript unsafe "window[\"SVGPathSegCurvetoCubicRel\"]" gTypeSVGPathSegCurvetoCubicRel :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPathSegCurvetoCubicSmoothAbs
unsafeCastGObject = SVGPathSegCurvetoCubicSmoothAbs . unGObject
castToSVGPathSegCurvetoCubicSmoothAbs :: IsGObject obj => obj -> SVGPathSegCurvetoCubicSmoothAbs
castToSVGPathSegCurvetoCubicSmoothAbs = castTo gTypeSVGPathSegCurvetoCubicSmoothAbs "SVGPathSegCurvetoCubicSmoothAbs"
foreign import javascript unsafe "window[\"SVGPathSegCurvetoCubicSmoothAbs\"]" gTypeSVGPathSegCurvetoCubicSmoothAbs :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPathSegCurvetoCubicSmoothRel
unsafeCastGObject = SVGPathSegCurvetoCubicSmoothRel . unGObject
castToSVGPathSegCurvetoCubicSmoothRel :: IsGObject obj => obj -> SVGPathSegCurvetoCubicSmoothRel
castToSVGPathSegCurvetoCubicSmoothRel = castTo gTypeSVGPathSegCurvetoCubicSmoothRel "SVGPathSegCurvetoCubicSmoothRel"
foreign import javascript unsafe "window[\"SVGPathSegCurvetoCubicSmoothRel\"]" gTypeSVGPathSegCurvetoCubicSmoothRel :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPathSegCurvetoQuadraticAbs
unsafeCastGObject = SVGPathSegCurvetoQuadraticAbs . unGObject
castToSVGPathSegCurvetoQuadraticAbs :: IsGObject obj => obj -> SVGPathSegCurvetoQuadraticAbs
castToSVGPathSegCurvetoQuadraticAbs = castTo gTypeSVGPathSegCurvetoQuadraticAbs "SVGPathSegCurvetoQuadraticAbs"
foreign import javascript unsafe "window[\"SVGPathSegCurvetoQuadraticAbs\"]" gTypeSVGPathSegCurvetoQuadraticAbs :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPathSegCurvetoQuadraticRel
unsafeCastGObject = SVGPathSegCurvetoQuadraticRel . unGObject
castToSVGPathSegCurvetoQuadraticRel :: IsGObject obj => obj -> SVGPathSegCurvetoQuadraticRel
castToSVGPathSegCurvetoQuadraticRel = castTo gTypeSVGPathSegCurvetoQuadraticRel "SVGPathSegCurvetoQuadraticRel"
foreign import javascript unsafe "window[\"SVGPathSegCurvetoQuadraticRel\"]" gTypeSVGPathSegCurvetoQuadraticRel :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPathSegCurvetoQuadraticSmoothAbs
unsafeCastGObject = SVGPathSegCurvetoQuadraticSmoothAbs . unGObject
castToSVGPathSegCurvetoQuadraticSmoothAbs :: IsGObject obj => obj -> SVGPathSegCurvetoQuadraticSmoothAbs
castToSVGPathSegCurvetoQuadraticSmoothAbs = castTo gTypeSVGPathSegCurvetoQuadraticSmoothAbs "SVGPathSegCurvetoQuadraticSmoothAbs"
foreign import javascript unsafe "window[\"SVGPathSegCurvetoQuadraticSmoothAbs\"]" gTypeSVGPathSegCurvetoQuadraticSmoothAbs :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPathSegCurvetoQuadraticSmoothRel
unsafeCastGObject = SVGPathSegCurvetoQuadraticSmoothRel . unGObject
castToSVGPathSegCurvetoQuadraticSmoothRel :: IsGObject obj => obj -> SVGPathSegCurvetoQuadraticSmoothRel
castToSVGPathSegCurvetoQuadraticSmoothRel = castTo gTypeSVGPathSegCurvetoQuadraticSmoothRel "SVGPathSegCurvetoQuadraticSmoothRel"
foreign import javascript unsafe "window[\"SVGPathSegCurvetoQuadraticSmoothRel\"]" gTypeSVGPathSegCurvetoQuadraticSmoothRel :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPathSegLinetoAbs
unsafeCastGObject = SVGPathSegLinetoAbs . unGObject
castToSVGPathSegLinetoAbs :: IsGObject obj => obj -> SVGPathSegLinetoAbs
castToSVGPathSegLinetoAbs = castTo gTypeSVGPathSegLinetoAbs "SVGPathSegLinetoAbs"
foreign import javascript unsafe "window[\"SVGPathSegLinetoAbs\"]" gTypeSVGPathSegLinetoAbs :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPathSegLinetoHorizontalAbs
unsafeCastGObject = SVGPathSegLinetoHorizontalAbs . unGObject
castToSVGPathSegLinetoHorizontalAbs :: IsGObject obj => obj -> SVGPathSegLinetoHorizontalAbs
castToSVGPathSegLinetoHorizontalAbs = castTo gTypeSVGPathSegLinetoHorizontalAbs "SVGPathSegLinetoHorizontalAbs"
foreign import javascript unsafe "window[\"SVGPathSegLinetoHorizontalAbs\"]" gTypeSVGPathSegLinetoHorizontalAbs :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPathSegLinetoHorizontalRel
unsafeCastGObject = SVGPathSegLinetoHorizontalRel . unGObject
castToSVGPathSegLinetoHorizontalRel :: IsGObject obj => obj -> SVGPathSegLinetoHorizontalRel
castToSVGPathSegLinetoHorizontalRel = castTo gTypeSVGPathSegLinetoHorizontalRel "SVGPathSegLinetoHorizontalRel"
foreign import javascript unsafe "window[\"SVGPathSegLinetoHorizontalRel\"]" gTypeSVGPathSegLinetoHorizontalRel :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPathSegLinetoRel
unsafeCastGObject = SVGPathSegLinetoRel . unGObject
castToSVGPathSegLinetoRel :: IsGObject obj => obj -> SVGPathSegLinetoRel
castToSVGPathSegLinetoRel = castTo gTypeSVGPathSegLinetoRel "SVGPathSegLinetoRel"
foreign import javascript unsafe "window[\"SVGPathSegLinetoRel\"]" gTypeSVGPathSegLinetoRel :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPathSegLinetoVerticalAbs
unsafeCastGObject = SVGPathSegLinetoVerticalAbs . unGObject
castToSVGPathSegLinetoVerticalAbs :: IsGObject obj => obj -> SVGPathSegLinetoVerticalAbs
castToSVGPathSegLinetoVerticalAbs = castTo gTypeSVGPathSegLinetoVerticalAbs "SVGPathSegLinetoVerticalAbs"
foreign import javascript unsafe "window[\"SVGPathSegLinetoVerticalAbs\"]" gTypeSVGPathSegLinetoVerticalAbs :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPathSegLinetoVerticalRel
unsafeCastGObject = SVGPathSegLinetoVerticalRel . unGObject
castToSVGPathSegLinetoVerticalRel :: IsGObject obj => obj -> SVGPathSegLinetoVerticalRel
castToSVGPathSegLinetoVerticalRel = castTo gTypeSVGPathSegLinetoVerticalRel "SVGPathSegLinetoVerticalRel"
foreign import javascript unsafe "window[\"SVGPathSegLinetoVerticalRel\"]" gTypeSVGPathSegLinetoVerticalRel :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPathSegList
unsafeCastGObject = SVGPathSegList . unGObject
castToSVGPathSegList :: IsGObject obj => obj -> SVGPathSegList
castToSVGPathSegList = castTo gTypeSVGPathSegList "SVGPathSegList"
foreign import javascript unsafe "window[\"SVGPathSegList\"]" gTypeSVGPathSegList :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPathSegMovetoAbs
unsafeCastGObject = SVGPathSegMovetoAbs . unGObject
castToSVGPathSegMovetoAbs :: IsGObject obj => obj -> SVGPathSegMovetoAbs
castToSVGPathSegMovetoAbs = castTo gTypeSVGPathSegMovetoAbs "SVGPathSegMovetoAbs"
foreign import javascript unsafe "window[\"SVGPathSegMovetoAbs\"]" gTypeSVGPathSegMovetoAbs :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPathSegMovetoRel
unsafeCastGObject = SVGPathSegMovetoRel . unGObject
castToSVGPathSegMovetoRel :: IsGObject obj => obj -> SVGPathSegMovetoRel
castToSVGPathSegMovetoRel = castTo gTypeSVGPathSegMovetoRel "SVGPathSegMovetoRel"
foreign import javascript unsafe "window[\"SVGPathSegMovetoRel\"]" gTypeSVGPathSegMovetoRel :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPatternElement
unsafeCastGObject = SVGPatternElement . unGObject
castToSVGPatternElement :: IsGObject obj => obj -> SVGPatternElement
castToSVGPatternElement = castTo gTypeSVGPatternElement "SVGPatternElement"
foreign import javascript unsafe "window[\"SVGPatternElement\"]" gTypeSVGPatternElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPoint
unsafeCastGObject = SVGPoint . unGObject
castToSVGPoint :: IsGObject obj => obj -> SVGPoint
castToSVGPoint = castTo gTypeSVGPoint "SVGPoint"
foreign import javascript unsafe "window[\"SVGPoint\"]" gTypeSVGPoint :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPointList
unsafeCastGObject = SVGPointList . unGObject
castToSVGPointList :: IsGObject obj => obj -> SVGPointList
castToSVGPointList = castTo gTypeSVGPointList "SVGPointList"
foreign import javascript unsafe "window[\"SVGPointList\"]" gTypeSVGPointList :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPolygonElement
unsafeCastGObject = SVGPolygonElement . unGObject
castToSVGPolygonElement :: IsGObject obj => obj -> SVGPolygonElement
castToSVGPolygonElement = castTo gTypeSVGPolygonElement "SVGPolygonElement"
foreign import javascript unsafe "window[\"SVGPolygonElement\"]" gTypeSVGPolygonElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPolylineElement
unsafeCastGObject = SVGPolylineElement . unGObject
castToSVGPolylineElement :: IsGObject obj => obj -> SVGPolylineElement
castToSVGPolylineElement = castTo gTypeSVGPolylineElement "SVGPolylineElement"
foreign import javascript unsafe "window[\"SVGPolylineElement\"]" gTypeSVGPolylineElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGPreserveAspectRatio
unsafeCastGObject = SVGPreserveAspectRatio . unGObject
castToSVGPreserveAspectRatio :: IsGObject obj => obj -> SVGPreserveAspectRatio
castToSVGPreserveAspectRatio = castTo gTypeSVGPreserveAspectRatio "SVGPreserveAspectRatio"
foreign import javascript unsafe "window[\"SVGPreserveAspectRatio\"]" gTypeSVGPreserveAspectRatio :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGRadialGradientElement
unsafeCastGObject = SVGRadialGradientElement . unGObject
castToSVGRadialGradientElement :: IsGObject obj => obj -> SVGRadialGradientElement
castToSVGRadialGradientElement = castTo gTypeSVGRadialGradientElement "SVGRadialGradientElement"
foreign import javascript unsafe "window[\"SVGRadialGradientElement\"]" gTypeSVGRadialGradientElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGRect
unsafeCastGObject = SVGRect . unGObject
castToSVGRect :: IsGObject obj => obj -> SVGRect
castToSVGRect = castTo gTypeSVGRect "SVGRect"
foreign import javascript unsafe "window[\"SVGRect\"]" gTypeSVGRect :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGRectElement
unsafeCastGObject = SVGRectElement . unGObject
castToSVGRectElement :: IsGObject obj => obj -> SVGRectElement
castToSVGRectElement = castTo gTypeSVGRectElement "SVGRectElement"
foreign import javascript unsafe "window[\"SVGRectElement\"]" gTypeSVGRectElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGRenderingIntent
unsafeCastGObject = SVGRenderingIntent . unGObject
castToSVGRenderingIntent :: IsGObject obj => obj -> SVGRenderingIntent
castToSVGRenderingIntent = castTo gTypeSVGRenderingIntent "SVGRenderingIntent"
foreign import javascript unsafe "window[\"SVGRenderingIntent\"]" gTypeSVGRenderingIntent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGSVGElement
unsafeCastGObject = SVGSVGElement . unGObject
castToSVGSVGElement :: IsGObject obj => obj -> SVGSVGElement
castToSVGSVGElement = castTo gTypeSVGSVGElement "SVGSVGElement"
foreign import javascript unsafe "window[\"SVGSVGElement\"]" gTypeSVGSVGElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGScriptElement
unsafeCastGObject = SVGScriptElement . unGObject
castToSVGScriptElement :: IsGObject obj => obj -> SVGScriptElement
castToSVGScriptElement = castTo gTypeSVGScriptElement "SVGScriptElement"
foreign import javascript unsafe "window[\"SVGScriptElement\"]" gTypeSVGScriptElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGSetElement
unsafeCastGObject = SVGSetElement . unGObject
castToSVGSetElement :: IsGObject obj => obj -> SVGSetElement
castToSVGSetElement = castTo gTypeSVGSetElement "SVGSetElement"
foreign import javascript unsafe "window[\"SVGSetElement\"]" gTypeSVGSetElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGStopElement
unsafeCastGObject = SVGStopElement . unGObject
castToSVGStopElement :: IsGObject obj => obj -> SVGStopElement
castToSVGStopElement = castTo gTypeSVGStopElement "SVGStopElement"
foreign import javascript unsafe "window[\"SVGStopElement\"]" gTypeSVGStopElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGStringList
unsafeCastGObject = SVGStringList . unGObject
castToSVGStringList :: IsGObject obj => obj -> SVGStringList
castToSVGStringList = castTo gTypeSVGStringList "SVGStringList"
foreign import javascript unsafe "window[\"SVGStringList\"]" gTypeSVGStringList :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGStyleElement
unsafeCastGObject = SVGStyleElement . unGObject
castToSVGStyleElement :: IsGObject obj => obj -> SVGStyleElement
castToSVGStyleElement = castTo gTypeSVGStyleElement "SVGStyleElement"
foreign import javascript unsafe "window[\"SVGStyleElement\"]" gTypeSVGStyleElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGSwitchElement
unsafeCastGObject = SVGSwitchElement . unGObject
castToSVGSwitchElement :: IsGObject obj => obj -> SVGSwitchElement
castToSVGSwitchElement = castTo gTypeSVGSwitchElement "SVGSwitchElement"
foreign import javascript unsafe "window[\"SVGSwitchElement\"]" gTypeSVGSwitchElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGSymbolElement
unsafeCastGObject = SVGSymbolElement . unGObject
castToSVGSymbolElement :: IsGObject obj => obj -> SVGSymbolElement
castToSVGSymbolElement = castTo gTypeSVGSymbolElement "SVGSymbolElement"
foreign import javascript unsafe "window[\"SVGSymbolElement\"]" gTypeSVGSymbolElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGTRefElement
unsafeCastGObject = SVGTRefElement . unGObject
castToSVGTRefElement :: IsGObject obj => obj -> SVGTRefElement
castToSVGTRefElement = castTo gTypeSVGTRefElement "SVGTRefElement"
foreign import javascript unsafe "window[\"SVGTRefElement\"]" gTypeSVGTRefElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGTSpanElement
unsafeCastGObject = SVGTSpanElement . unGObject
castToSVGTSpanElement :: IsGObject obj => obj -> SVGTSpanElement
castToSVGTSpanElement = castTo gTypeSVGTSpanElement "SVGTSpanElement"
foreign import javascript unsafe "window[\"SVGTSpanElement\"]" gTypeSVGTSpanElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGTests
unsafeCastGObject = SVGTests . unGObject
castToSVGTests :: IsGObject obj => obj -> SVGTests
castToSVGTests = castTo gTypeSVGTests "SVGTests"
foreign import javascript unsafe "window[\"SVGTests\"]" gTypeSVGTests :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsSVGTextContentElement SVGTextContentElement
instance IsSVGGraphicsElement SVGTextContentElement
instance IsSVGElement SVGTextContentElement
instance IsElement SVGTextContentElement
instance IsNode SVGTextContentElement
instance IsEventTarget SVGTextContentElement
instance IsGObject SVGTextContentElement where
toGObject = GObject . unSVGTextContentElement
unsafeCastGObject = SVGTextContentElement . unGObject
castToSVGTextContentElement :: IsGObject obj => obj -> SVGTextContentElement
castToSVGTextContentElement = castTo gTypeSVGTextContentElement "SVGTextContentElement"
foreign import javascript unsafe "window[\"SVGTextContentElement\"]" gTypeSVGTextContentElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGTextElement
unsafeCastGObject = SVGTextElement . unGObject
castToSVGTextElement :: IsGObject obj => obj -> SVGTextElement
castToSVGTextElement = castTo gTypeSVGTextElement "SVGTextElement"
foreign import javascript unsafe "window[\"SVGTextElement\"]" gTypeSVGTextElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGTextPathElement
unsafeCastGObject = SVGTextPathElement . unGObject
castToSVGTextPathElement :: IsGObject obj => obj -> SVGTextPathElement
castToSVGTextPathElement = castTo gTypeSVGTextPathElement "SVGTextPathElement"
foreign import javascript unsafe "window[\"SVGTextPathElement\"]" gTypeSVGTextPathElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
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
toGObject = GObject . unSVGTextPositioningElement
unsafeCastGObject = SVGTextPositioningElement . unGObject
castToSVGTextPositioningElement :: IsGObject obj => obj -> SVGTextPositioningElement
castToSVGTextPositioningElement = castTo gTypeSVGTextPositioningElement "SVGTextPositioningElement"
foreign import javascript unsafe "window[\"SVGTextPositioningElement\"]" gTypeSVGTextPositioningElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGTitleElement
unsafeCastGObject = SVGTitleElement . unGObject
castToSVGTitleElement :: IsGObject obj => obj -> SVGTitleElement
castToSVGTitleElement = castTo gTypeSVGTitleElement "SVGTitleElement"
foreign import javascript unsafe "window[\"SVGTitleElement\"]" gTypeSVGTitleElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGTransform
unsafeCastGObject = SVGTransform . unGObject
castToSVGTransform :: IsGObject obj => obj -> SVGTransform
castToSVGTransform = castTo gTypeSVGTransform "SVGTransform"
foreign import javascript unsafe "window[\"SVGTransform\"]" gTypeSVGTransform :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGTransformList
unsafeCastGObject = SVGTransformList . unGObject
castToSVGTransformList :: IsGObject obj => obj -> SVGTransformList
castToSVGTransformList = castTo gTypeSVGTransformList "SVGTransformList"
foreign import javascript unsafe "window[\"SVGTransformList\"]" gTypeSVGTransformList :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGURIReference
unsafeCastGObject = SVGURIReference . unGObject
castToSVGURIReference :: IsGObject obj => obj -> SVGURIReference
castToSVGURIReference = castTo gTypeSVGURIReference "SVGURIReference"
foreign import javascript unsafe "window[\"SVGURIReference\"]" gTypeSVGURIReference :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGUnitTypes
unsafeCastGObject = SVGUnitTypes . unGObject
castToSVGUnitTypes :: IsGObject obj => obj -> SVGUnitTypes
castToSVGUnitTypes = castTo gTypeSVGUnitTypes "SVGUnitTypes"
foreign import javascript unsafe "window[\"SVGUnitTypes\"]" gTypeSVGUnitTypes :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGUseElement
unsafeCastGObject = SVGUseElement . unGObject
castToSVGUseElement :: IsGObject obj => obj -> SVGUseElement
castToSVGUseElement = castTo gTypeSVGUseElement "SVGUseElement"
foreign import javascript unsafe "window[\"SVGUseElement\"]" gTypeSVGUseElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGVKernElement
unsafeCastGObject = SVGVKernElement . unGObject
castToSVGVKernElement :: IsGObject obj => obj -> SVGVKernElement
castToSVGVKernElement = castTo gTypeSVGVKernElement "SVGVKernElement"
foreign import javascript unsafe "window[\"SVGVKernElement\"]" gTypeSVGVKernElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGViewElement
unsafeCastGObject = SVGViewElement . unGObject
castToSVGViewElement :: IsGObject obj => obj -> SVGViewElement
castToSVGViewElement = castTo gTypeSVGViewElement "SVGViewElement"
foreign import javascript unsafe "window[\"SVGViewElement\"]" gTypeSVGViewElement :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGViewSpec
unsafeCastGObject = SVGViewSpec . unGObject
castToSVGViewSpec :: IsGObject obj => obj -> SVGViewSpec
castToSVGViewSpec = castTo gTypeSVGViewSpec "SVGViewSpec"
foreign import javascript unsafe "window[\"SVGViewSpec\"]" gTypeSVGViewSpec :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGZoomAndPan
unsafeCastGObject = SVGZoomAndPan . unGObject
castToSVGZoomAndPan :: IsGObject obj => obj -> SVGZoomAndPan
castToSVGZoomAndPan = castTo gTypeSVGZoomAndPan "SVGZoomAndPan"
foreign import javascript unsafe "window[\"SVGZoomAndPan\"]" gTypeSVGZoomAndPan :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSVGZoomEvent
unsafeCastGObject = SVGZoomEvent . unGObject
castToSVGZoomEvent :: IsGObject obj => obj -> SVGZoomEvent
castToSVGZoomEvent = castTo gTypeSVGZoomEvent "SVGZoomEvent"
foreign import javascript unsafe "window[\"SVGZoomEvent\"]" gTypeSVGZoomEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unScreen
unsafeCastGObject = Screen . unGObject
castToScreen :: IsGObject obj => obj -> Screen
castToScreen = castTo gTypeScreen "Screen"
foreign import javascript unsafe "window[\"Screen\"]" gTypeScreen :: GType
#else
type IsScreen o = ScreenClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unScriptProcessorNode
unsafeCastGObject = ScriptProcessorNode . unGObject
castToScriptProcessorNode :: IsGObject obj => obj -> ScriptProcessorNode
castToScriptProcessorNode = castTo gTypeScriptProcessorNode "ScriptProcessorNode"
foreign import javascript unsafe "window[\"ScriptProcessorNode\"]" gTypeScriptProcessorNode :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unScriptProfile
unsafeCastGObject = ScriptProfile . unGObject
castToScriptProfile :: IsGObject obj => obj -> ScriptProfile
castToScriptProfile = castTo gTypeScriptProfile "ScriptProfile"
foreign import javascript unsafe "window[\"ScriptProfile\"]" gTypeScriptProfile :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unScriptProfileNode
unsafeCastGObject = ScriptProfileNode . unGObject
castToScriptProfileNode :: IsGObject obj => obj -> ScriptProfileNode
castToScriptProfileNode = castTo gTypeScriptProfileNode "ScriptProfileNode"
foreign import javascript unsafe "window[\"ScriptProfileNode\"]" gTypeScriptProfileNode :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSecurityPolicy
unsafeCastGObject = SecurityPolicy . unGObject
castToSecurityPolicy :: IsGObject obj => obj -> SecurityPolicy
castToSecurityPolicy = castTo gTypeSecurityPolicy "SecurityPolicy"
foreign import javascript unsafe "window[\"SecurityPolicy\"]" gTypeSecurityPolicy :: GType
#else
#ifndef USE_OLD_WEBKIT
type IsSecurityPolicy o = SecurityPolicyClass o
#endif
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSecurityPolicyViolationEvent
unsafeCastGObject = SecurityPolicyViolationEvent . unGObject
castToSecurityPolicyViolationEvent :: IsGObject obj => obj -> SecurityPolicyViolationEvent
castToSecurityPolicyViolationEvent = castTo gTypeSecurityPolicyViolationEvent "SecurityPolicyViolationEvent"
foreign import javascript unsafe "window[\"SecurityPolicyViolationEvent\"]" gTypeSecurityPolicyViolationEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSelection
unsafeCastGObject = Selection . unGObject
castToSelection :: IsGObject obj => obj -> Selection
castToSelection = castTo gTypeSelection "Selection"
foreign import javascript unsafe "window[\"Selection\"]" gTypeSelection :: GType
#else
type IsSelection o = SelectionClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSourceBuffer
unsafeCastGObject = SourceBuffer . unGObject
castToSourceBuffer :: IsGObject obj => obj -> SourceBuffer
castToSourceBuffer = castTo gTypeSourceBuffer "SourceBuffer"
foreign import javascript unsafe "window[\"SourceBuffer\"]" gTypeSourceBuffer :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSourceBufferList
unsafeCastGObject = SourceBufferList . unGObject
castToSourceBufferList :: IsGObject obj => obj -> SourceBufferList
castToSourceBufferList = castTo gTypeSourceBufferList "SourceBufferList"
foreign import javascript unsafe "window[\"SourceBufferList\"]" gTypeSourceBufferList :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSourceInfo
unsafeCastGObject = SourceInfo . unGObject
castToSourceInfo :: IsGObject obj => obj -> SourceInfo
castToSourceInfo = castTo gTypeSourceInfo "SourceInfo"
foreign import javascript unsafe "window[\"SourceInfo\"]" gTypeSourceInfo :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSpeechSynthesis
unsafeCastGObject = SpeechSynthesis . unGObject
castToSpeechSynthesis :: IsGObject obj => obj -> SpeechSynthesis
castToSpeechSynthesis = castTo gTypeSpeechSynthesis "SpeechSynthesis"
foreign import javascript unsafe "window[\"SpeechSynthesis\"]" gTypeSpeechSynthesis :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSpeechSynthesisEvent
unsafeCastGObject = SpeechSynthesisEvent . unGObject
castToSpeechSynthesisEvent :: IsGObject obj => obj -> SpeechSynthesisEvent
castToSpeechSynthesisEvent = castTo gTypeSpeechSynthesisEvent "SpeechSynthesisEvent"
foreign import javascript unsafe "window[\"SpeechSynthesisEvent\"]" gTypeSpeechSynthesisEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSpeechSynthesisUtterance
unsafeCastGObject = SpeechSynthesisUtterance . unGObject
castToSpeechSynthesisUtterance :: IsGObject obj => obj -> SpeechSynthesisUtterance
castToSpeechSynthesisUtterance = castTo gTypeSpeechSynthesisUtterance "SpeechSynthesisUtterance"
foreign import javascript unsafe "window[\"SpeechSynthesisUtterance\"]" gTypeSpeechSynthesisUtterance :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSpeechSynthesisVoice
unsafeCastGObject = SpeechSynthesisVoice . unGObject
castToSpeechSynthesisVoice :: IsGObject obj => obj -> SpeechSynthesisVoice
castToSpeechSynthesisVoice = castTo gTypeSpeechSynthesisVoice "SpeechSynthesisVoice"
foreign import javascript unsafe "window[\"SpeechSynthesisVoice\"]" gTypeSpeechSynthesisVoice :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unStorage
unsafeCastGObject = Storage . unGObject
castToStorage :: IsGObject obj => obj -> Storage
castToStorage = castTo gTypeStorage "Storage"
foreign import javascript unsafe "window[\"Storage\"]" gTypeStorage :: GType
#else
type IsStorage o = StorageClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unStorageEvent
unsafeCastGObject = StorageEvent . unGObject
castToStorageEvent :: IsGObject obj => obj -> StorageEvent
castToStorageEvent = castTo gTypeStorageEvent "StorageEvent"
foreign import javascript unsafe "window[\"StorageEvent\"]" gTypeStorageEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unStorageInfo
unsafeCastGObject = StorageInfo . unGObject
castToStorageInfo :: IsGObject obj => obj -> StorageInfo
castToStorageInfo = castTo gTypeStorageInfo "StorageInfo"
foreign import javascript unsafe "window[\"StorageInfo\"]" gTypeStorageInfo :: GType
#else
#ifndef USE_OLD_WEBKIT
type IsStorageInfo o = StorageInfoClass o
#endif
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unStorageQuota
unsafeCastGObject = StorageQuota . unGObject
castToStorageQuota :: IsGObject obj => obj -> StorageQuota
castToStorageQuota = castTo gTypeStorageQuota "StorageQuota"
foreign import javascript unsafe "window[\"StorageQuota\"]" gTypeStorageQuota :: GType
#else
#ifndef USE_OLD_WEBKIT
type IsStorageQuota o = StorageQuotaClass o
#endif
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unStyleMedia
unsafeCastGObject = StyleMedia . unGObject
castToStyleMedia :: IsGObject obj => obj -> StyleMedia
castToStyleMedia = castTo gTypeStyleMedia "StyleMedia"
foreign import javascript unsafe "window[\"StyleMedia\"]" gTypeStyleMedia :: GType
#else
type IsStyleMedia o = StyleMediaClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsStyleSheet StyleSheet
instance IsGObject StyleSheet where
toGObject = GObject . unStyleSheet
unsafeCastGObject = StyleSheet . unGObject
castToStyleSheet :: IsGObject obj => obj -> StyleSheet
castToStyleSheet = castTo gTypeStyleSheet "StyleSheet"
foreign import javascript unsafe "window[\"StyleSheet\"]" gTypeStyleSheet :: GType
#else
type IsStyleSheet o = StyleSheetClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unStyleSheetList
unsafeCastGObject = StyleSheetList . unGObject
castToStyleSheetList :: IsGObject obj => obj -> StyleSheetList
castToStyleSheetList = castTo gTypeStyleSheetList "StyleSheetList"
foreign import javascript unsafe "window[\"StyleSheetList\"]" gTypeStyleSheetList :: GType
#else
type IsStyleSheetList o = StyleSheetListClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unSubtleCrypto
unsafeCastGObject = SubtleCrypto . unGObject
castToSubtleCrypto :: IsGObject obj => obj -> SubtleCrypto
castToSubtleCrypto = castTo gTypeSubtleCrypto "SubtleCrypto"
foreign import javascript unsafe "window[\"WebKitSubtleCrypto\"]" gTypeSubtleCrypto :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsText Text
instance IsCharacterData Text
instance IsNode Text
instance IsEventTarget Text
instance IsGObject Text where
toGObject = GObject . unText
unsafeCastGObject = Text . unGObject
castToText :: IsGObject obj => obj -> Text
castToText = castTo gTypeText "Text"
foreign import javascript unsafe "window[\"Text\"]" gTypeText :: GType
#else
type IsText o = TextClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unTextEvent
unsafeCastGObject = TextEvent . unGObject
castToTextEvent :: IsGObject obj => obj -> TextEvent
castToTextEvent = castTo gTypeTextEvent "TextEvent"
foreign import javascript unsafe "window[\"TextEvent\"]" gTypeTextEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unTextMetrics
unsafeCastGObject = TextMetrics . unGObject
castToTextMetrics :: IsGObject obj => obj -> TextMetrics
castToTextMetrics = castTo gTypeTextMetrics "TextMetrics"
foreign import javascript unsafe "window[\"TextMetrics\"]" gTypeTextMetrics :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unTextTrack
unsafeCastGObject = TextTrack . unGObject
castToTextTrack :: IsGObject obj => obj -> TextTrack
castToTextTrack = castTo gTypeTextTrack "TextTrack"
foreign import javascript unsafe "window[\"TextTrack\"]" gTypeTextTrack :: GType
#else
#ifndef USE_OLD_WEBKIT
type IsTextTrack o = TextTrackClass o
#endif
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsTextTrackCue TextTrackCue
instance IsEventTarget TextTrackCue
instance IsGObject TextTrackCue where
toGObject = GObject . unTextTrackCue
unsafeCastGObject = TextTrackCue . unGObject
castToTextTrackCue :: IsGObject obj => obj -> TextTrackCue
castToTextTrackCue = castTo gTypeTextTrackCue "TextTrackCue"
foreign import javascript unsafe "window[\"TextTrackCue\"]" gTypeTextTrackCue :: GType
#else
#ifndef USE_OLD_WEBKIT
type IsTextTrackCue o = TextTrackCueClass o
#endif
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unTextTrackCueList
unsafeCastGObject = TextTrackCueList . unGObject
castToTextTrackCueList :: IsGObject obj => obj -> TextTrackCueList
castToTextTrackCueList = castTo gTypeTextTrackCueList "TextTrackCueList"
foreign import javascript unsafe "window[\"TextTrackCueList\"]" gTypeTextTrackCueList :: GType
#else
#ifndef USE_OLD_WEBKIT
type IsTextTrackCueList o = TextTrackCueListClass o
#endif
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unTextTrackList
unsafeCastGObject = TextTrackList . unGObject
castToTextTrackList :: IsGObject obj => obj -> TextTrackList
castToTextTrackList = castTo gTypeTextTrackList "TextTrackList"
foreign import javascript unsafe "window[\"TextTrackList\"]" gTypeTextTrackList :: GType
#else
#ifndef USE_OLD_WEBKIT
type IsTextTrackList o = TextTrackListClass o
#endif
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unTimeRanges
unsafeCastGObject = TimeRanges . unGObject
castToTimeRanges :: IsGObject obj => obj -> TimeRanges
castToTimeRanges = castTo gTypeTimeRanges "TimeRanges"
foreign import javascript unsafe "window[\"TimeRanges\"]" gTypeTimeRanges :: GType
#else
type IsTimeRanges o = TimeRangesClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unTouch
unsafeCastGObject = Touch . unGObject
castToTouch :: IsGObject obj => obj -> Touch
castToTouch = castTo gTypeTouch "Touch"
foreign import javascript unsafe "window[\"Touch\"]" gTypeTouch :: GType
#else
#ifndef USE_OLD_WEBKIT
type IsTouch o = TouchClass o
#endif
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unTouchEvent
unsafeCastGObject = TouchEvent . unGObject
castToTouchEvent :: IsGObject obj => obj -> TouchEvent
castToTouchEvent = castTo gTypeTouchEvent "TouchEvent"
foreign import javascript unsafe "window[\"TouchEvent\"]" gTypeTouchEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unTouchList
unsafeCastGObject = TouchList . unGObject
castToTouchList :: IsGObject obj => obj -> TouchList
castToTouchList = castTo gTypeTouchList "TouchList"
foreign import javascript unsafe "window[\"TouchList\"]" gTypeTouchList :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unTrackEvent
unsafeCastGObject = TrackEvent . unGObject
castToTrackEvent :: IsGObject obj => obj -> TrackEvent
castToTrackEvent = castTo gTypeTrackEvent "TrackEvent"
foreign import javascript unsafe "window[\"TrackEvent\"]" gTypeTrackEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unTransitionEvent
unsafeCastGObject = TransitionEvent . unGObject
castToTransitionEvent :: IsGObject obj => obj -> TransitionEvent
castToTransitionEvent = castTo gTypeTransitionEvent "TransitionEvent"
foreign import javascript unsafe "window[\"TransitionEvent\"]" gTypeTransitionEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unTreeWalker
unsafeCastGObject = TreeWalker . unGObject
castToTreeWalker :: IsGObject obj => obj -> TreeWalker
castToTreeWalker = castTo gTypeTreeWalker "TreeWalker"
foreign import javascript unsafe "window[\"TreeWalker\"]" gTypeTreeWalker :: GType
#else
type IsTreeWalker o = TreeWalkerClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unTypeConversions
unsafeCastGObject = TypeConversions . unGObject
castToTypeConversions :: IsGObject obj => obj -> TypeConversions
castToTypeConversions = castTo gTypeTypeConversions "TypeConversions"
foreign import javascript unsafe "window[\"TypeConversions\"]" gTypeTypeConversions :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsUIEvent UIEvent
instance IsEvent UIEvent
instance IsGObject UIEvent where
toGObject = GObject . unUIEvent
unsafeCastGObject = UIEvent . unGObject
castToUIEvent :: IsGObject obj => obj -> UIEvent
castToUIEvent = castTo gTypeUIEvent "UIEvent"
foreign import javascript unsafe "window[\"UIEvent\"]" gTypeUIEvent :: GType
#else
type IsUIEvent o = UIEventClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unUIRequestEvent
unsafeCastGObject = UIRequestEvent . unGObject
castToUIRequestEvent :: IsGObject obj => obj -> UIRequestEvent
castToUIRequestEvent = castTo gTypeUIRequestEvent "UIRequestEvent"
foreign import javascript unsafe "window[\"UIRequestEvent\"]" gTypeUIRequestEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unURL
unsafeCastGObject = URL . unGObject
castToURL :: IsGObject obj => obj -> URL
castToURL = castTo gTypeURL "URL"
foreign import javascript unsafe "window[\"URL\"]" gTypeURL :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unURLUtils
unsafeCastGObject = URLUtils . unGObject
castToURLUtils :: IsGObject obj => obj -> URLUtils
castToURLUtils = castTo gTypeURLUtils "URLUtils"
foreign import javascript unsafe "window[\"URLUtils\"]" gTypeURLUtils :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unUserMessageHandler
unsafeCastGObject = UserMessageHandler . unGObject
castToUserMessageHandler :: IsGObject obj => obj -> UserMessageHandler
castToUserMessageHandler = castTo gTypeUserMessageHandler "UserMessageHandler"
foreign import javascript unsafe "window[\"UserMessageHandler\"]" gTypeUserMessageHandler :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unUserMessageHandlersNamespace
unsafeCastGObject = UserMessageHandlersNamespace . unGObject
castToUserMessageHandlersNamespace :: IsGObject obj => obj -> UserMessageHandlersNamespace
castToUserMessageHandlersNamespace = castTo gTypeUserMessageHandlersNamespace "UserMessageHandlersNamespace"
foreign import javascript unsafe "window[\"UserMessageHandlersNamespace\"]" gTypeUserMessageHandlersNamespace :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unVTTCue
unsafeCastGObject = VTTCue . unGObject
castToVTTCue :: IsGObject obj => obj -> VTTCue
castToVTTCue = castTo gTypeVTTCue "VTTCue"
foreign import javascript unsafe "window[\"VTTCue\"]" gTypeVTTCue :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unVTTRegion
unsafeCastGObject = VTTRegion . unGObject
castToVTTRegion :: IsGObject obj => obj -> VTTRegion
castToVTTRegion = castTo gTypeVTTRegion "VTTRegion"
foreign import javascript unsafe "window[\"VTTRegion\"]" gTypeVTTRegion :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unVTTRegionList
unsafeCastGObject = VTTRegionList . unGObject
castToVTTRegionList :: IsGObject obj => obj -> VTTRegionList
castToVTTRegionList = castTo gTypeVTTRegionList "VTTRegionList"
foreign import javascript unsafe "window[\"VTTRegionList\"]" gTypeVTTRegionList :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unValidityState
unsafeCastGObject = ValidityState . unGObject
castToValidityState :: IsGObject obj => obj -> ValidityState
castToValidityState = castTo gTypeValidityState "ValidityState"
foreign import javascript unsafe "window[\"ValidityState\"]" gTypeValidityState :: GType
#else
type IsValidityState o = ValidityStateClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unVideoPlaybackQuality
unsafeCastGObject = VideoPlaybackQuality . unGObject
castToVideoPlaybackQuality :: IsGObject obj => obj -> VideoPlaybackQuality
castToVideoPlaybackQuality = castTo gTypeVideoPlaybackQuality "VideoPlaybackQuality"
foreign import javascript unsafe "window[\"VideoPlaybackQuality\"]" gTypeVideoPlaybackQuality :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unVideoStreamTrack
unsafeCastGObject = VideoStreamTrack . unGObject
castToVideoStreamTrack :: IsGObject obj => obj -> VideoStreamTrack
castToVideoStreamTrack = castTo gTypeVideoStreamTrack "VideoStreamTrack"
foreign import javascript unsafe "window[\"VideoStreamTrack\"]" gTypeVideoStreamTrack :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unVideoTrack
unsafeCastGObject = VideoTrack . unGObject
castToVideoTrack :: IsGObject obj => obj -> VideoTrack
castToVideoTrack = castTo gTypeVideoTrack "VideoTrack"
foreign import javascript unsafe "window[\"VideoTrack\"]" gTypeVideoTrack :: GType
#else
#ifndef USE_OLD_WEBKIT
type IsVideoTrack o = VideoTrackClass o
#endif
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unVideoTrackList
unsafeCastGObject = VideoTrackList . unGObject
castToVideoTrackList :: IsGObject obj => obj -> VideoTrackList
castToVideoTrackList = castTo gTypeVideoTrackList "VideoTrackList"
foreign import javascript unsafe "window[\"VideoTrackList\"]" gTypeVideoTrackList :: GType
#else
#ifndef USE_OLD_WEBKIT
type IsVideoTrackList o = VideoTrackListClass o
#endif
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWaveShaperNode
unsafeCastGObject = WaveShaperNode . unGObject
castToWaveShaperNode :: IsGObject obj => obj -> WaveShaperNode
castToWaveShaperNode = castTo gTypeWaveShaperNode "WaveShaperNode"
foreign import javascript unsafe "window[\"WaveShaperNode\"]" gTypeWaveShaperNode :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGL2RenderingContext
unsafeCastGObject = WebGL2RenderingContext . unGObject
castToWebGL2RenderingContext :: IsGObject obj => obj -> WebGL2RenderingContext
castToWebGL2RenderingContext = castTo gTypeWebGL2RenderingContext "WebGL2RenderingContext"
foreign import javascript unsafe "window[\"WebGL2RenderingContext\"]" gTypeWebGL2RenderingContext :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGLActiveInfo
unsafeCastGObject = WebGLActiveInfo . unGObject
castToWebGLActiveInfo :: IsGObject obj => obj -> WebGLActiveInfo
castToWebGLActiveInfo = castTo gTypeWebGLActiveInfo "WebGLActiveInfo"
foreign import javascript unsafe "window[\"WebGLActiveInfo\"]" gTypeWebGLActiveInfo :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGLBuffer
unsafeCastGObject = WebGLBuffer . unGObject
castToWebGLBuffer :: IsGObject obj => obj -> WebGLBuffer
castToWebGLBuffer = castTo gTypeWebGLBuffer "WebGLBuffer"
foreign import javascript unsafe "window[\"WebGLBuffer\"]" gTypeWebGLBuffer :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGLCompressedTextureATC
unsafeCastGObject = WebGLCompressedTextureATC . unGObject
castToWebGLCompressedTextureATC :: IsGObject obj => obj -> WebGLCompressedTextureATC
castToWebGLCompressedTextureATC = castTo gTypeWebGLCompressedTextureATC "WebGLCompressedTextureATC"
foreign import javascript unsafe "window[\"WebGLCompressedTextureATC\"]" gTypeWebGLCompressedTextureATC :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGLCompressedTexturePVRTC
unsafeCastGObject = WebGLCompressedTexturePVRTC . unGObject
castToWebGLCompressedTexturePVRTC :: IsGObject obj => obj -> WebGLCompressedTexturePVRTC
castToWebGLCompressedTexturePVRTC = castTo gTypeWebGLCompressedTexturePVRTC "WebGLCompressedTexturePVRTC"
foreign import javascript unsafe "window[\"WebGLCompressedTexturePVRTC\"]" gTypeWebGLCompressedTexturePVRTC :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGLCompressedTextureS3TC
unsafeCastGObject = WebGLCompressedTextureS3TC . unGObject
castToWebGLCompressedTextureS3TC :: IsGObject obj => obj -> WebGLCompressedTextureS3TC
castToWebGLCompressedTextureS3TC = castTo gTypeWebGLCompressedTextureS3TC "WebGLCompressedTextureS3TC"
foreign import javascript unsafe "window[\"WebGLCompressedTextureS3TC\"]" gTypeWebGLCompressedTextureS3TC :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGLContextAttributes
unsafeCastGObject = WebGLContextAttributes . unGObject
castToWebGLContextAttributes :: IsGObject obj => obj -> WebGLContextAttributes
castToWebGLContextAttributes = castTo gTypeWebGLContextAttributes "WebGLContextAttributes"
foreign import javascript unsafe "window[\"WebGLContextAttributes\"]" gTypeWebGLContextAttributes :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGLContextEvent
unsafeCastGObject = WebGLContextEvent . unGObject
castToWebGLContextEvent :: IsGObject obj => obj -> WebGLContextEvent
castToWebGLContextEvent = castTo gTypeWebGLContextEvent "WebGLContextEvent"
foreign import javascript unsafe "window[\"WebGLContextEvent\"]" gTypeWebGLContextEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGLDebugRendererInfo
unsafeCastGObject = WebGLDebugRendererInfo . unGObject
castToWebGLDebugRendererInfo :: IsGObject obj => obj -> WebGLDebugRendererInfo
castToWebGLDebugRendererInfo = castTo gTypeWebGLDebugRendererInfo "WebGLDebugRendererInfo"
foreign import javascript unsafe "window[\"WebGLDebugRendererInfo\"]" gTypeWebGLDebugRendererInfo :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGLDebugShaders
unsafeCastGObject = WebGLDebugShaders . unGObject
castToWebGLDebugShaders :: IsGObject obj => obj -> WebGLDebugShaders
castToWebGLDebugShaders = castTo gTypeWebGLDebugShaders "WebGLDebugShaders"
foreign import javascript unsafe "window[\"WebGLDebugShaders\"]" gTypeWebGLDebugShaders :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGLDepthTexture
unsafeCastGObject = WebGLDepthTexture . unGObject
castToWebGLDepthTexture :: IsGObject obj => obj -> WebGLDepthTexture
castToWebGLDepthTexture = castTo gTypeWebGLDepthTexture "WebGLDepthTexture"
foreign import javascript unsafe "window[\"WebGLDepthTexture\"]" gTypeWebGLDepthTexture :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGLDrawBuffers
unsafeCastGObject = WebGLDrawBuffers . unGObject
castToWebGLDrawBuffers :: IsGObject obj => obj -> WebGLDrawBuffers
castToWebGLDrawBuffers = castTo gTypeWebGLDrawBuffers "WebGLDrawBuffers"
foreign import javascript unsafe "window[\"WebGLDrawBuffers\"]" gTypeWebGLDrawBuffers :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGLFramebuffer
unsafeCastGObject = WebGLFramebuffer . unGObject
castToWebGLFramebuffer :: IsGObject obj => obj -> WebGLFramebuffer
castToWebGLFramebuffer = castTo gTypeWebGLFramebuffer "WebGLFramebuffer"
foreign import javascript unsafe "window[\"WebGLFramebuffer\"]" gTypeWebGLFramebuffer :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGLLoseContext
unsafeCastGObject = WebGLLoseContext . unGObject
castToWebGLLoseContext :: IsGObject obj => obj -> WebGLLoseContext
castToWebGLLoseContext = castTo gTypeWebGLLoseContext "WebGLLoseContext"
foreign import javascript unsafe "window[\"WebGLLoseContext\"]" gTypeWebGLLoseContext :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGLProgram
unsafeCastGObject = WebGLProgram . unGObject
castToWebGLProgram :: IsGObject obj => obj -> WebGLProgram
castToWebGLProgram = castTo gTypeWebGLProgram "WebGLProgram"
foreign import javascript unsafe "window[\"WebGLProgram\"]" gTypeWebGLProgram :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGLQuery
unsafeCastGObject = WebGLQuery . unGObject
castToWebGLQuery :: IsGObject obj => obj -> WebGLQuery
castToWebGLQuery = castTo gTypeWebGLQuery "WebGLQuery"
foreign import javascript unsafe "window[\"WebGLQuery\"]" gTypeWebGLQuery :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGLRenderbuffer
unsafeCastGObject = WebGLRenderbuffer . unGObject
castToWebGLRenderbuffer :: IsGObject obj => obj -> WebGLRenderbuffer
castToWebGLRenderbuffer = castTo gTypeWebGLRenderbuffer "WebGLRenderbuffer"
foreign import javascript unsafe "window[\"WebGLRenderbuffer\"]" gTypeWebGLRenderbuffer :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGLRenderingContext
unsafeCastGObject = WebGLRenderingContext . unGObject
castToWebGLRenderingContext :: IsGObject obj => obj -> WebGLRenderingContext
castToWebGLRenderingContext = castTo gTypeWebGLRenderingContext "WebGLRenderingContext"
foreign import javascript unsafe "window[\"WebGLRenderingContext\"]" gTypeWebGLRenderingContext :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsWebGLRenderingContextBase WebGLRenderingContextBase
instance IsCanvasRenderingContext WebGLRenderingContextBase
instance IsGObject WebGLRenderingContextBase where
toGObject = GObject . unWebGLRenderingContextBase
unsafeCastGObject = WebGLRenderingContextBase . unGObject
castToWebGLRenderingContextBase :: IsGObject obj => obj -> WebGLRenderingContextBase
castToWebGLRenderingContextBase = castTo gTypeWebGLRenderingContextBase "WebGLRenderingContextBase"
foreign import javascript unsafe "window[\"WebGLRenderingContextBase\"]" gTypeWebGLRenderingContextBase :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGLSampler
unsafeCastGObject = WebGLSampler . unGObject
castToWebGLSampler :: IsGObject obj => obj -> WebGLSampler
castToWebGLSampler = castTo gTypeWebGLSampler "WebGLSampler"
foreign import javascript unsafe "window[\"WebGLSampler\"]" gTypeWebGLSampler :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGLShader
unsafeCastGObject = WebGLShader . unGObject
castToWebGLShader :: IsGObject obj => obj -> WebGLShader
castToWebGLShader = castTo gTypeWebGLShader "WebGLShader"
foreign import javascript unsafe "window[\"WebGLShader\"]" gTypeWebGLShader :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGLShaderPrecisionFormat
unsafeCastGObject = WebGLShaderPrecisionFormat . unGObject
castToWebGLShaderPrecisionFormat :: IsGObject obj => obj -> WebGLShaderPrecisionFormat
castToWebGLShaderPrecisionFormat = castTo gTypeWebGLShaderPrecisionFormat "WebGLShaderPrecisionFormat"
foreign import javascript unsafe "window[\"WebGLShaderPrecisionFormat\"]" gTypeWebGLShaderPrecisionFormat :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGLSync
unsafeCastGObject = WebGLSync . unGObject
castToWebGLSync :: IsGObject obj => obj -> WebGLSync
castToWebGLSync = castTo gTypeWebGLSync "WebGLSync"
foreign import javascript unsafe "window[\"WebGLSync\"]" gTypeWebGLSync :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGLTexture
unsafeCastGObject = WebGLTexture . unGObject
castToWebGLTexture :: IsGObject obj => obj -> WebGLTexture
castToWebGLTexture = castTo gTypeWebGLTexture "WebGLTexture"
foreign import javascript unsafe "window[\"WebGLTexture\"]" gTypeWebGLTexture :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGLTransformFeedback
unsafeCastGObject = WebGLTransformFeedback . unGObject
castToWebGLTransformFeedback :: IsGObject obj => obj -> WebGLTransformFeedback
castToWebGLTransformFeedback = castTo gTypeWebGLTransformFeedback "WebGLTransformFeedback"
foreign import javascript unsafe "window[\"WebGLTransformFeedback\"]" gTypeWebGLTransformFeedback :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGLUniformLocation
unsafeCastGObject = WebGLUniformLocation . unGObject
castToWebGLUniformLocation :: IsGObject obj => obj -> WebGLUniformLocation
castToWebGLUniformLocation = castTo gTypeWebGLUniformLocation "WebGLUniformLocation"
foreign import javascript unsafe "window[\"WebGLUniformLocation\"]" gTypeWebGLUniformLocation :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGLVertexArrayObject
unsafeCastGObject = WebGLVertexArrayObject . unGObject
castToWebGLVertexArrayObject :: IsGObject obj => obj -> WebGLVertexArrayObject
castToWebGLVertexArrayObject = castTo gTypeWebGLVertexArrayObject "WebGLVertexArrayObject"
foreign import javascript unsafe "window[\"WebGLVertexArrayObject\"]" gTypeWebGLVertexArrayObject :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebGLVertexArrayObjectOES
unsafeCastGObject = WebGLVertexArrayObjectOES . unGObject
castToWebGLVertexArrayObjectOES :: IsGObject obj => obj -> WebGLVertexArrayObjectOES
castToWebGLVertexArrayObjectOES = castTo gTypeWebGLVertexArrayObjectOES "WebGLVertexArrayObjectOES"
foreign import javascript unsafe "window[\"WebGLVertexArrayObjectOES\"]" gTypeWebGLVertexArrayObjectOES :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebKitAnimationEvent
unsafeCastGObject = WebKitAnimationEvent . unGObject
castToWebKitAnimationEvent :: IsGObject obj => obj -> WebKitAnimationEvent
castToWebKitAnimationEvent = castTo gTypeWebKitAnimationEvent "WebKitAnimationEvent"
foreign import javascript unsafe "window[\"WebKitAnimationEvent\"]" gTypeWebKitAnimationEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebKitCSSFilterValue
unsafeCastGObject = WebKitCSSFilterValue . unGObject
castToWebKitCSSFilterValue :: IsGObject obj => obj -> WebKitCSSFilterValue
castToWebKitCSSFilterValue = castTo gTypeWebKitCSSFilterValue "WebKitCSSFilterValue"
foreign import javascript unsafe "window[\"WebKitCSSFilterValue\"]" gTypeWebKitCSSFilterValue :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebKitCSSMatrix
unsafeCastGObject = WebKitCSSMatrix . unGObject
castToWebKitCSSMatrix :: IsGObject obj => obj -> WebKitCSSMatrix
castToWebKitCSSMatrix = castTo gTypeWebKitCSSMatrix "WebKitCSSMatrix"
foreign import javascript unsafe "window[\"WebKitCSSMatrix\"]" gTypeWebKitCSSMatrix :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebKitCSSRegionRule
unsafeCastGObject = WebKitCSSRegionRule . unGObject
castToWebKitCSSRegionRule :: IsGObject obj => obj -> WebKitCSSRegionRule
castToWebKitCSSRegionRule = castTo gTypeWebKitCSSRegionRule "WebKitCSSRegionRule"
foreign import javascript unsafe "window[\"WebKitCSSRegionRule\"]" gTypeWebKitCSSRegionRule :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebKitCSSTransformValue
unsafeCastGObject = WebKitCSSTransformValue . unGObject
castToWebKitCSSTransformValue :: IsGObject obj => obj -> WebKitCSSTransformValue
castToWebKitCSSTransformValue = castTo gTypeWebKitCSSTransformValue "WebKitCSSTransformValue"
foreign import javascript unsafe "window[\"WebKitCSSTransformValue\"]" gTypeWebKitCSSTransformValue :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebKitCSSViewportRule
unsafeCastGObject = WebKitCSSViewportRule . unGObject
castToWebKitCSSViewportRule :: IsGObject obj => obj -> WebKitCSSViewportRule
castToWebKitCSSViewportRule = castTo gTypeWebKitCSSViewportRule "WebKitCSSViewportRule"
foreign import javascript unsafe "window[\"WebKitCSSViewportRule\"]" gTypeWebKitCSSViewportRule :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebKitNamedFlow
unsafeCastGObject = WebKitNamedFlow . unGObject
castToWebKitNamedFlow :: IsGObject obj => obj -> WebKitNamedFlow
castToWebKitNamedFlow = castTo gTypeWebKitNamedFlow "WebKitNamedFlow"
foreign import javascript unsafe "window[\"WebKitNamedFlow\"]" gTypeWebKitNamedFlow :: GType
#else
type IsWebKitNamedFlow o = WebKitNamedFlowClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebKitNamespace
unsafeCastGObject = WebKitNamespace . unGObject
castToWebKitNamespace :: IsGObject obj => obj -> WebKitNamespace
castToWebKitNamespace = castTo gTypeWebKitNamespace "WebKitNamespace"
foreign import javascript unsafe "window[\"WebKitNamespace\"]" gTypeWebKitNamespace :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebKitPlaybackTargetAvailabilityEvent
unsafeCastGObject = WebKitPlaybackTargetAvailabilityEvent . unGObject
castToWebKitPlaybackTargetAvailabilityEvent :: IsGObject obj => obj -> WebKitPlaybackTargetAvailabilityEvent
castToWebKitPlaybackTargetAvailabilityEvent = castTo gTypeWebKitPlaybackTargetAvailabilityEvent "WebKitPlaybackTargetAvailabilityEvent"
foreign import javascript unsafe "window[\"WebKitPlaybackTargetAvailabilityEvent\"]" gTypeWebKitPlaybackTargetAvailabilityEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebKitPoint
unsafeCastGObject = WebKitPoint . unGObject
castToWebKitPoint :: IsGObject obj => obj -> WebKitPoint
castToWebKitPoint = castTo gTypeWebKitPoint "WebKitPoint"
foreign import javascript unsafe "window[\"WebKitPoint\"]" gTypeWebKitPoint :: GType
#else
type IsWebKitPoint o = WebKitPointClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebKitTransitionEvent
unsafeCastGObject = WebKitTransitionEvent . unGObject
castToWebKitTransitionEvent :: IsGObject obj => obj -> WebKitTransitionEvent
castToWebKitTransitionEvent = castTo gTypeWebKitTransitionEvent "WebKitTransitionEvent"
foreign import javascript unsafe "window[\"WebKitTransitionEvent\"]" gTypeWebKitTransitionEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWebSocket
unsafeCastGObject = WebSocket . unGObject
castToWebSocket :: IsGObject obj => obj -> WebSocket
castToWebSocket = castTo gTypeWebSocket "WebSocket"
foreign import javascript unsafe "window[\"WebSocket\"]" gTypeWebSocket :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWheelEvent
unsafeCastGObject = WheelEvent . unGObject
castToWheelEvent :: IsGObject obj => obj -> WheelEvent
castToWheelEvent = castTo gTypeWheelEvent "WheelEvent"
foreign import javascript unsafe "window[\"WheelEvent\"]" gTypeWheelEvent :: GType
#else
#ifndef USE_OLD_WEBKIT
type IsWheelEvent o = WheelEventClass o
#endif
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWindow
unsafeCastGObject = Window . unGObject
castToWindow :: IsGObject obj => obj -> Window
castToWindow = castTo gTypeWindow "Window"
foreign import javascript unsafe "window[\"Window\"]" gTypeWindow :: GType
#else
type IsWindow o = WindowClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWindowBase64
unsafeCastGObject = WindowBase64 . unGObject
castToWindowBase64 :: IsGObject obj => obj -> WindowBase64
castToWindowBase64 = castTo gTypeWindowBase64 "WindowBase64"
foreign import javascript unsafe "window[\"WindowBase64\"]" gTypeWindowBase64 :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWindowTimers
unsafeCastGObject = WindowTimers . unGObject
castToWindowTimers :: IsGObject obj => obj -> WindowTimers
castToWindowTimers = castTo gTypeWindowTimers "WindowTimers"
foreign import javascript unsafe "window[\"WindowTimers\"]" gTypeWindowTimers :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWorker
unsafeCastGObject = Worker . unGObject
castToWorker :: IsGObject obj => obj -> Worker
castToWorker = castTo gTypeWorker "Worker"
foreign import javascript unsafe "window[\"Worker\"]" gTypeWorker :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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 = unsafeCastGObject . toGObject
instance IsWorkerGlobalScope WorkerGlobalScope
instance IsEventTarget WorkerGlobalScope
instance IsGObject WorkerGlobalScope where
toGObject = GObject . unWorkerGlobalScope
unsafeCastGObject = WorkerGlobalScope . unGObject
castToWorkerGlobalScope :: IsGObject obj => obj -> WorkerGlobalScope
castToWorkerGlobalScope = castTo gTypeWorkerGlobalScope "WorkerGlobalScope"
foreign import javascript unsafe "window[\"WorkerGlobalScope\"]" gTypeWorkerGlobalScope :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWorkerLocation
unsafeCastGObject = WorkerLocation . unGObject
castToWorkerLocation :: IsGObject obj => obj -> WorkerLocation
castToWorkerLocation = castTo gTypeWorkerLocation "WorkerLocation"
foreign import javascript unsafe "window[\"WorkerLocation\"]" gTypeWorkerLocation :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unWorkerNavigator
unsafeCastGObject = WorkerNavigator . unGObject
castToWorkerNavigator :: IsGObject obj => obj -> WorkerNavigator
castToWorkerNavigator = castTo gTypeWorkerNavigator "WorkerNavigator"
foreign import javascript unsafe "window[\"WorkerNavigator\"]" gTypeWorkerNavigator :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unXMLHttpRequest
unsafeCastGObject = XMLHttpRequest . unGObject
castToXMLHttpRequest :: IsGObject obj => obj -> XMLHttpRequest
castToXMLHttpRequest = castTo gTypeXMLHttpRequest "XMLHttpRequest"
foreign import javascript unsafe "window[\"XMLHttpRequest\"]" gTypeXMLHttpRequest :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unXMLHttpRequestProgressEvent
unsafeCastGObject = XMLHttpRequestProgressEvent . unGObject
castToXMLHttpRequestProgressEvent :: IsGObject obj => obj -> XMLHttpRequestProgressEvent
castToXMLHttpRequestProgressEvent = castTo gTypeXMLHttpRequestProgressEvent "XMLHttpRequestProgressEvent"
foreign import javascript unsafe "window[\"XMLHttpRequestProgressEvent\"]" gTypeXMLHttpRequestProgressEvent :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unXMLHttpRequestUpload
unsafeCastGObject = XMLHttpRequestUpload . unGObject
castToXMLHttpRequestUpload :: IsGObject obj => obj -> XMLHttpRequestUpload
castToXMLHttpRequestUpload = castTo gTypeXMLHttpRequestUpload "XMLHttpRequestUpload"
foreign import javascript unsafe "window[\"XMLHttpRequestUpload\"]" gTypeXMLHttpRequestUpload :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unXMLSerializer
unsafeCastGObject = XMLSerializer . unGObject
castToXMLSerializer :: IsGObject obj => obj -> XMLSerializer
castToXMLSerializer = castTo gTypeXMLSerializer "XMLSerializer"
foreign import javascript unsafe "window[\"XMLSerializer\"]" gTypeXMLSerializer :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unXPathEvaluator
unsafeCastGObject = XPathEvaluator . unGObject
castToXPathEvaluator :: IsGObject obj => obj -> XPathEvaluator
castToXPathEvaluator = castTo gTypeXPathEvaluator "XPathEvaluator"
foreign import javascript unsafe "window[\"XPathEvaluator\"]" gTypeXPathEvaluator :: GType
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unXPathExpression
unsafeCastGObject = XPathExpression . unGObject
castToXPathExpression :: IsGObject obj => obj -> XPathExpression
castToXPathExpression = castTo gTypeXPathExpression "XPathExpression"
foreign import javascript unsafe "window[\"XPathExpression\"]" gTypeXPathExpression :: GType
#else
type IsXPathExpression o = XPathExpressionClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unXPathNSResolver
unsafeCastGObject = XPathNSResolver . unGObject
castToXPathNSResolver :: IsGObject obj => obj -> XPathNSResolver
castToXPathNSResolver = castTo gTypeXPathNSResolver "XPathNSResolver"
foreign import javascript unsafe "window[\"XPathNSResolver\"]" gTypeXPathNSResolver :: GType
#else
type IsXPathNSResolver o = XPathNSResolverClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unXPathResult
unsafeCastGObject = XPathResult . unGObject
castToXPathResult :: IsGObject obj => obj -> XPathResult
castToXPathResult = castTo gTypeXPathResult "XPathResult"
foreign import javascript unsafe "window[\"XPathResult\"]" gTypeXPathResult :: GType
#else
type IsXPathResult o = XPathResultClass o
#endif
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
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
toGObject = GObject . unXSLTProcessor
unsafeCastGObject = XSLTProcessor . unGObject
castToXSLTProcessor :: IsGObject obj => obj -> XSLTProcessor
castToXSLTProcessor = castTo gTypeXSLTProcessor "XSLTProcessor"
foreign import javascript unsafe "window[\"XSLTProcessor\"]" gTypeXSLTProcessor :: GType
#endif