webkitgtk3 0.13.1.2 → 0.13.1.3
raw patch · 3 files changed
+382/−305 lines, 3 files
Files
- Graphics/UI/Gtk/WebKit/Types.chs +304/−304
- hswebkit.h +77/−0
- webkitgtk3.cabal +1/−1
Graphics/UI/Gtk/WebKit/Types.chs view
@@ -129,6 +129,10 @@ toFile, mkFile, unFile, castToFile, gTypeFile,+ CSS(CSS), CSSClass,+ toCSS, + mkCSS, unCSS,+ castToCSS, gTypeCSS, CSSRule(CSSRule), CSSRuleClass, toCSSRule, mkCSSRule, unCSSRule,@@ -149,34 +153,10 @@ toDOMImplementation, mkDOMImplementation, unDOMImplementation, castToDOMImplementation, gTypeDOMImplementation,- DOMMimeType(DOMMimeType), DOMMimeTypeClass,- toDOMMimeType, - mkDOMMimeType, unDOMMimeType,- castToDOMMimeType, gTypeDOMMimeType,- DOMMimeTypeArray(DOMMimeTypeArray), DOMMimeTypeArrayClass,- toDOMMimeTypeArray, - mkDOMMimeTypeArray, unDOMMimeTypeArray,- castToDOMMimeTypeArray, gTypeDOMMimeTypeArray, DOMNamedFlowCollection(DOMNamedFlowCollection), DOMNamedFlowCollectionClass, toDOMNamedFlowCollection, mkDOMNamedFlowCollection, unDOMNamedFlowCollection, castToDOMNamedFlowCollection, gTypeDOMNamedFlowCollection,- DOMPlugin(DOMPlugin), DOMPluginClass,- toDOMPlugin, - mkDOMPlugin, unDOMPlugin,- castToDOMPlugin, gTypeDOMPlugin,- DOMPluginArray(DOMPluginArray), DOMPluginArrayClass,- toDOMPluginArray, - mkDOMPluginArray, unDOMPluginArray,- castToDOMPluginArray, gTypeDOMPluginArray,- DOMSecurityPolicy(DOMSecurityPolicy), DOMSecurityPolicyClass,- toDOMSecurityPolicy, - mkDOMSecurityPolicy, unDOMSecurityPolicy,- castToDOMSecurityPolicy, gTypeDOMSecurityPolicy,- DOMSelection(DOMSelection), DOMSelectionClass,- toDOMSelection, - mkDOMSelection, unDOMSelection,- castToDOMSelection, gTypeDOMSelection, DOMStringList(DOMStringList), DOMStringListClass, toDOMStringList, mkDOMStringList, unDOMStringList,@@ -189,10 +169,6 @@ toDOMSettableTokenList, mkDOMSettableTokenList, unDOMSettableTokenList, castToDOMSettableTokenList, gTypeDOMSettableTokenList,- DOMWindowCSS(DOMWindowCSS), DOMWindowCSSClass,- toDOMWindowCSS, - mkDOMWindowCSS, unDOMWindowCSS,- castToDOMWindowCSS, gTypeDOMWindowCSS, Event(Event), EventClass, toEvent, mkEvent, unEvent,@@ -217,6 +193,10 @@ toEventTarget, mkEventTarget, unEventTarget, castToEventTarget, gTypeEventTarget,+ ApplicationCache(ApplicationCache), ApplicationCacheClass,+ toApplicationCache, + mkApplicationCache, unApplicationCache,+ castToApplicationCache, gTypeApplicationCache, AudioTrackList(AudioTrackList), AudioTrackListClass, toAudioTrackList, mkAudioTrackList, unAudioTrackList,@@ -225,14 +205,6 @@ toBatteryManager, mkBatteryManager, unBatteryManager, castToBatteryManager, gTypeBatteryManager,- DOMApplicationCache(DOMApplicationCache), DOMApplicationCacheClass,- toDOMApplicationCache, - mkDOMApplicationCache, unDOMApplicationCache,- castToDOMApplicationCache, gTypeDOMApplicationCache,- DOMWindow(DOMWindow), DOMWindowClass,- toDOMWindow, - mkDOMWindow, unDOMWindow,- castToDOMWindow, gTypeDOMWindow, MessagePort(MessagePort), MessagePortClass, toMessagePort, mkMessagePort, unMessagePort,@@ -241,10 +213,10 @@ toNode, mkNode, unNode, castToNode, gTypeNode,- DOMAttr(DOMAttr), DOMAttrClass,- toDOMAttr, - mkDOMAttr, unDOMAttr,- castToDOMAttr, gTypeDOMAttr,+ Attr(Attr), AttrClass,+ toAttr, + mkAttr, unAttr,+ castToAttr, gTypeAttr, CharacterData(CharacterData), CharacterDataClass, toCharacterData, mkCharacterData, unCharacterData,@@ -541,6 +513,10 @@ toWebKitNamedFlow, mkWebKitNamedFlow, unWebKitNamedFlow, castToWebKitNamedFlow, gTypeWebKitNamedFlow,+ Window(Window), WindowClass,+ toWindow, + mkWindow, unWindow,+ castToWindow, gTypeWindow, FileList(FileList), FileListClass, toFileList, mkFileList, unFileList,@@ -589,6 +565,14 @@ toMediaQueryList, mkMediaQueryList, unMediaQueryList, castToMediaQueryList, gTypeMediaQueryList,+ MimeType(MimeType), MimeTypeClass,+ toMimeType, + mkMimeType, unMimeType,+ castToMimeType, gTypeMimeType,+ MimeTypeArray(MimeTypeArray), MimeTypeArrayClass,+ toMimeTypeArray, + mkMimeTypeArray, unMimeTypeArray,+ castToMimeTypeArray, gTypeMimeTypeArray, NamedNodeMap(NamedNodeMap), NamedNodeMapClass, toNamedNodeMap, mkNamedNodeMap, unNamedNodeMap,@@ -617,14 +601,30 @@ toPerformanceTiming, mkPerformanceTiming, unPerformanceTiming, castToPerformanceTiming, gTypePerformanceTiming,- DOMRange(DOMRange), DOMRangeClass,- toDOMRange, - mkDOMRange, unDOMRange,- castToDOMRange, gTypeDOMRange,- DOMScreen(DOMScreen), DOMScreenClass,- toDOMScreen, - mkDOMScreen, unDOMScreen,- castToDOMScreen, gTypeDOMScreen,+ Plugin(Plugin), PluginClass,+ toPlugin, + mkPlugin, unPlugin,+ castToPlugin, gTypePlugin,+ PluginArray(PluginArray), PluginArrayClass,+ toPluginArray, + mkPluginArray, unPluginArray,+ castToPluginArray, gTypePluginArray,+ Range(Range), RangeClass,+ toRange, + mkRange, unRange,+ castToRange, gTypeRange,+ Screen(Screen), ScreenClass,+ toScreen, + mkScreen, unScreen,+ castToScreen, gTypeScreen,+ SecurityPolicy(SecurityPolicy), SecurityPolicyClass,+ toSecurityPolicy, + mkSecurityPolicy, unSecurityPolicy,+ castToSecurityPolicy, gTypeSecurityPolicy,+ Selection(Selection), SelectionClass,+ toSelection, + mkSelection, unSelection,+ castToSelection, gTypeSelection, Storage(Storage), StorageClass, toStorage, mkStorage, unStorage,@@ -1252,6 +1252,29 @@ gTypeFile = {# call fun unsafe webkit_dom_file_get_type #} +-- ************************************************************************ CSS++{#pointer *WebKitDOMDOMWindowCSS as CSS foreign newtype #} deriving (Eq,Ord)++mkCSS = (CSS, objectUnrefFromMainloop)+unCSS (CSS o) = o++class GObjectClass o => CSSClass o+toCSS :: CSSClass o => o -> CSS+toCSS = unsafeCastGObject . toGObject++instance CSSClass CSS+instance GObjectClass CSS where+ toGObject = GObject . castForeignPtr . unCSS+ unsafeCastGObject = CSS . castForeignPtr . unGObject++castToCSS :: GObjectClass obj => obj -> CSS+castToCSS = castTo gTypeCSS "CSS"++gTypeCSS :: GType+gTypeCSS =+ {# call fun unsafe webkit_dom_dom_window_css_get_type #}+ -- ******************************************************************** CSSRule {#pointer *WebKitDOMCSSRule as CSSRule foreign newtype #} deriving (Eq,Ord)@@ -1367,52 +1390,6 @@ gTypeDOMImplementation = {# call fun unsafe webkit_dom_dom_implementation_get_type #} --- **************************************************************** DOMMimeType--{#pointer *WebKitDOMDOMMimeType as DOMMimeType foreign newtype #} deriving (Eq,Ord)--mkDOMMimeType = (DOMMimeType, objectUnrefFromMainloop)-unDOMMimeType (DOMMimeType o) = o--class GObjectClass o => DOMMimeTypeClass o-toDOMMimeType :: DOMMimeTypeClass o => o -> DOMMimeType-toDOMMimeType = unsafeCastGObject . toGObject--instance DOMMimeTypeClass DOMMimeType-instance GObjectClass DOMMimeType where- toGObject = GObject . castForeignPtr . unDOMMimeType- unsafeCastGObject = DOMMimeType . castForeignPtr . unGObject--castToDOMMimeType :: GObjectClass obj => obj -> DOMMimeType-castToDOMMimeType = castTo gTypeDOMMimeType "DOMMimeType"--gTypeDOMMimeType :: GType-gTypeDOMMimeType =- {# call fun unsafe webkit_dom_dom_mime_type_get_type #}---- *********************************************************** DOMMimeTypeArray--{#pointer *WebKitDOMDOMMimeTypeArray as DOMMimeTypeArray foreign newtype #} deriving (Eq,Ord)--mkDOMMimeTypeArray = (DOMMimeTypeArray, objectUnrefFromMainloop)-unDOMMimeTypeArray (DOMMimeTypeArray o) = o--class GObjectClass o => DOMMimeTypeArrayClass o-toDOMMimeTypeArray :: DOMMimeTypeArrayClass o => o -> DOMMimeTypeArray-toDOMMimeTypeArray = unsafeCastGObject . toGObject--instance DOMMimeTypeArrayClass DOMMimeTypeArray-instance GObjectClass DOMMimeTypeArray where- toGObject = GObject . castForeignPtr . unDOMMimeTypeArray- unsafeCastGObject = DOMMimeTypeArray . castForeignPtr . unGObject--castToDOMMimeTypeArray :: GObjectClass obj => obj -> DOMMimeTypeArray-castToDOMMimeTypeArray = castTo gTypeDOMMimeTypeArray "DOMMimeTypeArray"--gTypeDOMMimeTypeArray :: GType-gTypeDOMMimeTypeArray =- {# call fun unsafe webkit_dom_dom_mime_type_array_get_type #}- -- ***************************************************** DOMNamedFlowCollection {#pointer *WebKitDOMDOMNamedFlowCollection as DOMNamedFlowCollection foreign newtype #} deriving (Eq,Ord)@@ -1436,98 +1413,6 @@ gTypeDOMNamedFlowCollection = {# call fun unsafe webkit_dom_dom_named_flow_collection_get_type #} --- ****************************************************************** DOMPlugin--{#pointer *WebKitDOMDOMPlugin as DOMPlugin foreign newtype #} deriving (Eq,Ord)--mkDOMPlugin = (DOMPlugin, objectUnrefFromMainloop)-unDOMPlugin (DOMPlugin o) = o--class GObjectClass o => DOMPluginClass o-toDOMPlugin :: DOMPluginClass o => o -> DOMPlugin-toDOMPlugin = unsafeCastGObject . toGObject--instance DOMPluginClass DOMPlugin-instance GObjectClass DOMPlugin where- toGObject = GObject . castForeignPtr . unDOMPlugin- unsafeCastGObject = DOMPlugin . castForeignPtr . unGObject--castToDOMPlugin :: GObjectClass obj => obj -> DOMPlugin-castToDOMPlugin = castTo gTypeDOMPlugin "DOMPlugin"--gTypeDOMPlugin :: GType-gTypeDOMPlugin =- {# call fun unsafe webkit_dom_dom_plugin_get_type #}---- ************************************************************* DOMPluginArray--{#pointer *WebKitDOMDOMPluginArray as DOMPluginArray foreign newtype #} deriving (Eq,Ord)--mkDOMPluginArray = (DOMPluginArray, objectUnrefFromMainloop)-unDOMPluginArray (DOMPluginArray o) = o--class GObjectClass o => DOMPluginArrayClass o-toDOMPluginArray :: DOMPluginArrayClass o => o -> DOMPluginArray-toDOMPluginArray = unsafeCastGObject . toGObject--instance DOMPluginArrayClass DOMPluginArray-instance GObjectClass DOMPluginArray where- toGObject = GObject . castForeignPtr . unDOMPluginArray- unsafeCastGObject = DOMPluginArray . castForeignPtr . unGObject--castToDOMPluginArray :: GObjectClass obj => obj -> DOMPluginArray-castToDOMPluginArray = castTo gTypeDOMPluginArray "DOMPluginArray"--gTypeDOMPluginArray :: GType-gTypeDOMPluginArray =- {# call fun unsafe webkit_dom_dom_plugin_array_get_type #}---- ********************************************************** DOMSecurityPolicy--{#pointer *WebKitDOMDOMSecurityPolicy as DOMSecurityPolicy foreign newtype #} deriving (Eq,Ord)--mkDOMSecurityPolicy = (DOMSecurityPolicy, objectUnrefFromMainloop)-unDOMSecurityPolicy (DOMSecurityPolicy o) = o--class GObjectClass o => DOMSecurityPolicyClass o-toDOMSecurityPolicy :: DOMSecurityPolicyClass o => o -> DOMSecurityPolicy-toDOMSecurityPolicy = unsafeCastGObject . toGObject--instance DOMSecurityPolicyClass DOMSecurityPolicy-instance GObjectClass DOMSecurityPolicy where- toGObject = GObject . castForeignPtr . unDOMSecurityPolicy- unsafeCastGObject = DOMSecurityPolicy . castForeignPtr . unGObject--castToDOMSecurityPolicy :: GObjectClass obj => obj -> DOMSecurityPolicy-castToDOMSecurityPolicy = castTo gTypeDOMSecurityPolicy "DOMSecurityPolicy"--gTypeDOMSecurityPolicy :: GType-gTypeDOMSecurityPolicy =- {# call fun unsafe webkit_dom_dom_security_policy_get_type #}---- *************************************************************** DOMSelection--{#pointer *WebKitDOMDOMSelection as DOMSelection foreign newtype #} deriving (Eq,Ord)--mkDOMSelection = (DOMSelection, objectUnrefFromMainloop)-unDOMSelection (DOMSelection o) = o--class GObjectClass o => DOMSelectionClass o-toDOMSelection :: DOMSelectionClass o => o -> DOMSelection-toDOMSelection = unsafeCastGObject . toGObject--instance DOMSelectionClass DOMSelection-instance GObjectClass DOMSelection where- toGObject = GObject . castForeignPtr . unDOMSelection- unsafeCastGObject = DOMSelection . castForeignPtr . unGObject--castToDOMSelection :: GObjectClass obj => obj -> DOMSelection-castToDOMSelection = castTo gTypeDOMSelection "DOMSelection"--gTypeDOMSelection :: GType-gTypeDOMSelection =- {# call fun unsafe webkit_dom_dom_selection_get_type #}- -- ************************************************************** DOMStringList {#pointer *WebKitDOMDOMStringList as DOMStringList foreign newtype #} deriving (Eq,Ord)@@ -1598,29 +1483,6 @@ gTypeDOMSettableTokenList = {# call fun unsafe webkit_dom_dom_settable_token_list_get_type #} --- *************************************************************** DOMWindowCSS--{#pointer *WebKitDOMDOMWindowCSS as DOMWindowCSS foreign newtype #} deriving (Eq,Ord)--mkDOMWindowCSS = (DOMWindowCSS, objectUnrefFromMainloop)-unDOMWindowCSS (DOMWindowCSS o) = o--class GObjectClass o => DOMWindowCSSClass o-toDOMWindowCSS :: DOMWindowCSSClass o => o -> DOMWindowCSS-toDOMWindowCSS = unsafeCastGObject . toGObject--instance DOMWindowCSSClass DOMWindowCSS-instance GObjectClass DOMWindowCSS where- toGObject = GObject . castForeignPtr . unDOMWindowCSS- unsafeCastGObject = DOMWindowCSS . castForeignPtr . unGObject--castToDOMWindowCSS :: GObjectClass obj => obj -> DOMWindowCSS-castToDOMWindowCSS = castTo gTypeDOMWindowCSS "DOMWindowCSS"--gTypeDOMWindowCSS :: GType-gTypeDOMWindowCSS =- {# call fun unsafe webkit_dom_dom_window_css_get_type #}- -- ********************************************************************** Event {#pointer *WebKitDOMEvent as Event foreign newtype #} deriving (Eq,Ord)@@ -1767,6 +1629,30 @@ gTypeEventTarget = {# call fun unsafe webkit_dom_event_target_get_type #} +-- *********************************************************** ApplicationCache++{#pointer *WebKitDOMDOMApplicationCache as ApplicationCache foreign newtype #} deriving (Eq,Ord)++mkApplicationCache = (ApplicationCache, objectUnrefFromMainloop)+unApplicationCache (ApplicationCache o) = o++class EventTargetClass o => ApplicationCacheClass o+toApplicationCache :: ApplicationCacheClass o => o -> ApplicationCache+toApplicationCache = unsafeCastGObject . toGObject++instance ApplicationCacheClass ApplicationCache+instance EventTargetClass ApplicationCache+instance GObjectClass ApplicationCache where+ toGObject = GObject . castForeignPtr . unApplicationCache+ unsafeCastGObject = ApplicationCache . castForeignPtr . unGObject++castToApplicationCache :: GObjectClass obj => obj -> ApplicationCache+castToApplicationCache = castTo gTypeApplicationCache "ApplicationCache"++gTypeApplicationCache :: GType+gTypeApplicationCache =+ {# call fun unsafe webkit_dom_dom_application_cache_get_type #}+ -- ************************************************************* AudioTrackList {#pointer *WebKitDOMAudioTrackList as AudioTrackList foreign newtype #} deriving (Eq,Ord)@@ -1815,54 +1701,6 @@ gTypeBatteryManager = {# call fun unsafe webkit_dom_battery_manager_get_type #} --- ******************************************************** DOMApplicationCache--{#pointer *WebKitDOMDOMApplicationCache as DOMApplicationCache foreign newtype #} deriving (Eq,Ord)--mkDOMApplicationCache = (DOMApplicationCache, objectUnrefFromMainloop)-unDOMApplicationCache (DOMApplicationCache o) = o--class EventTargetClass o => DOMApplicationCacheClass o-toDOMApplicationCache :: DOMApplicationCacheClass o => o -> DOMApplicationCache-toDOMApplicationCache = unsafeCastGObject . toGObject--instance DOMApplicationCacheClass DOMApplicationCache-instance EventTargetClass DOMApplicationCache-instance GObjectClass DOMApplicationCache where- toGObject = GObject . castForeignPtr . unDOMApplicationCache- unsafeCastGObject = DOMApplicationCache . castForeignPtr . unGObject--castToDOMApplicationCache :: GObjectClass obj => obj -> DOMApplicationCache-castToDOMApplicationCache = castTo gTypeDOMApplicationCache "DOMApplicationCache"--gTypeDOMApplicationCache :: GType-gTypeDOMApplicationCache =- {# call fun unsafe webkit_dom_dom_application_cache_get_type #}---- ****************************************************************** DOMWindow--{#pointer *WebKitDOMDOMWindow as DOMWindow foreign newtype #} deriving (Eq,Ord)--mkDOMWindow = (DOMWindow, objectUnrefFromMainloop)-unDOMWindow (DOMWindow o) = o--class EventTargetClass o => DOMWindowClass o-toDOMWindow :: DOMWindowClass o => o -> DOMWindow-toDOMWindow = unsafeCastGObject . toGObject--instance DOMWindowClass DOMWindow-instance EventTargetClass DOMWindow-instance GObjectClass DOMWindow where- toGObject = GObject . castForeignPtr . unDOMWindow- unsafeCastGObject = DOMWindow . castForeignPtr . unGObject--castToDOMWindow :: GObjectClass obj => obj -> DOMWindow-castToDOMWindow = castTo gTypeDOMWindow "DOMWindow"--gTypeDOMWindow :: GType-gTypeDOMWindow =- {# call fun unsafe webkit_dom_dom_window_get_type #}- -- **************************************************************** MessagePort {#pointer *WebKitDOMMessagePort as MessagePort foreign newtype #} deriving (Eq,Ord)@@ -1911,29 +1749,29 @@ gTypeNode = {# call fun unsafe webkit_dom_node_get_type #} --- ******************************************************************** DOMAttr+-- *********************************************************************** Attr -{#pointer *WebKitDOMAttr as DOMAttr foreign newtype #} deriving (Eq,Ord)+{#pointer *WebKitDOMAttr as Attr foreign newtype #} deriving (Eq,Ord) -mkDOMAttr = (DOMAttr, objectUnrefFromMainloop)-unDOMAttr (DOMAttr o) = o+mkAttr = (Attr, objectUnrefFromMainloop)+unAttr (Attr o) = o -class NodeClass o => DOMAttrClass o-toDOMAttr :: DOMAttrClass o => o -> DOMAttr-toDOMAttr = unsafeCastGObject . toGObject+class NodeClass o => AttrClass o+toAttr :: AttrClass o => o -> Attr+toAttr = unsafeCastGObject . toGObject -instance DOMAttrClass DOMAttr-instance NodeClass DOMAttr-instance EventTargetClass DOMAttr-instance GObjectClass DOMAttr where- toGObject = GObject . castForeignPtr . unDOMAttr- unsafeCastGObject = DOMAttr . castForeignPtr . unGObject+instance AttrClass Attr+instance NodeClass Attr+instance EventTargetClass Attr+instance GObjectClass Attr where+ toGObject = GObject . castForeignPtr . unAttr+ unsafeCastGObject = Attr . castForeignPtr . unGObject -castToDOMAttr :: GObjectClass obj => obj -> DOMAttr-castToDOMAttr = castTo gTypeDOMAttr "DOMAttr"+castToAttr :: GObjectClass obj => obj -> Attr+castToAttr = castTo gTypeAttr "Attr" -gTypeDOMAttr :: GType-gTypeDOMAttr =+gTypeAttr :: GType+gTypeAttr = {# call fun unsafe webkit_dom_attr_get_type #} -- ************************************************************** CharacterData@@ -3899,6 +3737,30 @@ gTypeWebKitNamedFlow = {# call fun unsafe webkit_dom_webkit_named_flow_get_type #} +-- ********************************************************************* Window++{#pointer *WebKitDOMDOMWindow as Window foreign newtype #} deriving (Eq,Ord)++mkWindow = (Window, objectUnrefFromMainloop)+unWindow (Window o) = o++class EventTargetClass o => WindowClass o+toWindow :: WindowClass o => o -> Window+toWindow = unsafeCastGObject . toGObject++instance WindowClass Window+instance EventTargetClass Window+instance GObjectClass Window where+ toGObject = GObject . castForeignPtr . unWindow+ unsafeCastGObject = Window . castForeignPtr . unGObject++castToWindow :: GObjectClass obj => obj -> Window+castToWindow = castTo gTypeWindow "Window"++gTypeWindow :: GType+gTypeWindow =+ {# call fun unsafe webkit_dom_dom_window_get_type #}+ -- ******************************************************************* FileList {#pointer *WebKitDOMFileList as FileList foreign newtype #} deriving (Eq,Ord)@@ -4178,6 +4040,52 @@ gTypeMediaQueryList = {# call fun unsafe webkit_dom_media_query_list_get_type #} +-- ******************************************************************* MimeType++{#pointer *WebKitDOMDOMMimeType as MimeType foreign newtype #} deriving (Eq,Ord)++mkMimeType = (MimeType, objectUnrefFromMainloop)+unMimeType (MimeType o) = o++class GObjectClass o => MimeTypeClass o+toMimeType :: MimeTypeClass o => o -> MimeType+toMimeType = unsafeCastGObject . toGObject++instance MimeTypeClass MimeType+instance GObjectClass MimeType where+ toGObject = GObject . castForeignPtr . unMimeType+ unsafeCastGObject = MimeType . castForeignPtr . unGObject++castToMimeType :: GObjectClass obj => obj -> MimeType+castToMimeType = castTo gTypeMimeType "MimeType"++gTypeMimeType :: GType+gTypeMimeType =+ {# call fun unsafe webkit_dom_dom_mime_type_get_type #}++-- ************************************************************** MimeTypeArray++{#pointer *WebKitDOMDOMMimeTypeArray as MimeTypeArray foreign newtype #} deriving (Eq,Ord)++mkMimeTypeArray = (MimeTypeArray, objectUnrefFromMainloop)+unMimeTypeArray (MimeTypeArray o) = o++class GObjectClass o => MimeTypeArrayClass o+toMimeTypeArray :: MimeTypeArrayClass o => o -> MimeTypeArray+toMimeTypeArray = unsafeCastGObject . toGObject++instance MimeTypeArrayClass MimeTypeArray+instance GObjectClass MimeTypeArray where+ toGObject = GObject . castForeignPtr . unMimeTypeArray+ unsafeCastGObject = MimeTypeArray . castForeignPtr . unGObject++castToMimeTypeArray :: GObjectClass obj => obj -> MimeTypeArray+castToMimeTypeArray = castTo gTypeMimeTypeArray "MimeTypeArray"++gTypeMimeTypeArray :: GType+gTypeMimeTypeArray =+ {# call fun unsafe webkit_dom_dom_mime_type_array_get_type #}+ -- *************************************************************** NamedNodeMap {#pointer *WebKitDOMNamedNodeMap as NamedNodeMap foreign newtype #} deriving (Eq,Ord)@@ -4339,51 +4247,143 @@ gTypePerformanceTiming = {# call fun unsafe webkit_dom_performance_timing_get_type #} --- ******************************************************************* DOMRange+-- ********************************************************************* Plugin -{#pointer *WebKitDOMRange as DOMRange foreign newtype #} deriving (Eq,Ord)+{#pointer *WebKitDOMDOMPlugin as Plugin foreign newtype #} deriving (Eq,Ord) -mkDOMRange = (DOMRange, objectUnrefFromMainloop)-unDOMRange (DOMRange o) = o+mkPlugin = (Plugin, objectUnrefFromMainloop)+unPlugin (Plugin o) = o -class GObjectClass o => DOMRangeClass o-toDOMRange :: DOMRangeClass o => o -> DOMRange-toDOMRange = unsafeCastGObject . toGObject+class GObjectClass o => PluginClass o+toPlugin :: PluginClass o => o -> Plugin+toPlugin = unsafeCastGObject . toGObject -instance DOMRangeClass DOMRange-instance GObjectClass DOMRange where- toGObject = GObject . castForeignPtr . unDOMRange- unsafeCastGObject = DOMRange . castForeignPtr . unGObject+instance PluginClass Plugin+instance GObjectClass Plugin where+ toGObject = GObject . castForeignPtr . unPlugin+ unsafeCastGObject = Plugin . castForeignPtr . unGObject -castToDOMRange :: GObjectClass obj => obj -> DOMRange-castToDOMRange = castTo gTypeDOMRange "DOMRange"+castToPlugin :: GObjectClass obj => obj -> Plugin+castToPlugin = castTo gTypePlugin "Plugin" -gTypeDOMRange :: GType-gTypeDOMRange =+gTypePlugin :: GType+gTypePlugin =+ {# call fun unsafe webkit_dom_dom_plugin_get_type #}++-- **************************************************************** PluginArray++{#pointer *WebKitDOMDOMPluginArray as PluginArray foreign newtype #} deriving (Eq,Ord)++mkPluginArray = (PluginArray, objectUnrefFromMainloop)+unPluginArray (PluginArray o) = o++class GObjectClass o => PluginArrayClass o+toPluginArray :: PluginArrayClass o => o -> PluginArray+toPluginArray = unsafeCastGObject . toGObject++instance PluginArrayClass PluginArray+instance GObjectClass PluginArray where+ toGObject = GObject . castForeignPtr . unPluginArray+ unsafeCastGObject = PluginArray . castForeignPtr . unGObject++castToPluginArray :: GObjectClass obj => obj -> PluginArray+castToPluginArray = castTo gTypePluginArray "PluginArray"++gTypePluginArray :: GType+gTypePluginArray =+ {# call fun unsafe webkit_dom_dom_plugin_array_get_type #}++-- ********************************************************************** Range++{#pointer *WebKitDOMRange as Range foreign newtype #} deriving (Eq,Ord)++mkRange = (Range, objectUnrefFromMainloop)+unRange (Range o) = o++class GObjectClass o => RangeClass o+toRange :: RangeClass o => o -> Range+toRange = unsafeCastGObject . toGObject++instance RangeClass Range+instance GObjectClass Range where+ toGObject = GObject . castForeignPtr . unRange+ unsafeCastGObject = Range . castForeignPtr . unGObject++castToRange :: GObjectClass obj => obj -> Range+castToRange = castTo gTypeRange "Range"++gTypeRange :: GType+gTypeRange = {# call fun unsafe webkit_dom_range_get_type #} --- ****************************************************************** DOMScreen+-- ********************************************************************* Screen -{#pointer *WebKitDOMScreen as DOMScreen foreign newtype #} deriving (Eq,Ord)+{#pointer *WebKitDOMScreen as Screen foreign newtype #} deriving (Eq,Ord) -mkDOMScreen = (DOMScreen, objectUnrefFromMainloop)-unDOMScreen (DOMScreen o) = o+mkScreen = (Screen, objectUnrefFromMainloop)+unScreen (Screen o) = o -class GObjectClass o => DOMScreenClass o-toDOMScreen :: DOMScreenClass o => o -> DOMScreen-toDOMScreen = unsafeCastGObject . toGObject+class GObjectClass o => ScreenClass o+toScreen :: ScreenClass o => o -> Screen+toScreen = unsafeCastGObject . toGObject -instance DOMScreenClass DOMScreen-instance GObjectClass DOMScreen where- toGObject = GObject . castForeignPtr . unDOMScreen- unsafeCastGObject = DOMScreen . castForeignPtr . unGObject+instance ScreenClass Screen+instance GObjectClass Screen where+ toGObject = GObject . castForeignPtr . unScreen+ unsafeCastGObject = Screen . castForeignPtr . unGObject -castToDOMScreen :: GObjectClass obj => obj -> DOMScreen-castToDOMScreen = castTo gTypeDOMScreen "DOMScreen"+castToScreen :: GObjectClass obj => obj -> Screen+castToScreen = castTo gTypeScreen "Screen" -gTypeDOMScreen :: GType-gTypeDOMScreen =+gTypeScreen :: GType+gTypeScreen = {# call fun unsafe webkit_dom_screen_get_type #}++-- ************************************************************* SecurityPolicy++{#pointer *WebKitDOMDOMSecurityPolicy as SecurityPolicy foreign newtype #} deriving (Eq,Ord)++mkSecurityPolicy = (SecurityPolicy, objectUnrefFromMainloop)+unSecurityPolicy (SecurityPolicy o) = o++class GObjectClass o => SecurityPolicyClass o+toSecurityPolicy :: SecurityPolicyClass o => o -> SecurityPolicy+toSecurityPolicy = unsafeCastGObject . toGObject++instance SecurityPolicyClass SecurityPolicy+instance GObjectClass SecurityPolicy where+ toGObject = GObject . castForeignPtr . unSecurityPolicy+ unsafeCastGObject = SecurityPolicy . castForeignPtr . unGObject++castToSecurityPolicy :: GObjectClass obj => obj -> SecurityPolicy+castToSecurityPolicy = castTo gTypeSecurityPolicy "SecurityPolicy"++gTypeSecurityPolicy :: GType+gTypeSecurityPolicy =+ {# call fun unsafe webkit_dom_dom_security_policy_get_type #}++-- ****************************************************************** Selection++{#pointer *WebKitDOMDOMSelection as Selection foreign newtype #} deriving (Eq,Ord)++mkSelection = (Selection, objectUnrefFromMainloop)+unSelection (Selection o) = o++class GObjectClass o => SelectionClass o+toSelection :: SelectionClass o => o -> Selection+toSelection = unsafeCastGObject . toGObject++instance SelectionClass Selection+instance GObjectClass Selection where+ toGObject = GObject . castForeignPtr . unSelection+ unsafeCastGObject = Selection . castForeignPtr . unGObject++castToSelection :: GObjectClass obj => obj -> Selection+castToSelection = castTo gTypeSelection "Selection"++gTypeSelection :: GType+gTypeSelection =+ {# call fun unsafe webkit_dom_dom_selection_get_type #} -- ******************************************************************** Storage
hswebkit.h view
@@ -35,3 +35,80 @@ #endif #include "events.h"++#undef Bool+#undef True+#undef False+#undef true+#undef false+#undef Button1 +#undef Button2+#undef Button3+#undef Button4+#undef Button5+#undef Button1Mask +#undef Button2Mask+#undef Button3Mask+#undef Button4Mask+#undef Button5Mask++#undef ShiftMask+#undef LockMask+#undef ControlMask+#undef Mod1Mask+#undef Mod2Mask+#undef Mod3Mask+#undef Mod4Mask+#undef Mod5Mask++#undef None+#undef ParentRelative+#undef CopyFromParent+#undef PointerWindow+#undef InputFocus+#undef PointerRoot+#undef AnyPropertyType+#undef AnyKey+#undef AnyButton+#undef AllTemporary+#undef CurrentTime+#undef NoSymbol++#undef NoEventMask+#undef KeyPressMask+#undef KeyReleaseMask+#undef ButtonPressMask+#undef ButtonReleaseMask+#undef EnterWindowMask+#undef LeaveWindowMask+#undef PointerMotionMask+#undef PointerMotionHintMask+#undef Button1MotionMask+#undef Button2MotionMask+#undef Button3MotionMask+#undef Button4MotionMask+#undef Button5MotionMask+#undef ButtonMotionMask+#undef KeymapStateMask+#undef ExposureMask+#undef VisibilityChangeMask+#undef StructureNotifyMask+#undef ResizeRedirectMask+#undef SubstructureNotifyMask+#undef SubstructureRedirectMask+#undef FocusChangeMask+#undef PropertyChangeMask+#undef ColormapChangeMask+#undef OwnerGrabButtonMask+#undef Status+#undef Expose+#undef Below+#undef GrabSuccess+#undef GrabAlreadyGrabbed+#undef GrabInvalidTime+#undef GrabNotViewable+#undef GrabFrozen+#undef OwnerChangeNewOwner+#undef OwnerChangeDestroy+#undef OwnerChangeClose+#undef NULL
webkitgtk3.cabal view
@@ -1,5 +1,5 @@ Name: webkitgtk3-Version: 0.13.1.2+Version: 0.13.1.3 License: LGPL-2.1 License-file: COPYING Copyright: (c) 2001-2013 The Gtk2Hs Team